R降价来源R代码似乎不起作用

Question

这看似简单，但我无法理解为什么它不起作用...... 我有一个Rmarkdown文件（test.Rmd），我在其中获取一个R文件（test1.R），源文件中的代码似乎无法访问Rmarkdown文件中的对象 - 为什么？< / p>

test.Rmd：

的内容

---
title: "Test"
runtime: shiny
output: html_document
---
```{r echo=FALSE,results='asis',message=FALSE}
library(data.table)
x<-data.table(a=1,b=2)
source("test1.R")
{knitr::kable(x1)}
``` 

test.R

的内容

x1<-x

运行文档时出错：

Error : Object 'x' not found

为什么源代码命令无法访问调用范围内的对象？

Answer 1

我相信你需要

source("test1.R",local=TRUE)