R help es - Feb 2018 - SOBRESCRIBIR EN LA PRIMERA LÍNEA DE TEXTOS

Hola

Escribo este mensaje porque llevo unas horas y no consigo solucionar un
obstáculo.

No consigo añadir unos caracteres en la primera línea de un archivo
".json"
desde R.

Utilizando el siguiente código

*write(line,file="map_wgs91.js",append=TRUE)*
*cat("var statesData =", file="map_wgs93.js", append=TRUE,
sep = "\a")*

he conseguido que la palabra aparezca al final del archivo, pero eso no es
lo que quiero.

No se si me podrías dar  desde esta lista alguna sugerencia...

Gracias

	[[alternative HTML version deleted]]

Hola,

¿Qué sistema operativo usas?.

   - Si usas Linux/MacOS puedes llamar al SO desde R y decirle que
   sustituya un elemento de la primera línea de tu fichero con lo que tú
   quieres. Lo puedes hacer con varias utilidades del SO (sed, awk, o incluso
   con echo).
   - Si usas Windows lo que puedes hacer es lo siguiente, leer el fichero
   json con "readLines()", el resultado lo vas a guardar en un
data.frame al
   que le puedes añadir una primera línea con lo que tú quieras y luego este
   nuevo data.frame salvarlo con "write()"

Es importante a la hora de pedir ayuda indicar este detalle del SO y además
incluir algún ejemplo/dato con el que se pueda reproducir el problema y dar
una solución que se pueda ver que funciona.

Gracias,
Carlos Ortega
www.qualityexcellence.es

El 19 de febrero de 2018, 16:37, Carlos Córcoles <ccbcorcoles en
gmail.com>
escribió:
>  Hola
>
> Escribo este mensaje porque llevo unas horas y no consigo solucionar un
> obstáculo.
>
> No consigo añadir unos caracteres en la primera línea de un archivo
".json"
> desde R.
>
> Utilizando el siguiente código
>
> *write(line,file="map_wgs91.js",append=TRUE)*
> *cat("var statesData =", file="map_wgs93.js",
append=TRUE, sep = "\a")*
>
> he conseguido que la palabra aparezca al final del archivo, pero eso no es
> lo que quiero.
>
> No se si me podrías dar  desde esta lista alguna sugerencia...
>
> Gracias
>
>         [[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
>


-- 
Saludos,
Carlos Ortega
www.qualityexcellence.es

	[[alternative HTML version deleted]]

Estimado Carlos Córcoles

No comprendo si quieres colocar una línea al inicio de un archivo json, o
dentro del archivo de texto hay json y en su estructura colocar una línea
nueva.

Lo que comenta Carlos Ortega está bien, puede ser que RJSON o JSONLITE le
faciliten algo el trabajo, este depende mucho del sistema operativo y de la
estructura JSON o archivo con un JSON interno.

Su código tiene la palabra append=TRUE, pienso que puede ser más fácil
escribir un archivo nuevo, ante un error no borra ningún dato.

Javier Rubén Marcuzzi

El 19 de febrero de 2018, 12:37, Carlos Córcoles <ccbcorcoles en
gmail.com>
escribió:
>  Hola
>
> Escribo este mensaje porque llevo unas horas y no consigo solucionar un
> obstáculo.
>
> No consigo añadir unos caracteres en la primera línea de un archivo
".json"
> desde R.
>
> Utilizando el siguiente código
>
> *write(line,file="map_wgs91.js",append=TRUE)*
> *cat("var statesData =", file="map_wgs93.js",
append=TRUE, sep = "\a")*
>
> he conseguido que la palabra aparezca al final del archivo, pero eso no es
> lo que quiero.
>
> No se si me podrías dar  desde esta lista alguna sugerencia...
>
> Gracias
>
>         [[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
>
	[[alternative HTML version deleted]]

Hola.

El lun, 19-02-2018 a las 16:37 +0100, Carlos Córcoles
escribió:
> No se si me podrías dar  desde esta lista alguna sugerencia...
Tomando un subconjunto del clásico conjunto de datos mtcars y
convirtiéndolo a json para ejemplificar, puedes hacer lo siguiente:

library(jsonlite)
line<-toJSON(head(mtcars), pretty=T)write(line,file="map_wgs91.js")
line<-toJSON(head(mtcars), pretty=T)write(line,
file="map_wgs91.js")fConn <- file('map_wgs91.js',
'r+')Lines <-
readLines(fConn)writeLines(c("var statesData =\n", Lines), con
fConn)close(fConn)

que lo tomé, básicamente, de aquí:

http://r.789695.n4.nabble.com/Appending-strings-at-the-beginning-of-a-t
ext-file-td901370.html

Ojalá sea de utilidad.


-- 
«...homines autem hominum causa esse generatos...»

Cicero
	[[alternative HTML version deleted]]