r - 源()不起作用 ("node stack overflow")

Question

我的 R 脚本中有以下几行代码，名为 assign1.R :

(u <- c(1, 1, 0, 1, 0)) # a)
u[3] # b)
ones_u <- which(u == 1) # c)
ones_u
source("assign1.R")

只有， source()功能不起作用。 R 向我显示以下错误消息:

Error in match(x, table, nomatch = 0L) : node stack overflow
Error during wrapup: node stack overflow

问题是什么？

Answer 1

我没有得到完全相同的错误，但我能够通过一个简单的例子得到非常相似的东西:

writeLines("source('badsource.R')",con="badsource.R")
source("badsource.R")
## Error in guess(ll) : node stack overflow

正如上述评论之一所述，您正在采购的文件正试图 source()本身。

这就是您在 R 中测试这种可能性的方式，而不仅仅是在文本编辑器中打开文件(这是一种更明智的方法):

grepl("source('badsource.R')",readLines("badsource.R"),fixed=TRUE)  ## TRUE

(显然你应该在这里填写你的作业文件的名称......)

感觉你应该自己注意到这一点，但我还是回答了，因为问题是 delightfully recursive ...