r - 从位置 x 选择 R 中的每第 n 列

Question

假设数据是

v1<-c(1,2,3)
v2<-c(3,1,2)
v3<-c(5,4,3)
v4<-c(2,3,2)
v5<-c(6,2,1)
v6<-c(1,1,2)
v7<-c(2,2,1)
mydata<-data.frame(v1,v2,v3,v4,v5,v6,v7)

我想要从位置 v3 开始的所有其他列。

  v3 v5 v7
1  5  6  2
2  4  2  2
3  3  1  1

我不确定如何从某个位置而不是从第一列开始使用 seq()。

Answer 1

我们可以使用 match 和 seq - match 返回匹配 'v3' 的列名的位置索引，然后使用 seq，by为2，to为最后一列的索引(ncol)

mydata[seq(match('v3', names(mydata)), ncol(mydata), by = 2)]

-输出

  v3 v5 v7
1  5  6  2
2  4  2  2
3  3  1  1

---

或者在 dplyr 中使用 num_range

library(dplyr)
mydata %>% 
   select(num_range(prefix = "v", range = seq(3, last_col(), by = 2)))

-输出

  v3 v5 v7
1  5  6  2
2  4  2  2
3  3  1  1