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 <[email protected]> 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 <[email protected]>: > > > 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 < > [email protected]> > > : > > > >> 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 > >> [email protected] > >> 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 > [email protected] > https://stat.ethz.ch/mailman/listinfo/r-help-es > -- *Víctor Granda García* Data Technician [email protected] 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]] _______________________________________________ R-help-es mailing list [email protected] https://stat.ethz.ch/mailman/listinfo/r-help-es
