r - 嵌套列表 r 中的子集

Question

我有以下 list :

mylist<-list(c("25","0"),c("50","1"),c("100","2"))

我想立即提取列表中每个元素的第一个元素。那是

c(mylist[[1]][1],mylist[[2]][1],mylist[[3]][1])

我尝试了以下但没有成功:

mylist[[]][1]; mylist[[.]][1]; mylist[1:3][1]

感谢任何有效地执行此操作的建议

Answer 1

另一个lapply解决方案:

lapply(mylist,"[", 1)

[[1]]
[1] "25"

[[2]]
[1] "50"

[[3]]
[1] "100"

使用 purrr 我们也可以这样做:

purrr::map(mylist, ~ .x[1])

[[1]]
[1] "25"

[[2]]
[1] "50"

[[3]]
[1] "100"

但是，lapply 应该更快。