r - 从R中的列表中筛选值

我想计算一个命名数字列表的平均值。我首先要删除numeric(0)值。另外，我想检索列表中的哪些元素包含numeric(0)值。

这是一个示例，值如何显示：

>r["gg",]

$`01_1_er`
   gg
0.5176445

$`02_1_er`
   gg
0.4990959

$`03_1_er`
   gg
0.5691489

$`22_1_er`
numeric(0)

$`23_1_er`
numeric(0)

$`25_1_er`
  gg
0.386304

这是str的结果：

> str(r["gg",])
List of 6
 $ 01_1_er: Named num 0.518
  ..- attr(*, "names")= chr "gg"
 $ 02_1_er: Named num 0.499
  ..- attr(*, "names")= chr "gg"
 $ 03_1_er: Named num 0.569
  ..- attr(*, "names")= chr "gg"
 $ 22_1_er: num(0)
 $ 23_1_er: num(0)
 $ 25_1_er: Named num 0.386
  ..- attr(*, "names")= chr "gg"

有人可以帮忙吗？

最佳答案

## Example list

l <- list(n1=numeric(0), n2="foo", n3=numeric(0), n4=1:5)

## Filter out elements with length 0

l[lapply(l, length) > 0]


$n2
[1] "foo"

$n4
[1] 1 2 3 4 5


## Get names of elements with length 0

names(l)[lapply(l, length) == 0]

[1] "n1" "n3"

关于r - 从R中的列表中筛选值，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/14771029/