在swave/R中计算表达式之前,是否可以包含Sexpr? 我正在写一个SWOWAVE文档,我想包括一个小部分,详细介绍了R和包版本、TopFrrm和TI评估DoCuthTM的时间,但是,我想把它放在文档的中间。p>
我使用了一个\Sexpr{appeased}来完成这项工作(这不起作用),但是我想如果我将代码打印appeased放在一个块中,并在最后进行计算,那么我可以在中途包含该块,这也会失败 我的文档看起来像这样在swave/R中计算表达式之前,是否可以包含Sexpr? 我正在写一个SWOWAVE文档,我想包括一个小部分,详细介绍了R和包版本、TopFrrm和TI评估DoCuthTM的时间,但是,我想把它放在文档的中间。p>,r,latex,sweave,R,Latex,Sweave,我使用了一个\Sexpr{appeased}来完成这项工作(这不起作用),但是我想如果我将代码打印appeased放在一个块中,并在最后进行计算,那么我可以在中途包含该块,这也会失败 我的文档看起来像这样 % \documentclass[a4paper]{article} \usepackage[OT1]{fontenc} \usepackage{longtable} \usepackage{geometry} \usepackage{Sweave} \geometry{left=1.25i
%
\documentclass[a4paper]{article}
\usepackage[OT1]{fontenc}
\usepackage{longtable}
\usepackage{geometry}
\usepackage{Sweave}
\geometry{left=1.25in, right=1.25in, top=1in, bottom=1in}
\begin{document}
<<label=start, echo=FALSE, include=FALSE>>=
startt<-proc.time()[3]
@
Text and Sweave Code in here
%
This document was created on \today, with \Sexpr{print(version$version.string)} running
on a \Sexpr{print(version$platform)} platform. It took approx sec to process.
<<>>=
<<elapsed>>
@
More text and Sweave code in here
<<label=bye, include=FALSE, echo=FALSE>>=
odbcCloseAll()
endt<-proc.time()[3]
elapsedtime<-as.numeric(endt-startt)
@
<<label=elapsed, include=FALSE, echo=FALSE>>=
print(elapsedtime)
@
\end{document}
%
\documentclass[a4paper]{article}
\usepackage[OT1]{fontenc}
\usepackage{longtable}
\usepackage{geometry}
\usepackage{swave}
\几何图形{左=1.25in,右=1.25in,上=1in,下=1in}
\开始{document}
=
startt这对我来说很好:
\documentclass{article}
\usepackage{Sweave}
\begin{document}
<<label=start, echo=FALSE, include=FALSE>>=
startt<-proc.time()[3]
@
Text and Sweave Code in here
This document was created on \today, with
\Sexpr{print(version$version.string)}.
<<results=hide,echo=FALSE>>=
Sys.sleep(2) # instead of real work
@
More text and Sweave code in here
<<label=bye, include=FALSE, echo=FALSE>>=
endt<-proc.time()[3]
elapsedtime<-as.numeric(endt-startt)
@
It took approx \Sexpr{elapsedtime} seconds to process.
\end{document}
\documentclass{article}
\usepackage{swave}
\开始{document}
=
startt顺便说一句,您通常不需要打印来计算变量R
\Sexpr{version$version.string}
也可以很好地工作德克的答案几乎完美,但仍然不能让你把答案放在文档的一半。我很沮丧地认为它应该工作,但意识到我的代码是在每次运行开始时打开时间文件(并清空它),然后将空结果写入我的文档,然后在最后将答案放入时间文件
我最终做了一些类似的事情,但最后使用R只打开并写入文件,效果非常好
\documentclass[a4paper]{article}
\usepackage[OT1]{fontenc}
\usepackage{longtable}
\usepackage{geometry}
\usepackage{Sweave}
\geometry{left=1.25in, right=1.25in, top=1in, bottom=1in}
\begin{document}
<<label=start, echo=FALSE, include=FALSE>>=
startt<-proc.time()[3]
@
Text and Sweave Code in here
%
This document was created on \today, with \Sexpr{print(version$version.string)} running
on a \Sexpr{print(version$platform)} platform. It took approx \input{time}
sec to process.
More text and Sweave code in here
<<label=bye, include=FALSE, echo=FALSE>>=
odbcCloseAll()
endt<-proc.time()[3]
elapsedtime<-as.numeric(endt-startt)
@
<<label=elapsed, include=FALSE, echo=FALSE>>=
fileConn<-file("time.tex", "wt")
writeLines(as.character(elapsedtime), fileConn)
close(fileConn)
@
\end{document}
\documentclass[a4paper]{article}
\usepackage[OT1]{fontenc}
\usepackage{longtable}
\usepackage{geometry}
\usepackage{swave}
\几何图形{左=1.25in,右=1.25in,上=1in,下=1in}
\开始{document}
=
斯塔特