43 lines
1.2 KiB
TeX
43 lines
1.2 KiB
TeX
\NeedsTeXFormat{LaTeX2e}
|
|
\ProvidesPackage{Sweave}{}
|
|
|
|
\RequirePackage{ifthen}
|
|
\newboolean{Sweave@gin}
|
|
\setboolean{Sweave@gin}{true}
|
|
\newboolean{Sweave@ae}
|
|
\setboolean{Sweave@ae}{true}
|
|
|
|
\DeclareOption{nogin}{\setboolean{Sweave@gin}{false}}
|
|
\DeclareOption{noae}{\setboolean{Sweave@ae}{false}}
|
|
\ProcessOptions
|
|
|
|
\RequirePackage{graphicx,fancyvrb}
|
|
\IfFileExists{upquote.sty}{\RequirePackage{upquote}}{}
|
|
|
|
\ifthenelse{\boolean{Sweave@gin}}{\setkeys{Gin}{width=0.8\textwidth}}{}%
|
|
\ifthenelse{\boolean{Sweave@ae}}{%
|
|
\RequirePackage[T1]{fontenc}
|
|
\RequirePackage{ae}
|
|
}{}%
|
|
|
|
\DefineVerbatimEnvironment{Sinput}{Verbatim}{fontshape=sl}
|
|
\DefineVerbatimEnvironment{Soutput}{Verbatim}{}
|
|
\DefineVerbatimEnvironment{Scode}{Verbatim}{fontshape=sl}
|
|
|
|
\ifdefined\Schunk%
|
|
\message{\string Environment Schunk is already defined, stay with former definition}%
|
|
\else
|
|
\newenvironment{Schunk}{}{}%
|
|
\fi
|
|
|
|
\newcommand{\Sconcordance}[1]{%
|
|
\ifx\pdfoutput\undefined%
|
|
\csname newcount\endcsname\pdfoutput\fi%
|
|
\ifcase\pdfoutput\special{#1}%
|
|
\else%
|
|
\begingroup%
|
|
\pdfcompresslevel=0%
|
|
\immediate\pdfobj stream{#1}%
|
|
\pdfcatalog{/SweaveConcordance \the\pdflastobj\space 0 R}%
|
|
\endgroup%
|
|
\fi}
|