将列表中的特定元素存储到R中选定的向量中

我的数据：：

我想将列表m中上述每个子集的特定元素（例如“h”、“k”）存储到单独的向量中 当前正在使用以下代码：

for (i in m[[1]][[1]]{if(i=="k"){t<-m[[1]][[1]][m[[1]][[1]]==i]}}

---

for（i in m[[1]][[1]]{if（i==“k”）{t首先，让我们复制您的数据

a <- list(c("g", "g", "h", "k", "k", "k", "l"))
b <- list(c("g", "h", "k", "k", "k", "l", "g"))
c <- list(c("g", "h", "h", "h", "k", "l", "h"))

m <- append(append(list(a), list(b)), list(c))

> m
[[1]]
[[1]][[1]]
[1] "g" "g" "h" "k" "k" "k" "l"


[[2]]
[[2]][[1]]
[1] "g" "h" "k" "k" "k" "l" "g"


[[3]]
[[3]][[1]]
[1] "g" "h" "h" "h" "k" "l" "h"

首先，让我们复制您的数据

a <- list(c("g", "g", "h", "k", "k", "k", "l"))
b <- list(c("g", "h", "k", "k", "k", "l", "g"))
c <- list(c("g", "h", "h", "h", "k", "l", "h"))

m <- append(append(list(a), list(b)), list(c))

> m
[[1]]
[[1]][[1]]
[1] "g" "g" "h" "k" "k" "k" "l"


[[2]]
[[2]][[1]]
[1] "g" "h" "k" "k" "k" "l" "g"


[[3]]
[[3]][[1]]
[1] "g" "h" "h" "h" "k" "l" "h"

你能添加预期结果吗？你能添加预期结果吗？嗨，我知道你是SO的新手。如果你觉得某个答案解决了问题，请单击绿色复选标记将其标记为“已接受”。嗨，我知道你是SO的新手。如果你觉得某个答案解决了问题，请单击绿色复选标记将其标记为“已接受”
> t
[[1]]
[1] "k" "k" "k"

[[2]]
[1] "k" "k" "k"

[[3]]
[1] "k"