10

有没有办法在采购时在 R 中“检查”或“验证”源代码文件?例如,我在文件“source.R”中有这个函数

MyFunction <- function(x)
{
print(x+y)
}

在采购“source.R”时,我希望看到某种警告:MyFunctions refers to an undefined object Y.

关于如何检查/验证 R 代码的任何提示?

干杯!

4

2 回答 2

10

我使用这样的函数来扫描文件中的所有函数:

critic <- function(file) {

   require(codetools)
   tmp.env <- new.env()
   sys.source(file, envir = tmp.env)
   checkUsageEnv(tmp.env, all = TRUE)

}

假设source.R包含两个写得很糟糕的函数的定义:

MyFunction <- function(x) {
   print(x+y)
}

MyFunction2 <- function(x, z) {
   a <- 10
   x <- x + 1
   print(x)
}

这是输出:

critic("source.R")
# MyFunction: no visible binding for global variable ‘y’
# MyFunction2: local variable ‘a’ assigned but may not be used
# MyFunction2: parameter ‘x’ changed by assignment
# MyFunction2: parameter ‘z’ may not be used
于 2012-08-19T23:33:22.563 回答
5

为此,您可以使用 base R 中的 codetools 包。如果您将代码放在一个包中,它会告诉您:

于 2012-08-19T21:08:43.077 回答