Hola, ¿qué tal?
Si los ficheros están solos en un directorio concreto te basta hacer
algo así como
avglrss <- sapply(dir(), function(f) scan(f, skip = 7))
para leerlos en una lista (cada entrada de la lista contendrá un fichero).
Un saludo,
Carlos J. Gil Bellosta
http://www.datanalytics.com
El día 3 de diciembre de 2013 12:58, Luis Ridao <luridao en gmail.com>
escribió:> r-help-es,
>
> en muchas situaciones me encuentro con la necesidad de pasar
> el nobre de un objeto como argumento a una función:
>
> for (i in 1:3)
> cat(paste( "avglrss",i," <- ",
"scan(\"","avgl",i,".rep","\"",",skip=7",")"
> ,sep=""))
>
> en este ejemplo estoy creando objetos "avglrss1",
"avglrss2", "avglrss3"
> mediante la importacion de ficheros.
> lo que el código de arriba generaría sería una cadena de caracteres:
>
> avglrss1 <- scan("avgl1.rep",skip=7)
> avglrss2 <- scan("avgl2.rep",skip=7)
> avglrss3 <- scan("avgl3.rep",skip=7)
>
> lo que quiero hacer es evaluar esta expresion
>
> para solucionarlo suelo ejecutar lo siguiente:
>
> sink("read_rss.r")
> for(i in 1:3)
> {
> cat(paste( "avglrss",i," <- ",
>
"scan(\"","avgl",i,".rep","\"",",skip=7",")"
,sep=""),"\n")
> }
> sink()
> source("read_rss.r")
>
>
> no hay una forma más sencilla de hacer este tipo de manipulación?
>
>
> gracias por adelantado,
> Luis
>
> [[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
>