哪些 R 函数不适合编程使用？

Question

像browser 这样的一些函数只有在交互使用时才有意义。

人们普遍认为subset 函数should only be used interactively。

同样，sapply 不适合编程使用，因为它不会简化零长度输入的结果。

我正在尝试列出仅不适合编程使用的函数的详尽列表。

计划是做一个包检查工具，看看这些函数是否被调用并给出警告。

还有其他功能，如 file.choose 和 readline 需要交互性，但这些可以包含在包中，因为最终使用将是交互性的。对于这个用例，我不太关心这些，但可以随意将它们添加到列表中。

我错过了哪些功能？

Answer 1

（随意编辑。）

以下函数应该小心处理（这并不一定意味着它们不适合编程）：

• 根据输入，其输出没有一致的输出类的函数：sapply、mapply（默认）

• 内部行为因输入长度而异的函数：sample、seq

• 在环境中评估其某些参数的函数：$、subset、with、within、transform。

• 违背正常环境使用的函数：attach、detach、assign、<<-

• 允许部分匹配的函数：$

• 仅在交互使用中有意义的函数：browser、recover、debug、debugonce、edit、fix、menu、select.list

• 与用户输入一起使用时可能构成威胁（病毒）的函数：source、eval(parse(text=...))、system。

此外，在某种程度上，每个函数都会生成警告而不是错误。我建议使用options(warn = 2) 将所有警告转化为编程应用程序中的错误。然后可以通过suppressWarnings 或try 允许特定情况。

Answer 2

这是对发布者问题后评论的回答。此函数输入一个函数并返回找到的错误函数及其行号。它可能会产生误报，但它们只是警告，因此看起来并不算太糟糕。修改bad以适应。

badLines <- function(func) {
    bad <- c("sapply", "subset", "attach")
    regex <- paste0("\\b", bad, "\\b")
    result <- sort(unlist(sapply(regex, FUN = grep, body(func), simplify = FALSE)))
    setNames(result, gsub("\\b", "", names(result), fixed = TRUE))
}
badLines(badLines)

## sapply1  subset  attach sapply2 
##       2       2       2       4