R 从嵌套列表中删除负值

我有以下清单：

 [[1]]
  [1] 0  -1  -2  -3  -4 
 [[2]] 
  [1] 2   1   0  -1  -2
 [[3]]
  [1] 2   3   4   5   6

我想从上面的列表中删除负值。 我正在使用r中的以下代码进行尝试

  x[ x > 0 ]

---

但是，它不会删除负值。

我们可以在每个列表元素上使用

lappy

，只选择那些大于或等于0的值

lapply(lst, function(x) x[x >= 0])

#$l1
#[1] 0

#$l2
#[1] 2 1 0

#$l3
#[1] 2 3 4 5 6

数据

lst = list(l1 = c(0,-1,-2,-3,-4),l2 = c(2,1,0,-1,-2), l3 = c(2,3,4,5,6))

---

我们可以对每个列表元素使用

lappy

，只选择那些大于或等于0的值

lapply(lst, function(x) x[x >= 0])

#$l1
#[1] 0

#$l2
#[1] 2 1 0

#$l3
#[1] 2 3 4 5 6

数据

lst = list(l1 = c(0,-1,-2,-3,-4),l2 = c(2,1,0,-1,-2), l3 = c(2,3,4,5,6))

---

该列表看起来不是嵌套的。而且

x>0

也删除了0（不仅仅是负片）。该列表看起来不是嵌套的。而且

x>0

也会删除0（不仅仅是负片）。