[R-es] loop para repetir valores de un vector

[Víctor Granda García]

Hola a todos,

No es necesario ningún bucle for ni nada por el estilo. La función rep ya
contempla esa opción:

alt <- rep(altitud$altitud, each = 1247)

hace exactamente lo que quieres Priscila.

Espero que te sirva, un saludo!!

On Thu, 12 Jul 2018 at 16:59 Juan Abasolo <juan.abasolo using ehu.eus> wrote:

> Más fácil:
>
> altitud=read.csv("./altitud44.csv")
>
> y <- c() # Vacio
> for(i in altitud$altitud){
>         print(i)
>         x<- rep(i,1247)
>         y <- c(y,x)
> }
>
>
> 2018-07-12 16:48 GMT+02:00 Juan Abasolo <juan.abasolo using ehu.eus>:
>
> > Hola, Priscila;
> >
> > A mí me parece que así me salió:
> >
> > altitud <- read.csv("./altitud44.csv")
> >
> > y <- list()
> > for(i in altitud$altitud){
> >         print(i)
> >         x<- rep(i,1247)
> >         y[[length(y)+1]] <- x
> > }
> > z <- c()
> > for(i in 1:length(y)){
> >         print(i)
> >         z <- c(z,y[[i]])
> > }
> >
> > Es código muy primitivo y desprolijo de alumno, pero si te sirve...
> >
> > Suerte
> >
> > 2018-07-12 15:42 GMT+02:00 Priscila Ana Powell <
> priscilaapowell using gmail.com>
> > :
> >
> >> Hola a todos!
> >>
> >> Estoy intentando crear un vector (alt) a partir de la repetición de
> >> valores provenientes de otro vector (altitud).
> >> A cada valor de altitud lo quiero repetir 1247 veces, y de ahi continuar
> >> con el siguiente valor de altitud.
> >>
> >> Probé varias cosas, pero esto me pareció lo más coherente:
> >>
> >> altitud=read.csv("C:/Users/IER/Dropbox/Pasantia
> >> Castelar/YungasLigustroTS/altitud44.csv")
> >>
> >> alt=numeric (44*1247) #lo especifico asi porque tal vez tenga que
> cambiar
> >> las dimensiones segun otros valores)
> >>
> >> for (i in 1:44){
> >>   alt[((i-1)*1247+1):(i*1247)]<-for (ii in altitud) {rep (ii, 1247)
> >>     }
> >> }
> >>
> >> Adjunto el vector altitud.
> >>
> >> desde ya, muchas gracias
> >>
> >> saludos!
> >>
> >> Priscila
> >> --
> >> Dra. Priscila Ana Powell
> >> Instituto de Ecología Regional-CONICET
> >> Cátedra de Ecología General-Facultad de Ciencias Naturales e Instituto
> >> Miguel Lillo
> >> Universidad Nacional de Tucumán
> >> Argentina
> >>
> >> _______________________________________________
> >> R-help-es mailing list
> >> R-help-es using r-project.org
> >> https://stat.ethz.ch/mailman/listinfo/r-help-es
> >>
> >>
> >
> >
> > --
> > Juan Abasolo
> >
> > Hizkuntzaren eta Literaturaren Didaktika Saila
> > Bilboko Hezkuntza Fakultatea
> > Euskal Herriko Unibertsitatea
> > UPV/EHU
> >
> > Sarriena auzoa z/g
> > 48940 Leioa
> > Bizkaia
> >
>
>
>
> --
> Juan Abasolo
>
> Hizkuntzaren eta Literaturaren Didaktika Saila
> Bilboko Hezkuntza Fakultatea
> Euskal Herriko Unibertsitatea
> UPV/EHU
>
> Sarriena auzoa z/g
> 48940 Leioa
> Bizkaia
>
>         [[alternative HTML version deleted]]
>
> _______________________________________________
> R-help-es mailing list
> R-help-es using r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
-- 
*Víctor Granda García*
Data Technician


v.granda using creaf.uab.cat
Tel. +34 93 581 33 53


Campus UAB. Edifici C. 08193 Bellaterra (Barcelona) | *www.creaf.cat*
<http://www.creaf.uab.es/cat/index.htm>

Abans d'imprimir aquest missatge electrònic penseu en el medi ambient.

	[[alternative HTML version deleted]]