如何通过调用命名空间中没有该方法的函数来找到未附加包中的非导入方法？

R 命名空间充当其关联包中所有函数的直接环境。换句话说，当函数bar()从包装中foo调用另一个函数，R 求值器首先在中搜索另一个函数<environment: namespace:foo>，然后在"imports.foo", <environment: namespace:base>, <environment: R_GlobalEnv>，依此类推，在输入返回的搜索列表中search().

命名空间的一个好处是它们可以使包表现得像更好的公民：未导出的函数<environment: namespace:foo>和功能在imports:foo仅适用于： (a) 中的函数foo; (b) 导入到其他包foo;或（c）通过完全限定的函数调用，例如foo:::bar().

或者直到最近我也是这么想的......

行为

最近的这个问题 https://stackoverflow.com/questions/10939516/data-frame-transformation-gives-different-results-when-same-code-is-run-before-a/10940237#10940237强调了一种情况，其中隐藏在其包的命名空间中的函数仍然通过调用看似不相关的函数找到：

group <- c("C","F","D","B","A","E")
num <- c(12,11,7,7,2,1)
data <- data.frame(group,num)

## Evaluated **before** attaching 'gmodels' package
T1 <- transform(data, group = reorder(group,-num))

## Evaluated **after** attaching 'gmodels
library(gmodels)
T2 <- transform(data, group = reorder(group,-num))

identical(T1, T2) 
# [1] FALSE

其直接原因

@Andrie 回答了最初的问题，指出gmodels从包中导入gdata，其中包括一个函数reorder.factor被分派到第二次调用内transform(). T1不同于T2因为第一个是通过以下方式计算的stats:::reorder.default()第二个由gdata:::reorder.factor().

我的问题

在上面的调用中是如何实现的transform(data, group=reorder(...))，调度机制reorder找到然后分派到gdata:::reorder.factor()?

（答案应包括对范围规则的解释，这些规则是由涉及函数的调用引起的stats and base封装到一个看似隐藏得很好的方法gdata.)

更多可能有用的细节

1. Neither gdata:::reorder.factor，也不gdata整个包是由显式导入的gmodels。这里有import*中的指令gmodels' 命名空间 file:

   importFrom(MASS, ginv)
   importFrom(gdata, frameApply)
   importFrom(gdata, nobs)
   

2. 没有方法reorder() or transform() in <environment: namespace:gmodels>，也不在"imports:gmodels":

   ls(getNamespace("gmodels"))
   ls(parent.env(getNamespace("gmodels")))
   

3. 分离gmodels不恢复reorder()的行为：gdata:::reorder.factor()仍然被派遣：

   detach("package:gmodels")
   T3 <- transform(data, group=reorder(group,-num))
   identical(T3, T2)
   # [1] TRUE
   

4. reorder.factor()不存储在基础环境中的S3方法列表中：

   grep("reorder", ls(.__S3MethodsTable__.))
   # integer(0)
   

过去几天的 R 聊天线程包含了一些额外的想法。感谢 Andrie、Brian Diggs 和 Gavin Simpson（以及其他人）可以随意编辑或添加可能的提示。这个问题的详细信息。

我不确定我是否正确理解你的问题，但要点是group是字符向量，而data$group是因素。

贴上后gmodels，呼吁reorder(factor) calls gdata:::reorder.factor. so, reorder(factor(group))称之为。

In transform，该函数在第一个参数的环境中计算，所以在T2 <- transform(data, group = reorder(group,-num)), group是因素。

UPDATED

library将导入包附加到加载的命名空间中。

> loadedNamespaces()
 [1] "RCurl"     "base"      "datasets"  "devtools"  "grDevices" "graphics"  "methods"  
 [8] "stats"     "tools"     "utils"    
> library(gmodels) # here, namespace:gdata is loaded
> loadedNamespaces()
 [1] "MASS"      "RCurl"     "base"      "datasets"  "devtools"  "gdata"     "gmodels"  
 [8] "grDevices" "graphics"  "gtools"    "methods"   "stats"     "tools"     "utils"    

以防万一，reorder通用存在于namespace:stats:

> r <- ls(.__S3MethodsTable__., envir = asNamespace("stats"))
> r[grep("reorder", r)]
[1] "reorder"            "reorder.default"    "reorder.dendrogram"

并了解更多详情

的召唤reorder将在两个环境中搜索 S3generics：

see ?UseMethod

首先在调用泛型函数的环境中，然后在定义泛型的环境（通常是名称空间）的注册数据库中。

then, loadNamespace将 S3 函数注册到命名空间。

所以，就你而言，library(gmodels) -> loadNamespace(gdata) -> registerS3Methods(gdata).

之后，您可以通过以下方式找到它：

> methods(reorder)
[1] reorder.default*    reorder.dendrogram* reorder.factor*    

   Non-visible functions are asterisked

然而，作为reorder.factor未附加在您的搜索路径中，您无法直接访问它：

> reorder.factor
Error: object 'reorder.factor' not found

大概这就是整个场景。