在R中檢查包對象的類

Question

我想檢查哪些對象是包裝中稱為“數據集”的數據框，如果找到它們，則要檢查條件，例如這些數據框的尺寸是否為248個觀測值和8個變量，然后打印這些對象，這是代碼我已經嘗試過，但是無法獲得輸出。

library(datasets)
lsf.str("package:datasets")

listname <- as.list((ls("package:datasets")))
lst=c()
for(i in listname){
  lst <- is.data.frame(as.name(listname[[i]]))

}

任何幫助將非常感激。

Answer 1

您特別需要的是get函數和Filter函數。

datasets <- as.environment("package:datasets")
dataset_names <- ls(envir = datasets)
filter_func <- function(x){
    y <- get(x, envir = datasets)
    is.data.frame(y) && all(dim(y) == c(248, 8))
}
Filter(filter_func, dataset_names)