为数据帧选择多个奇数或偶数列/行

Question

R中有没有办法选择许多非连续的，即奇数或偶数的行/列？

我正在为主成分分析绘制载荷。我有84行数据按如下顺序排序：x_1 y_1 x_2.....x_42 y_42

现在，我正在为x和y加载图创建数据框，如下所示：

data.pc = princomp(as.matrix(data))

x.loadings <- data.frame(x=data.pc$loadings[c(1, 3, 5, 7, 9, 11, 13 ,15, 17, 19, 

21, 23, 25, 27, 29, 31, 33, 35, 37, 39, 41), 1])

yloadings <- data.frame(y=data.pc$loadings[c(2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 

22, 24, 26, 28, 30, 32, 34, 36, 38, 40, 42), 1])

当然有更简单的方法可以做到这一点？

Answer 1

您始终可以使用seq生成序列：even_indexes<-seq(2,42,2)odd_indexes<-seq(1,41,2)然后，&nbsp; x.loadings <- data.frame(x=data.pc$loadings[odd_indexes,1])

Answer 2

当逻辑向量用于索引编制时，它们将被回收，以便获得奇数列或奇数行&nbsp;calld[ c(TRUE,FALSE), ]&nbsp; # rows&nbsp;calld[ , c(TRUE,FALSE) ] #columns偶数行或列：&nbsp;calld[ !c(TRUE,FALSE), ]&nbsp; # rows&nbsp;calld[ , !c(TRUE,FALSE) ] #columns每三列：&nbsp; calld[ , c(TRUE,FALSE, FALSE) ]&nbsp; &nbsp;#columns 1,4,7 , ....