Gdtyjr

I'm making slides for Advanced Mathematics using Beamer. I want to place pagenumbers in the frametitle(right corner), is it possible to achieve this effect? Can anyone give me any advice? Thanks a lot! []

% !Tex encoding = UTF-8
% packages
 usepackage[absolute,overlay]textpos
 usepackage[skins]tcolorbox

mode<presentation>

% Templates
usethemedefault
%usethemewarsaw

%======================
%==Alternate Templates
%======================
%usetheme[height=26pt]Rochester
%==Rectangle 
%==[height=26pt]==define the height of frametitle
%==A dominant theme without any navigational elements.
%==It can be made less dominant by using a different color theme.
%setbeamercolorstructurefg=myred!90!black

% colors
 definecolorblue_kuleuvenRGB138,110,17 % blue of the university
 definecolordark_blue_kuleuvenRGB122,64,0 % darker shade of blue
 definecolorlight_blue_kuleuvenRGB236,189,82 % lighter shade of blue
 definecolor myred rgb0.55,0,0.1
 setbeamercolorstructurefg=myred!90!black

 % inner color
 usecolorthemeorchid
 %setbeamercolormath text displayedfg=black % math text
 %setbeamercolormath text inlinedfg=black
 %setbeamercolorexample textfg=myturquoise

 % outer color
 usecolorthemewhale

% fonts
 %setmainfontTime New Roman
 %usefontthemeprofessionalfonts
 usefonttheme[onlymath]serif % math font
 setbeamerfontframetitlesize=Large % frame title font size
 setbeamerfontenumerate itemsize=normalsize % item symbol font size
 setbeamerfontfootnotesize=tiny % footnote font size

% inner theme
 useinnerthemerectangles % use rectangles
 %itemize list
 setbeamertemplateitemize item[triangle] % item symbol
 setbeamertemplateitemize subitem[circle] % subitem symbol

 %enumerate list
 setbeamertemplateenumerate item[numbered] % item symbol
 setbeamertemplateenumerate subitem[numbered] % item symbol


% setbeamertemplatesections/subsections in toc[sections numbered] % toc symbols
% setbeamerfontsection in tocseries=bf
% setbeamersizetext margin left=5mm,text margin right=5mm % text margins

 %blocks
 setbeamertemplateblocks[rounded][shadow=false]

%outer theme
 setbeamertemplatenavigation symbols % remove the navigation symbols
 % headline 
% setbeamertemplateframetitle
% vskip 2mm
% 
% ifnum thesection=0
% insertframetitle
% else
% thesection~--~insertframetitle
% fi
% 
% vskip 1mm
% hrule
% 

 % footline
 setbeamertemplatefootline
 hspace-2mm
 vspace8mm
 %begintextblock*1.01paperwidth(0mm,0.94paperheight)
 % begintcolorbox[
 % arc=0pt,
 % boxrule=0pt,
 % height=0.04paperheight,
 % width=paperwidth,
 % coltext=black,
 % skin=bicolor,
 % valign=center,
 % halign=center,
 % interior style=left color=lightgray!80!white,right color=lightgray!90!white
 % ]
 % insertframenumber/inserttotalframenumber 
 % % insert pagenumbe
 % endtcolorbox
 %。 endtextblock*
% begintextblock*1.01paperwidth(0.92paperwidth,0.945paperheight)
% includegraphics[width=0.08paperwidth]fig/cufe_logo_2
% endtextblock*
 


% bibliography
 setbeamertemplatebibliography item[theenumiv]
 setbeamertemplatebibliography entry title\
 setbeamertemplatebibliography entry location\
 setbeamertemplatebibliography entry note\

mode
<all>