lapply 没有遍历 R 中的列表
lapply not iterating through list in R
我有一个字符串列表,其中一些字符串有重复。例如:
[[1]]
[1] "gr gal gr gal"
[[2]]
[1] "gr gal"
[[3]]
[1] "gr gal ir ol"
[[4]]
[1] "gr gal gr gal"
[[5]]
[1] "gr gal"
我想要的输出是:
[[1]]
[1] "gr gal"
[[2]]
[1] "gr gal"
[[3]]
[1] "gr gal ir ol"
[[4]]
[1] "gr gal"
[[5]]
[1] "gr gal"
从字符串中删除重复的位置。
我的计划是调用 strsplit(x, split = " "),然后对拆分对象调用 unique 函数。如果我选择列表中的 1 个成员,我的代码可以正常工作:
> strsplit(pathmd1[[76]], split = " ")
[[1]]
[1] "gr" "gal" "gr" "gal"
> splittest <- strsplit(pathmd1[[76]], split = " ")
> unique(unlist(splittest))
[1] "gr" "gal"
但是,当我使用 lapply 使用这些函数时,会抛出一个错误
pathmd2 <- lapply(1:length(pathmd1), function(i) strsplit(pathmd1[[i]],
split = " "))
pathmd <- lapply(1:length(pathmd2), function(i) unique(pathmd2[[i]])
unexpected symbol
77: pathmd2 <- lapply(1:length(pathmd1), function(i)
strsplit(pathmd1[[i]], split = " ")
78: pathmd
^
为什么函数不能与 lapply 一起使用?
你可以试试:
lapply(f, function(x) unique(unlist(strsplit(x, " "))))
#output
[[1]]
[1] "gr" "gal"
[[2]]
[1] "gr" "gal"
[[3]]
[1] "gr" "gal" "ir" "ol"
[[4]]
[1] "gr" "gal"
[[5]]
[1] "gr" "gal"
其中 f 是您的列表。
不需要像 for
循环那样进行迭代
我有一个字符串列表,其中一些字符串有重复。例如:
[[1]]
[1] "gr gal gr gal"
[[2]]
[1] "gr gal"
[[3]]
[1] "gr gal ir ol"
[[4]]
[1] "gr gal gr gal"
[[5]]
[1] "gr gal"
我想要的输出是:
[[1]]
[1] "gr gal"
[[2]]
[1] "gr gal"
[[3]]
[1] "gr gal ir ol"
[[4]]
[1] "gr gal"
[[5]]
[1] "gr gal"
从字符串中删除重复的位置。
我的计划是调用 strsplit(x, split = " "),然后对拆分对象调用 unique 函数。如果我选择列表中的 1 个成员,我的代码可以正常工作:
> strsplit(pathmd1[[76]], split = " ")
[[1]]
[1] "gr" "gal" "gr" "gal"
> splittest <- strsplit(pathmd1[[76]], split = " ")
> unique(unlist(splittest))
[1] "gr" "gal"
但是,当我使用 lapply 使用这些函数时,会抛出一个错误
pathmd2 <- lapply(1:length(pathmd1), function(i) strsplit(pathmd1[[i]],
split = " "))
pathmd <- lapply(1:length(pathmd2), function(i) unique(pathmd2[[i]])
unexpected symbol
77: pathmd2 <- lapply(1:length(pathmd1), function(i)
strsplit(pathmd1[[i]], split = " ")
78: pathmd
^
为什么函数不能与 lapply 一起使用?
你可以试试:
lapply(f, function(x) unique(unlist(strsplit(x, " "))))
#output
[[1]]
[1] "gr" "gal"
[[2]]
[1] "gr" "gal"
[[3]]
[1] "gr" "gal" "ir" "ol"
[[4]]
[1] "gr" "gal"
[[5]]
[1] "gr" "gal"
其中 f 是您的列表。
不需要像 for
循环那样进行迭代