[R-es] caracteres como argumentos

[Carlos J. Gil Bellosta]

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
>