r - 错误: 'shuffle' is not an exported object from 'namespace:merTools'

Question

我正在尝试按行对数据集进行洗牌，并且我在 merTools 包中找到了函数 shuffle。代码如下所示:

data = merTools::shuffle(my_data)  

但我仍然有这个错误:

Error: 'shuffle' is not an exported object from 'namespace:merTools'

即使我尝试加载包:

library(merTools)
data = shuffle(my_data)

它给出了这个错误:

Error in shuffle(my_data) : could not find function "shuffle"

但我可以在帮助中看到它存在。

感谢您的帮助。

Answer 1

可能是未导出的函数

getAnywhere("shuffle")$where
[1] "namespace:merTools"

不同的是，当有导出函数时，它也会显示包

getAnywhere("mutate")$where
#[1] "package:dplyr"   "namespace:plyr"  "namespace:dplyr"

因此，我们可以从命名空间获取函数并应用于数据

out <- getFromNamespace("shuffle", "merTools")(mtcars)
head(out, 5)
#                mpg cyl  disp  hp drat   wt qsec vs am gear carb
#Merc 240D      24.4   4 146.7  62 3.69 3.19 20.0  1  0    4    2
#Ferrari Dino   19.7   6 145.0 175 3.62 2.77 15.5  0  1    5    6
#Ford Pantera L 15.8   8 351.0 264 4.22 3.17 14.5  0  1    5    4
#Porsche 914-2  26.0   4 120.3  91 4.43 2.14 16.7  0  1    5    2
#Merc 280C      17.8   6 167.6 123 3.92 3.44 18.9  1  0    4    4

或者正如@RuiBarradas在评论中建议的那样，为了重复使用，最好将导出的函数分配给标识符

shuffle <- getFromNamespace("shuffle", "merTools")

然后直接应用

shuffle(mtcars)