如何通过每3个索引对R中的列表进行子集化？

Question

我有一个list，它有500个元素，但我希望获得每个第3个元素并将其保存到变量中。所以我希望将list[1]，list[4]，list[7]，list[10]等保存到一个变量中。

我试过sub.list <- list[1:500, by = 3]，但这不起作用。

Answer 1

L <- as.list(1:500) # create a list

L[seq(1, length(L), 3)]
# or, use recycling
L[c(TRUE, FALSE, FALSE)]  

Answer 2

试试这个：

   sub.list<-myList[seq_along(myList)%%3==1]

Answer 3

您也可以使用过滤器：

L <- as.list(1:500) # create a list
Filter(function(i) {i %% 3 == 1},seq_along(L))

但是如果你有NA的话就行不了。