Question

我正在尝试使用R降价。我在外部文件中获得了我的图形的R代码，我想使用source或read_chunk在R markdown文件中绘制图形来读取我的R代码。我自己无法找到解决方案。

这是我的gist，为方便起见，下面复制了这些内容：

gr.R

ggplot(data = df, aes(x = x, y = y)) + geom_point()

Markdown文件：

```{r data, echo=FALSE}
library("ggplot2")
library("knitr")
df <- data.frame(x = rnorm(100), u = rnorm(100))
df$y <- 1 + df$x + df$u
```


```{r test, echo=FALSE, results='asis'}
read_chunk('gr.R')
```

```{r test2, echo=FALSE, results='asis'}
source('gr.R')
````

Answer 1

您需要明确打印图：

gr.R

plt <- ggplot(data = df, aes(x = x, y = y)) + geom_point()

rmarkdown

```{r test2, echo=FALSE, results='asis'}
source('gr.R')
print(plt)
````

如何使用R markdown从外部文件中绘制图形？

1 个答案: