r - 如何从单个项目列表中删除未命名的元素？

Question

这听起来可能是一个非常初学者的问题，也可能是一个非常基本而又愚蠢的问题，但是在某种程度上，我却头痛不已。
假设我有一个物品 list

v <- as.list("1, 2, 3,")

v
[[1]]
[1] "1, 2, 3,"

现在我想将其所有项目拆分为单独的项目

v2 <- lapply(str_split(v, pattern = ","), trimws)
v2
[[1]]
[1] "1" "2" "3" "" 

现在，我想从此列表的第一项也是唯一一项中删除此 ""，而不使用 []吗？

Answer 1

使用nzchar。

lapply(v2, function(x) x[nzchar(x)])
# [[1]]
# [1] "1" "2" "3"

或者首先使用 base::strsplit，它看起来似乎更复杂。

lapply(strsplit(v[[1]], ","), trimws)
# [[1]]
# [1] "1" "2" "3"