使用 do.call 从 RC/S4 对象列表中获取信息
Use do.call to get information out of a list of RC/S4 objects
我有一个定义的引用 class 和一个列表:
RCclass<-setRefClass("RCclass",field=list(info="character"))
A<-RCclass$new(info="a")
B<-RCclass$new(info="b")
testList<-list(A,B)
do.call(function(x){paste0(x$info)},testList)
do.call 函数看起来不太正确,它没有给我预期的字符串 "ab"。但是我不确定如何实现这一目标。请分享您的意见;谢谢!
我找到了解决方案:
Reduce("paste0",(lapply(testList,FUN=function(x)x$info)))
我有一个定义的引用 class 和一个列表:
RCclass<-setRefClass("RCclass",field=list(info="character"))
A<-RCclass$new(info="a")
B<-RCclass$new(info="b")
testList<-list(A,B)
do.call(function(x){paste0(x$info)},testList)
do.call 函数看起来不太正确,它没有给我预期的字符串 "ab"。但是我不确定如何实现这一目标。请分享您的意见;谢谢!
我找到了解决方案:
Reduce("paste0",(lapply(testList,FUN=function(x)x$info)))