代码如下(示例):
apply(as.data.frame(ls()),1,function(str){cat(str,":",eval(parse(text=paste0("object.size(",str,")"))),'\n')})
代码如下(示例):
apply(as.data.frame(ls()),1,function(str){cat(str,":",eval(parse(text=paste0("object.size(",str,")"))),'\n')})