Extraiga cada elemento enésimo de un vector

Question

Me gustaría crear un vector en el que cada elemento sea el elemento i+6th de otro vector.

Por ejemplo, en un vector de longitud 120 quiero crear otro vector de longitud 20 en el que cada elemento tenga el valor i, i+6, i+12, i+18... del vector inicial, es decir, quiero extraer cada 6º elemento del original.

Answer 1

a <- 1:120 
b <- a[seq(1, length(a), 6)] 

Answer 2

creo que está pidiendo dos cosas que no son necesariamente los mismos

Quiero extraer todos los elementos 6 de el original

Usted puede hacer esto mediante la indexación de una secuencia:

foo <- 1:120 
foo[1:20*6] 

---

Me gustaría crear un vector en que cada elemento es el elemento i + 6º de otro vector.

Una manera fácil de hacer esto es para complementar un factor lógico con Falses hasta i+6:

foo <- 1:120 
i <- 1 
foo[1:(i+6)==(i+6)] 
[1] 7 14 21 28 35 42 49 56 63 70 77 84 91 98 105 112 119 

i <- 10 
foo[1:(i+6)==(i+6)] 
[1] 16 32 48 64 80 96 112 

Answer 3

Otro truco para conseguir piezas secuenciales (más allá de la solución SEC ya mencionado) es el uso de un corto lógica vector uso de vectores de reciclaje:

foo[ c(rep(FALSE, 5), TRUE) ]