Question

我有许多列表：比如list1，list2，....和list 100以及function myfun。有了这些，我可以运行Map(myfun,list1,list2,...,list100)。但是，我想避免编写所有列表编号，所以我尝试了Map(myfun,mget(paste0("list",1:100)))。但是，这没有用。下面提供了一个只有三个列表的可重现示例：

x1<-list(1:10,10:20)
x2<-list(0:9,11:20)
x3<-list(100:109,41:50)

Map(rbind,x1,x2,x3) #ok
mget(paste0("x",1:3)) #ok
Map(rbind,mget(paste0("x",1:3))) #ok but the unexpected output

Map(rbind,mget(paste0("x",1:3)))
$x1
     [,1]       [,2]      
[1,] Integer,10 Integer,10

$x2
     [,1]       [,2]      
[1,] Integer,10 Integer,10

$x3
     [,1]       [,2]      
[1,] Integer,10 Integer,10

Answer 1

mget返回列表列表（请参阅“Value”下的?mget），而不是将每个列表解析为Map中的单独向量。处理它的一种可能方法是将Reduce列表返回到其原始元素，然后rbind它们，例如

Reduce(function(...) Map(rbind, ...), mget(paste0("x", 1:3)))

使用带有mget的Map会产生意外的输出

1 个答案: