Question

我有这个简单的脚本，其中大部分代码都是由Martin 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)

更新

在等待更具信息性的答案时作为一种解决方法：我可以使用/usr/bin/r包中的littler代替/usr/bin/Rscript，但错误不会发生。

Answer 1

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

library(methods)

脚本中的

。这在通过Rstudio或R运行时没有坏处，因为方法包已经在那里加载了。我经常将library(methods)添加到我知道将使用Rscript运行的所有脚本中。

Rscript没有正确地推断继承

1 个答案: