R：将字符串拆分为向量并删除空字符串

Question

我想采用以下形式的字符串，并使其成为字符串向量。下面的操作不起作用，我无法按照文档来解决:

params <- "-item1-map-item2-"
param_list <- as.list(strsplit(params, "-")[1])
print(param_list[1])
[[1]]
[1] ""      "item1" "map"   "item2"

开头有一个烦人的空字符串。我试着用

param_list <- string::stri_remove_empty_na(param_list)

但是会抛出错误:

> Warning message: In stri_enc_toutf8(x) : argument is not an atomic
> vector; coercing

另一个建议:

param_list <- param_list[nzchar(param_list) & complete.cases(param_list)]
print(param_list[1])
[[1]]
[1] ""      "item1" "map"   "item2"

但是没有改变…谁能给点光照一下吗?

Answer 1

Try

lapply(param_list, function(x) {x[x != ""]})
[[1]]
[1] "item1" "map"   "item2"