Rscript不能正确推断继承。

Question

我使用Morgan从this answer提取的大部分代码编写了这个简单的脚本：

#!/usr/bin/Rscript
# sript name: testclass.R
# library(methods)
.A1 <- setClass("A1", representation(a="integer"))
.B1 <- setClass("B1", contains="A1", representation(b="integer"))

A1 <- function(a = integer(), ...) {
    .A1(a=a, ...)
}

B1  <- function(a=integer(), b=integer(), ...) {
    .B1(A1(a), b=b, ...)
}

b <- .B1()

inherits(b, "A1")

如果我使用Rscript运行脚本，它会产生以下错误：

user@localhost ~/test
  % chmod +x testclass.R                 

user@localhost ~/test
  % ./testclass.R                        
Error: could not find function "setClass"
Execution halted

如果我取消了library(methods)行的注释并再次运行，它就会工作：

user@localhost ~/test
  % ./testclass.R                        
[1] TRUE

或者，如果我这样运行，我也不需要手动导入methods：

R --vanilla <testclass.R

因此，我的问题是，发生了什么，如何避免手动导入methods并成功地使用Rscript运行？

R版本：

 Rscript --version  
R scripting front-end version 3.3.1 (2016-06-21)
 R --version                                              
R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

更新

作为一种解决办法，在等待更多信息的回答时:我可以使用来自littler包的littler，而不是/usr/bin/Rscript，并且错误不会发生。

Answer 1

方法包总是随R一起提供的，但是由于它并不总是需要的，Rscript默认选择不加载它。?Rscript会告诉您这是为了节省启动时间。默认情况下，Rstudio和R加载此库。如果要在要使用Rscript运行的程序中使用来自方法包的函数，那么简单的解决方案是添加行：

library(methods)

在剧本里。当在Rstudio或R中运行时，这并没有什么害处，因为方法包已经在那里加载了。我经常将library(methods)添加到我知道将与Rscript一起运行的所有脚本中。