[R-es] Fwd: problema en while y en extraer valores de un vector
Olivier Nuñez
onunez en unex.es
Mar Sep 15 15:59:59 CEST 2015
> a <- c(8,10,4,1,7,2,4,6,3,8)
> n=length(a)
> i=0
> while(n>=i+5) {print(tail(a[1:(n-i)],5));i=i+1}
[1] 2 4 6 3 8
[1] 7 2 4 6 3
[1] 1 7 2 4 6
[1] 4 1 7 2 4
[1] 10 4 1 7 2
[1] 8 10 4 1 7
>
Un saludo. Olivier
----- Mensaje original -----
De: "Albert" <albert.montolio en gmail.com>
Para: R-help-es en r-project.org
Enviados: Martes, 15 de Septiembre 2015 15:35:27
Asunto: [R-es] Fwd: problema en while y en extraer valores de un vector
>
>
>>
>> Hola a todos,
>>
>> es la primera pregunta que hago a esta lista, no se si estoy en el sitio correcto.
>>
>> Tengo el siguiente vector:
>>
>> a <- c(8,10,4,1,7,2,4,6,3,8)
>>
>> y quiero conseguir en pantalla 5 valores, empezando por el final, y recorriendo el vector de derecha i izquierda cada vez, es decir, el resultado tiene que ser:
>>
>> 2,4,6,3,8
>> 7,2,4,6,3
>> 1,7,2,4,6
>> 4,1,7,2,4
>> 10,4,1,7,2
>> 8,10,4,1,7
>>
>> Código empleado:
>>
>> a <- c(8,10,4,1,7,2,4,6,3,8)
>>
>> b <- rep(0,5)
>>
>> i=10
>> while (i>=4) {
>>
>> b <- a[i:i-4]
>> print(b)
>> i=i-1
>>
>> }
>>
>> Creo que el problema radica en a[i:i-4], pero no hay manera de solucionarlo. Si lo hago sin el while, me funciona, pero es que el while es muy sencillito, no entiendo porqué no me funciona.
>>
>> Si me podéis ayudar os lo agradecería mucho.
>>
>> Saludos.
>>
>>
>>
>>
>>
>>
[[alternative HTML version deleted]]
_______________________________________________
R-help-es mailing list
R-help-es en r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
Más información sobre la lista de distribución R-help-es