我正在尝试这个：
class_Of_Objects<-cbind(ls(),data.frame(sapply(ls(), function(x){class(get (x))})))
colnames(class_Of_Objects)<-c("variable","class_type")
但我还想在数据框（class_Of_Objects）中添加额外的列，它可以给我每个对象内部的内容。我正在尝试这个。
for ( obj in ls() ) { print(get(obj)) }
但由于每个对象的行数不同，因此它不与原始数据帧合并，无论如何我可以有三个colum数据帧，如下所示：
Variable class_type content