R中的列表列表：仅显示所有整数列

Question

嗨 Stack Overflow 社区，

我已经投入了几个小时，但没有找到答案。我在 R 中有一个包含 200 个子列表的 list。每个子列表都包含一个字符列和一个名为 FREQUENCY 的整数列。我的目标是只显示整数列。我已经使用 list 函数和前两个子列表手动测试了该函数并且它有效：

mydata <- list(Name1[[1]]$FREQUENCY, Name1[[2]]FREQUENCY)

现在回答我的问题：如何用一个命令获取所有 200 个子列表。在此过程中我需要 list 函数，因为我必须在下一步中对每个 FREQUENCY 子列表求和：

lapply(mydata, sum)

谢谢大家！

Answer 1

这是一个基本的解决方案（如果我理解正确的话）：

your_list <- list(data.frame(a="hello",b=1),
                  data.frame(c="world",d=1))
# [[1]]
#       a b
# 1 hello 1
# 
# [[2]]
#       c d
# 1 world 1

lapply(your_list,function(x) x[,sapply(x,is.numeric),drop=FALSE])
# [[1]]
#   b
# 1 1
# 
# [[2]]
#   d
# 1 1

R中的列表列表：仅显示所有整数列

List of lists in R: Show only all integer columns

r

list

integer

sublist