2

我在这里继续我之前的帖子：

Sweave/R/LaTeX 的初学者问题（数字、参考书目）---我的第一个文档

工作代码在此处复制：

\documentclass[a4paper]{article}
\usepackage{Sweave}  %%%%%%
\begin{document}
<<echo=TRUE>>=
x <- rnorm(100)
xm <- mean(x)
xm
@

<<echo=FALSE>>=
x <- rnorm(100)
xm <- mean(x)
xm
@

<<echo=TRUE>>= 
##### Remove all comments from your data file 
test.frame<-read.table(file="apples.d",header=T,sep= "")
names(test.frame)
head(test.frame)
class(test.frame)
@

\begin{figure}[htbp]
\begin{center}
\setkeys{Gin}{width=0.5\textwidth}
<<echo=FALSE,fig=TRUE,width=4,height=4>>=
#### Must tell plot where to get the data from. Could also use test.frame$year
with(test.frame,plot(year,value))
@
\end{center}
\end{figure}
\end{document}

以上运行良好RStudio（最新）和Tinn-R（最新）并生成所需的pdf文档。

问题：

  1. 如果我将上述文件命名为goodex.snw并运行 Sweave，我将获得goodex-004.pdf带有Tinn-R或RStudio作为绘图的 PDF 图像的文件。为什么是尾随004？这可以改变吗？

  2. 可以EPS制作文件吗？Sweave 编译为 PDF 的工具是否仅通过 (PDF)LaTeX 而不是通过传统的 DVI > PS > PDF 路线？

  3. 只需with(test.frame,plot(year,value))在R命令窗口中运行命令即可在 y 轴上生成更多值，即 15000、20000、25000 和 30000。但是在本文顶部我的代码由 Sweave 生成​​的 PDF 文件中，我没有得到所有值在 y 轴上（仅 15000 和 25000）。如何在代码中直接控制绘图的大小，以便出现所有必要的 y 值？

更新：该文件apples.d包含：

#Number of apples I ate
year value
8   12050  #year 2008  
9   15292  #year 2009 
10  23907  #year 2010 
11  33997  #year 2011
4

1 回答 1

3

您的示例不可重现，因为我们没有文件apples.d，所以我们只能猜测情节出错的原因。请参见：

如何制作一个出色的 R 可重现示例？

关于如何制作可重现的示例。

请注意，这Sweave不是Rstudioor的功能Tinn-R，它是一个 R 函数 ( Sweave())，可以从命令行运行或使用 R 可执行文件中的参数运行。这可能有助于了解您是否正在搜索信息。

至于你的问题：

  1. 图的名称总是有形式FILENAME-CHUNKLABEL.pdf或 eps，其中块标签可以设置为 Sweave 块的选项（它是第一个参数）。如果您不设置块名称，则将枚举绘图。
  2. 您可以eps与选项一起使用eps=true。我很确定默认情况下会生成 eps 和 pdf 。至于编译，Sweave 不会自己编译，它会创建一个.tex文件，您可以以任何您想要的方式使用它。在 R 2.14 中有一个选项可以在生成的 .tex 文件上自动运行 pdfLaTeX。Rstudio编译的方式Tinn-R可能是在 Sweave 之后使用 pdfLaTeX 调用。如果您想以不同的方式执行此操作，您可以手动执行此操作。
  3. 如果没有可重现的例子，我们只能猜测。出了什么问题？xlim您可以使用and参数设置情节的限制，ylim但这不应该是这里出了什么问题。

编辑：

用数据回应编辑过的问题。首先只是一个提示。这种提供数据的方式并不是最有用的方式。我们当然可以重现这一点，但如果您以我们可以立即运行的方式提供数据，则会容易得多。例如：

test.frame<-data.frame(year=8:11, value= c(12050,15292,23907,33991))

至于情节，你的意思是y轴上的标签？这可以通过在绘图调用中省略轴并使用axis()函数手动设置它们来更改：

with(test.frame,plot(year,value,axes=FALSE))
axis(1)
axis(2,test.frame$value,las=1)

如果刻度不是一直分布在轴上，这看起来确实有点奇怪。更好的是：

with(test.frame,plot(year,value,axes=FALSE))
axis(1)
axis(2,seq(10000,35000,by=5000),las=1)
于 2011-12-01T08:40:51.380 回答