如何解决如何使Beamer Rmarkdown的appendixnumberbeamer程序包起作用以不计算附录页面？
我正在尝试在Rmarkdown中编译Beamer演示文稿，该演示文稿会计算幻灯片，但不计算附录中的幻灯片。之前在这里曾问过同样的问题：Beamer Rmarkdown,changing slide count for backup slides
但是，给出的答案（对我来说）并不令人满意，并且由于缺乏声誉，我无法对此发表评论。原因是当我没有与附录幻灯片相同数量的主幻灯片时，它给出了奇怪的编号。
在标准Latex中，可以在序言中包含\ usepackage {appendixnumberbeamer}，并在备份开始之前简单地指定\ appendix。在Rmarkdown中，包appendixnumberbeamer包破坏了默认的pandoc模板，特别是当存在节标题时，以下条件块中的节：
$if(section-titles)$
\AtBeginPart{
\let\insertpartnumber\relax
\let\partname\relax
\frame{\partpage}
}
\AtBeginSection{
\ifbibliography
\else
\let\insertsectionnumber\relax
\let\sectionname\relax
\frame{\sectionpage}
\fi
}
\AtBeginSubsection{
\let\insertsubsectionnumber\relax
\let\subsectionname\relax
\frame{\subsectionpage}
}
$endif$
上一个答案的建议解决方案是基本上注释掉此代码块，在YAML中同时提供一个包含appendixnumberbeamer包的标头和一个对抛出错误的代码部分进行注释的template.tex文件。
my_header.tex
\usepackage{appendixnumberbeamer}
\usepackage{lipsum}
my_template.tex
\documentclass[$if(fontsize)$$fontsize$,$endif$$if(lang)$$babel-lang$,$endif$$if(handout)$handout,$endif$$if(colorlinks)$dvipsnames,$endif$$if(beamer)$ignorenonframetext,$endif$$for(classoption)$$classoption$$sep$,$endfor$]{$documentclass$}
\setbeamertemplate{caption}[numbered]
\setbeamertemplate{caption label separator}{: }
\setbeamercolor{caption name}{fg=normal text.fg}
\beamertemplatenavigationsymbols$if(navigation)$$navigation$$else$empty$endif$
$if(fontfamily)$
\usepackage[$for(fontfamilyoptions)$$fontfamilyoptions$$sep$,$endfor$]{$fontfamily$}
$else$
\usepackage{lmodern}
$endif$
\usepackage{amssymb,amsmath}
\usepackage{ifxetex,ifluatex}
\usepackage{fixltx2e} % provides \textsubscript
\ifnum 0\ifxetex 1\fi\ifluatex 1\fi=0 % if pdftex
\usepackage[$if(fontenc)$$fontenc$$else$T1$endif$]{fontenc}
\usepackage[utf8]{inputenc}
$if(euro)$
\usepackage{eurosym}
$endif$
\else % if luatex or xelatex
\ifxetex
\usepackage{mathspec}
\else
\usepackage{fontspec}
\fi
\defaultfontfeatures{Ligatures=TeX,Scale=MatchLowercase}
$for(fontfamilies)$
\newfontfamily{$fontfamilies.name$}[$fontfamilies.options$]{$fontfamilies.font$}
$endfor$
$if(euro)$
\newcommand{\euro}{€}
$endif$
$if(mainfont)$
\setmainfont[$for(mainfontoptions)$$mainfontoptions$$sep$,$endfor$]{$mainfont$}
$endif$
$if(sansfont)$
\setsansfont[$for(sansfontoptions)$$sansfontoptions$$sep$,$endfor$]{$sansfont$}
$endif$
$if(monofont)$
\setmonofont[Mapping=tex-ansi$if(monofontoptions)$,$for(monofontoptions)$$monofontoptions$$sep$,$endfor$$endif$]{$monofont$}
$endif$
$if(mathfont)$
\setmathfont(Digits,Latin,Greek)[$for(mathfontoptions)$$mathfontoptions$$sep$,$endfor$]{$mathfont$}
$endif$
$if(CJKmainfont)$
\usepackage{xeCJK}
\setCJKmainfont[$for(CJKoptions)$$CJKoptions$$sep$,$endfor$]{$CJKmainfont$}
$endif$
\fi
$if(theme)$
\usetheme[$for(themeoptions)$$themeoptions$$sep$,$endfor$]{$theme$}
$endif$
$if(colortheme)$
\usecolortheme{$colortheme$}
$endif$
$if(fonttheme)$
\usefonttheme{$fonttheme$}
$endif$
$if(mainfont)$
\usefonttheme{serif} % use mainfont rather than sansfont for slide text
$endif$
$if(innertheme)$
\useinnertheme{$innertheme$}
$endif$
$if(outertheme)$
\useoutertheme{$outertheme$}
$endif$
% use upquote if available,for straight quotes in verbatim environments
\IfFileExists{upquote.sty}{\usepackage{upquote}}{}
% use microtype if available
\IfFileExists{microtype.sty}{%
\usepackage{microtype}
\UseMicrotypeSet[protrusion]{basicmath} % disable protrusion for tt fonts
}{}
$if(lang)$
\ifnum 0\ifxetex 1\fi\ifluatex 1\fi=0 % if pdftex
\usepackage[shorthands=off,$for(babel-otherlangs)$$babel-otherlangs$,$endfor$main=$babel-lang$]{babel}
$if(babel-newcommands)$
$babel-newcommands$
$endif$
\else
\usepackage{polyglossia}
\setmainlanguage[$polyglossia-lang.options$]{$polyglossia-lang.name$}
$for(polyglossia-otherlangs)$
\setotherlanguage[$polyglossia-otherlangs.options$]{$polyglossia-otherlangs.name$}
$endfor$
\fi
$endif$
\newif\ifbibliography
$if(natbib)$
\usepackage{natbib}
\bibliographystyle{$if(biblio-style)$$biblio-style$$else$plainnat$endif$}
$endif$
$if(biblatex)$
\usepackage[$if(biblio-style)$style=$biblio-style$,$endif$$for(biblatexoptions)$$biblatexoptions$$sep$,$endfor$]{biblatex}
$for(bibliography)$
\addbibresource{$bibliography$}
$endfor$
$endif$
$if(verbatim-in-note)$
\usepackage{fancyvrb}
$endif$
\hypersetup{
$if(title-meta)$
pdftitle={$title-meta$},$endif$
$if(author-meta)$
pdfauthor={$author-meta$},$endif$
$if(keywords)$
pdfkeywords={$for(keywords)$$keywords$$sep$,$endfor$},$endif$
$if(colorlinks)$
colorlinks=true,linkcolor=$if(linkcolor)$$linkcolor$$else$Maroon$endif$,citecolor=$if(citecolor)$$citecolor$$else$Blue$endif$,urlcolor=$if(urlcolor)$$urlcolor$$else$Blue$endif$,$else$
pdfborder={0 0 0},$endif$
breaklinks=true}
\urlstyle{same} % don't use monospace font for urls
$if(verbatim-in-note)$
\VerbatimFootnotes % allows verbatim text in footnotes
$endif$
$if(listings)$
\usepackage{listings}
$endif$
$if(lhs)$
\lstnewenvironment{code}{\lstset{language=Haskell,basicstyle=\small\ttfamily}}{}
$endif$
$if(highlighting-macros)$
$highlighting-macros$
$endif$
$if(tables)$
\usepackage{longtable,booktabs}
\usepackage{caption}
% These lines are needed to make table captions work with longtable:
\makeatletter
\def\fnum@table{\tablename~\thetable}
\makeatother
$endif$
$if(graphics)$
\usepackage{graphicx,grffile}
\makeatletter
\def\maxwidth{\ifdim\Gin@nat@width>\linewidth\linewidth\else\Gin@nat@width\fi}
\def\maxheight{\ifdim\Gin@nat@height>\textheight0.8\textheight\else\Gin@nat@height\fi}
\makeatother
% Scale images if necessary,so that they will not overflow the page
% margins by default,and it is still possible to overwrite the defaults
% using explicit options in \includegraphics[width,height,...]{}
\setkeys{Gin}{width=\maxwidth,height=\maxheight,keepaspectratio}
$endif$
% Prevent slide breaks in the middle of a paragraph:
\widowpenalties 1 10000
\raggedbottom
% comment out the breaking section of the standard template
%$if(section-titles)$
%\AtBeginPart{
% \let\insertpartnumber\relax
% \let\partname\relax
% \frame{\partpage}
%}
%\AtBeginSection{
% \ifbibliography
% \else
% \let\insertsectionnumber\relax
% \let\sectionname\relax
% \frame{\sectionpage}
% \fi
%}
%\AtBeginSubsection{
% \let\insertsubsectionnumber\relax
% \let\subsectionname\relax
% \frame{\subsectionpage}
%}
%$endif$
$if(links-as-notes)$
% Make links footnotes instead of hotlinks:
\renewcommand{\href}[2]{#2\footnote{\url{#1}}}
$endif$
$if(strikeout)$
\usepackage[normalem]{ulem}
% avoid problems with \sout in headers with hyperref:
\pdfstringdefDisableCommands{\renewcommand{\sout}{}}
$endif$
\setlength{\parindent}{0pt}
\setlength{\parskip}{6pt plus 2pt minus 1pt}
\setlength{\emergencystretch}{3em} % prevent overfull lines
\providecommand{\tightlist}{%
\setlength{\itemsep}{0pt}\setlength{\parskip}{0pt}}
$if(numbersections)$
\setcounter{secnumdepth}{$if(secnumdepth)$$secnumdepth$$else$5$endif$}
$else$
\setcounter{secnumdepth}{0}
$endif$
$if(dir)$
\ifxetex
% load bidi as late as possible as it modifies e.g. graphicx
$if(latex-dir-rtl)$
\usepackage[RTLdocument]{bidi}
$else$
\usepackage{bidi}
$endif$
\fi
\ifnum 0\ifxetex 1\fi\ifluatex 1\fi=0 % if pdftex
\TeXXeTstate=1
\newcommand{\RL}[1]{\beginR #1\endR}
\newcommand{\LR}[1]{\beginL #1\endL}
\newenvironment{RTL}{\beginR}{\endR}
\newenvironment{LTR}{\beginL}{\endL}
\fi
$endif$
$for(header-includes)$
$header-includes$
$endfor$
$if(title)$
\title{$title$}
$endif$
$if(subtitle)$
\subtitle{$subtitle$}
$endif$
$if(author)$
\author{$for(author)$$author$$sep$ \and $endfor$}
$endif$
$if(institute)$
\institute{$for(institute)$$institute$$sep$ \and $endfor$}
$endif$
\date{$date$}
$if(titlegraphic)$
\titlegraphic{\includegraphics{$titlegraphic$}}
$endif$
$if(logo)$
\logo{\includegraphics{$logo$}}
$endif$
\begin{document}
$if(title)$
\frame{\titlepage}
$endif$
$for(include-before)$
$include-before$
$endfor$
$if(toc)$
\begin{frame}
\tableofcontents[hideallsubsections]
\end{frame}
$endif$
$body$
$if(natbib)$
$if(bibliography)$
$if(biblio-title)$
$if(book-class)$
\renewcommand\bibname{$biblio-title$}
$else$
\renewcommand\refname{$biblio-title$}
$endif$
$endif$
\begin{frame}[allowframebreaks]{$biblio-title$}
\bibliographytrue
\bibliography{$for(bibliography)$$bibliography$$sep$,$endfor$}
\end{frame}
$endif$
$endif$
$if(biblatex)$
\begin{frame}[allowframebreaks]{$biblio-title$}
\bibliographytrue
\printbibliography[heading=none]
\end{frame}
$endif$
$for(include-after)$
$include-after$
$endfor$
\end{document}
主Rmd文件如下：
my_rmarkdown.Rmd
---
output:
beamer_presentation:
theme: Madrid
includes:
in_header: my_header.tex
template: my_template.tex
---
### Slide 1
\lipsum[1]
### Slide 2
\lipsum[2]
\appendix
\setcounter{framenumber}{2}
### First extension slide
\setcounter{framenumber}{1}
\lipsum[3]
### Second Extension Slide
\lipsum[4]
但是，如果我稍微更改主Rmd文件，则会得到奇怪的页数，而且我不知道如何使用\setcounter{framenumber}{..}来解决它。
具体来说，如果我在主体部分添加另一个幻灯片3，如下所示：
---
output:
beamer_presentation:
theme: Madrid
includes:
in_header: my_header.tex
template: my_template.tex
---
### Slide 1
\lipsum[1]
### Slide 2
\lipsum[2]
### Slide 3
\lipsum[3]
\appendix
\setcounter{framenumber}{3}
### First extension slide
\setcounter{framenumber}{1}
\lipsum[3]
### Second Extension Slide
\lipsum[4]
我得到幻灯片计数1 / 2、2 / 2、3 / 2、1 / 2、2 / 2。如果将第二个计数器设置为\setcounter{framenumber}{2}，则会得到：1 / 3、2 / 3、3 / 3、2 / 3、3 / 3。由于主幻灯片至少正确，因此效果会稍好一些。但是我仍然想知道是否存在一种使主幻灯片编号和附录幻灯片编号正常工作的方法？通常，每当附录幻灯片的数量和主幻灯片的数量不相等时，我只能设法正确地计算出两者之一。
解决方法
-
如果投影仪版本足够新，则不需要
appendixnumberbeamer软件包，而可以使用内置选项\setbeamertemplate{page number in head/foot}[appendixframenumber] -
从模板中删除
ignorenonframetext -
并将阑尾放在框架之间：
--- output: beamer_presentation: theme: Madrid includes: in_header: my_header.tex template: my_template.tex keep_tex: true --- ### Slide 1 \lipsum[1] ### Slide 2 \lipsum[2] ### Slide 3 \lipsum[3] ``` {=latex} \end{frame} \appendix \begin{frame}{First extension slide} ``` \lipsum[3] ### Second Extension Slide \lipsum[4]
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
