将ggplot2图形嵌入Knitr文档：无法找到功能ggplot

debugcn 发表于 Dev

MCP_infiltrator

我正在处理文档，并且同时使用knitr和ggplot2。我对knitrTeX本身并不陌生，因此对我所做的一切不太熟悉。

当我打开RStudio进行工作时，我首先运行以下两个命令：

require("knitr")
require("ggplot2")

然后，我单击“编译PDF”。我有以下代码引发错误：

<<histogram, echo=FALSE, fig.align='center'>>=
summary(los$hosp_svc)
summary(los$Pt_Age)

binsize = diff(range(los$Pt_Age)/30)
ggplot(los, aes(x = Pt_Age)) + 
  geom_histogram(binwidth = binsize, fill = "red", 
                 alpha = 0.315, colour = 'black') +
  theme(panel.grid.major = element_blank(),
        panel.grid.minor = element_blank()) +
  xlab("Patient Age in Years") +
  ylab("Frequency/Count") +
  ggtitle("Histogram of Patient Age")
@

我得到的错误是找不到ggplot函数，这很奇怪，因为如果我只是在控制台中运行上述代码，则图形会生成find，因此我知道该程序包已加载并且可以使用。

有什么想法吗？

谢谢，

本杰明

使用.Rnw文件（或.Rmd文件）时，请确保library在脚本中包括所有调用（请参见下文）。当您按下“编译PDF”按钮时，脚本中的R代码将提交到R的新实例，以防止当前环境中的任何内容破坏结果。这似乎有些奇怪，但对可重复性很有好处。因此，一旦您点击“编译PDF”，就不会忘记未通过脚本显式创建的对象以及未在脚本中显式调用的包。

<<histogram, echo=FALSE, fig.align='center'>>= 
library(ggplot2)
summary(los$hosp_svc) 
summary(los$Pt_Age)

binsize = diff(range(los$Pt_Age)/30) 
ggplot(los, aes(x = Pt_Age)) + 
  geom_histogram(binwidth = binsize, 
                 fill = "red", 
                 alpha = 0.315, 
                 colour = 'black') + 
  theme(panel.grid.major = element_blank(), 
        panel.grid.minor = element_blank()) + 
  xlab("Patient Age in Years") + 
  ylab("Frequency/Count") + 
  ggtitle("Histogram of Patient Age") 
@

本文收集自互联网，转载请注明来源。

如有侵权，请联系[email protected] 删除。