Foro de debate

Modificar cadenas de texto que son argumentos de otras funciones.

Modificar cadenas de texto que son argumentos de otras funciones.

de Nerea Valcarcel -
Número de respuestas: 0
Buenas de nuevo,

para terminar de automatizar mi script, me gustaría un último cambio. Tengo que aplicarlo a varios archivos que están organizados en diferentes carpetas. Cada carpeta tiene el nombre de una muestra, y el archivo de dentro se llama igual de la carpeta.

A lo largo del programa, recurro al nombre del archivo/carpeta 3 veces, vamos a poner que la carpeta y el archivo se llaman muestra. Primero lo uso para establecer el directorio de trabajo, ya que el script genera varios archivos de resultados que necesito que se guarden en la carpeta de la muestra.

setwd ("D:/Analisis/Muestra")

Después incluyo el nombre para importar el archivo:

brutos <- read.table ("Muestra", header=FALSE, sep=" ", skip=58, fill=TRUE)

Y por último para nombrar el archivo de resultados:

write.table(final, "Muestra.txt", sep=" ", 
  col.names=TRUE, row.names=FALSE, quote=TRUE, na="NA")


Esto tengo que hacerlo con un montón de muestras, y además el número es creciente. Lo que busco es alguna forma de poder sustituir de una vez el nombre de la muestra en los 3 sitios para hacerlo lo más rápido posible.

He intentado usar substr y aunque he conseguido que el nombre cambiase, cuando incluyo el argumento de substr en alguna de las expresiones anteriores me da error de texto.

¿Se os ocurre alguna forma de que pudiera hacerlo?

Gracias de antemano,

Saludos