R 从命名空间选择性导入

Question

如果我正在编写 R 包，我可以使用 importFrom(plyr,colwise)有选择地导入 colwise()函数进入我的命名空间。如果我在命令行以交互方式运行代码，是否有类似的方法？

一个粗略的解决方案是加载一个包但不导入任何东西，然后写一堆 foo <- pkg::foo手动导入的分配，但我看不到如何在不导入的情况下加载。

Answer 1

如果您发现自己反复想要使用包中相同的几个函数，最简洁的解决方案可能是创建并加载一个仅包含这些函数的包。

## Set up package source directory
dummy <- ""  ## Need one object with which to initiate package skeleton
package.skeleton("dummy", "dummy")

## Clean up the man subdirectory
lapply(dir("dummy/man", full.names=TRUE), file.remove)

## Use NAMESPACE to pull in the functions you want
funs <- c("aaply", "ddply", "adply")
cat(paste0("importFrom(plyr, ", paste(funs, collapse=", "), ")"),
    paste0("export(", paste(funs, collapse=", "), ")"),
    file = "dummy/NAMESPACE",
    sep = "\n")

## install the package
library(devtools)
install("dummy")

## Confirm that it worked
library(dummy)
ls(2)
# [1] "aaply" "adply" "ddply"
environment(aaply)
# <environment: namespace:plyr>
aaply(matrix(1:9, ncol=3), 2, mean)
# 1 2 3 
# 2 5 8