在全局环境中循环对象[重复]答案

【问题标题】：Loop over objects in global environment [duplicate]在全局环境中循环对象[重复]
【发布时间】：2018-12-23 09:41:03
【问题描述】：

我对 R 很陌生，并试图为一个简单的任务编写一个循环或简洁的代码：检查 R 中我的全局环境中所有当前对象的类。

class(mydata)
#[1] "data.frame"
class(mylist)
#[1] "list"
class(mymatrix)
#[1] "matrix"
...

以下代码有效，但是如果我有很多对象并且不想输入所有名称怎么办。

dflist <- list(mydata, mylist, mymatrix)
lapply(dflist,class)

我尝试了以下方法，但都没有奏效。

 #1
for (i in ls()){
  class(i)
}

 #2
for (i in ls()){
  lapply(i,class)
}

有什么解决办法吗？谢谢。

【问题讨论】：

【解决方案1】：

您可以使用mget，它返回“一个命名的对象列表”。函数的第一个参数应该是对象名称的字符向量，这是ls() 返回的内容。

lapply(mget(ls()), class)
#$mydata
#[1] "data.frame"
# 
#$mylist
#[1] "list"
#
#$mymatrix
#[1] "matrix"

【讨论】：

【解决方案2】：

试试eapply:

eapply(.GlobalEnv, class)

【讨论】：

【解决方案3】：

使用sapply：

sapply(ls()[sapply(ls(), function(x) any(class(get(x)) %in% c("data.frame", "matrix", "list")))], function(x) class(get(x)))

【讨论】：