[R-es] Guardar salidas de R

morales en us.es morales en us.es
Dom Ene 17 15:15:10 CET 2010


Hola, yo también he empezado a utilizar la libreria odfWeave y me he encontrado con el mismo problema que David. Para solucionarlo sólo basta con instalar Rtools y durante la instalación editar el path. En dicho path es necesario incluir el directorio donde R de encontrar la utilidad zip/unzip (en mi caso tuve que incluir en el path la dirección c:/Archivos de programa/7-zip). Esto debe solucionar el error que indicas.

De todos modos, si estás dentro del entorno windows, el ejemplo que proporcionas no te va a funcionar. Al menos, a mi no me funcionó. Es necesario que incluyas el código dentro de los simbolos <<>>== tal y como aparece en el manual de odfWeave (por. ej., <<histograma, echo=FALSE, fig = TRUE>>== . De esta manera seguro que te funcionará.

También te digo que he estado probando la recomendación anterior de utilizar r2wd y es bastante interesante porque con odfWeave las tablas pierden el formato original al pasarlas de  oo a Word.

Saludos y suerte!!

M. Morales
Departamento de Psicología Experimental
Universidad de Sevilla




----- Mensaje original -----
De: r-help-es-request en r-project.org
Fecha: Domingo, Enero 17, 2010 12:05 pm
Asunto: Resumen de R-help-es, Vol 11, Envío 5
A: r-help-es en r-project.org


> Envíe los mensajes para la lista R-help-es a
> 	r-help-es en r-project.org
> 
> Para subscribirse o anular su subscripción a través de la WEB
> 	
> 
> O por correo electrónico, enviando un mensaje con el texto "help" en
> el asunto (subject) o en el cuerpo a:
> 	r-help-es-request en r-project.org
> 
> Puede contactar con el responsable de la lista escribiendo a:
> 	r-help-es-owner en r-project.org
> 
> Si responde a algún contenido de este mensaje, por favor, edite la
> linea del asunto (subject) para que el texto sea mas especifico que:
> "Re: Contents of R-help-es digest...". Además, por favor, incluya en
> la respuesta sólo aquellas partes del mensaje a las que está
> respondiendo.
> 
> 
> Asuntos del día:
> 
>    1. seleccionar datos (José Miguel Contreras García)
>    2. Guardar salidas R (David A.C.)
>    3. Re: Guardar salidas R (J. Miguel Marin)
>    4. Re: seleccionar datos (Jorge Virto Moreno)
>    5. Re: Guardar salidas R (Proyecto R UCA)
>    6. Guardar salidas R (David A.C.)
> 
> 
> ----------------------------------------------------------------------
> 
> Message: 1
> Date: Sat, 16 Jan 2010 14:19:17 +0100 (CET)
> From: José Miguel Contreras García <jmcontreras en ugr.es>
> To: r-help-es en r-project.org
> Subject: [R-es] seleccionar datos
> Message-ID: <11811.81.38.5.29.1263647957.squirrel en goliat12.ugr.es>
> Content-Type: text/plain;charset=iso-8859-1
> 
> 
> 
> 
> Tengo un problemilla, aparentamente tonto pero no logro resolverlo.
> 
> Imaginaros que teneis:
> 
> 1007 2 6 2 3 2 1 6 1100 1300 650
> 1007 2 6 3 2 2 1 6 200 1300 650
> 1058 1 1 2 3 1 1 6 2000 2000 2000
> 1438 1 1 2 5 1 1 6 300 300 300
> 1451 1 1 2 3 1 1 6 1747 1747 1747
> 1670 2 1 2 5 1 1 6 750 1185 592.5
> 1670 2 6 2 4 1 1 6 435 1185 592.5
> 1808 2 1 1 5 1 1 6 480 690 345
> 1808 2 6 1 5 1 1 6 210 690 345
> 1994 1 1 1 4 1 1 6 650 650 650
> 
> Como veis se repite el primer elemento de algunas columnas, pues quiero
> hacer un bucle que me cree una tabla con solo la 1ª fila para cada valor
> que se repite, es decir que quede:
> 
> 
> 1007 2 6 2 3 2 1 6 1100 1300 650
> 1058 1 1 2 3 1 1 6 2000 2000 2000
> 1438 1 1 2 5 1 1 6 300 300 300
> 1451 1 1 2 3 1 1 6 1747 1747 1747
> 1670 2 1 2 5 1 1 6 750 1185 592.5
> 1808 2 1 1 5 1 1 6 480 690 345
> 1994 1 1 1 4 1 1 6 650 650 650
> 
> Lo estoy intentando con
> 
> for (i in 1:m) {
> levels(factor(hog[,1]))->kk
> write.table(kk, file="kk.txt",append=TRUE,row.names=FALSE,col.names=FALSE,
> quote = FALSE)
> }
> 
> 
> o con
> 
> 
> for (j in 1:m-1){ subset (hog, hog[j,1]!=hog[j+1,1])-> hog2
>         	write.table(hog2,
> file="hog2.txt",append=TRUE,row.names=FALSE,col.names=FALSE, quote =
> FALSE)
>                 	}
> as.matrix(read.table("hog2.txt"))->hog2
> 
> 
> 
> pero nada.
> 
> Gracias
> -- 
>                              \|||/
>                              (o o)
> +-----------------------oOOo-(_)-oOOo------------------------------+
> | José Miguel Contreras                                            |
> 
> | e-mail: jmcontreras en ugr.es                                       |
> |                                                |
> +----------------------oooO-------Oooo-----------------------------+
> 
> 
> 
> ------------------------------
> 
> Message: 2
> Date: Sat, 16 Jan 2010 14:56:43 +0100
> From: "David A.C." <diuck7 en hotmail.com>
> To: <r-help-es en r-project.org>
> Subject: [R-es] Guardar salidas R
> Message-ID: <COL122-W80077DD0EE0C2473565B288680 en phx.gbl>
> Content-Type: text/plain
> 
> 
> Hola a todos,
> 
> Estoy realizando una descriptiva inicial de un conjunto de datos y me 
> gustaría que las salidas de R se guardasen en un fichero ".txt", 
> ".doc", etc. para luego poder modificarlo (haciendo las mínimas 
> modificaciones posibles, es decir, que se guarde ya en un formato 
> aceptable para presentar un informe) y realizar un informe.
> 
> Suelo utilizar la función "sink()", pero el formato en el que lo 
> guarda (en un ".txt") no es muy "bonito", por lo que tengo que hacer 
> muchos retoques y la verdad es que es mucho trabajo, ya que las 
> salidas de R me ocupan bien, bien unas 60 hojas!!! Además, me 
> gustaría, por ejemplo, poder añadir comentarios, los nombres de las 
> variables que se viesen mejor (como estilo título), etc. entre las 
> salidas de R.
> 
> ¿Conocen alguna otra función para ello o tienen un script para 
> facilitarme dicho trabajo?
> 
> Muchas gracias a todos por adelantado,
> David.
>                                                
> _________________________________________________________________
> 
> 
> 	[[alternative HTML version deleted]]
> 
> 
> 
> ------------------------------
> 
> Message: 3
> Date: Sat, 16 Jan 2010 15:50:08 +0100
> From: "J. Miguel Marin" <jmmarin en est-econ.uc3m.es>
> To: r-help-es en r-project.org
> Subject: Re: [R-es] Guardar salidas R
> Message-ID: <20100116155008.bzgql6xyqs0s0oo4 en webcartero01.uc3m.es>
> Content-Type: text/plain;	charset=ISO-8859-1;	format="flowed"
> 
> Hola
> 
> la librería R2wd, exporta los resultados en formato doc:
> 
> 
> 
> 
> 
> >
> > Hola a todos,
> >
> > Estoy realizando una descriptiva inicial de un conjunto de datos y 
> me 
> > gustaría que las salidas de R se guardasen en un fichero ".txt", 
> > ".doc", etc. para luego poder modificarlo (haciendo las mínimas 
> > modificaciones posibles, es decir, que se guarde ya en un formato 
> > aceptable para presentar un informe) y realizar un informe.
> >
> > Suelo utilizar la función "sink()", pero el formato en el que lo 
> > guarda (en un ".txt") no es muy "bonito", por lo que tengo que hacer 
> 
> > muchos retoques y la verdad es que es mucho trabajo, ya que las 
> > salidas de R me ocupan bien, bien unas 60 hojas!!! Además, me 
> > gustaría, por ejemplo, poder añadir comentarios, los nombres de las 
> 
> > variables que se viesen mejor (como estilo título), etc. entre las 
> > salidas de R.
> >
> > ¿Conocen alguna otra función para ello o tienen un script para 
> > facilitarme dicho trabajo?
> >
> > Muchas gracias a todos por adelantado,
> > David.
> >
> > _________________________________________________________________
> >
> >
> > 	[[alternative HTML version deleted]]
> >
> >
> 
> 
> 
> 
> jm~
> 
> _______________________________
> 
>         J. Miguel Marin
> 
> 
> 
>     Dep. of Statistics
> University Carlos III of Madrid
>         Spain (E.U.)
> 
> 
> 
> ------------------------------
> 
> Message: 4
> Date: Sat, 16 Jan 2010 17:02:49 +0100
> From: Jorge Virto Moreno <jorge.virto en ehu.es>
> To: r-help-es en r-project.org
> Subject: Re: [R-es] seleccionar datos
> Message-ID: <20100116170249.110615zgzc1up7a8 en www.ehu.es>
> Content-Type: text/plain; charset=ISO-8859-1; DelSp="Yes";
> 	format="flowed"
> 
> Hola José Miguel,
> 
> si tienes los datos en una matriz es relativamente sencillo resolver  
> 
> tu problema usando la opción duplicated, que te da un índice con los  
> 
> elemntos repetidos.
> 
> Por ejemplo:
> 
> > datos <- matrix(data=c(1007,2,6,2,3,2,1,6,1100,1300,650,
> + 1007,2,6,3,2,2,1,6,200,1300,650,
> + 1058,1,1,2,3,1,1,6,2000,2000,2000,
> + 1438,1,1,2,5,1,1,6,300,300,300,
> + 1451,1,1,2,3,1,1,6,1747,1747,1747,
> + 1670,2,1,2,5,1,1,6,750,1185,592.5,
> + 1670,2,6,2,4,1,1,6,435,1185,592.5,
> + 1808,2,1,1,5,1,1,6,480,690,345,
> + 1808,2,6,1,5,1,1,6,210,690,345,
> + 1994,1,1,1,4,1,1,6,650,650,650),byrow=T,nrow=10)
> > datos
>        [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]  [,11]
>   [1,] 1007    2    6    2    3    2    1    6 1100  1300  650.0
>   [2,] 1007    2    6    3    2    2    1    6  200  1300  650.0
>   [3,] 1058    1    1    2    3    1    1    6 2000  2000 2000.0
>   [4,] 1438    1    1    2    5    1    1    6  300   300  300.0
>   [5,] 1451    1    1    2    3    1    1    6 1747  1747 1747.0
>   [6,] 1670    2    1    2    5    1    1    6  750  1185  592.5
>   [7,] 1670    2    6    2    4    1    1    6  435  1185  592.5
>   [8,] 1808    2    1    1    5    1    1    6  480   690  345.0
>   [9,] 1808    2    6    1    5    1    1    6  210   690  345.0
> [10,] 1994    1    1    1    4    1    1    6  650   650  650.0
> >
> > duplicated(datos[,1])
>   [1] FALSE  TRUE FALSE FALSE FALSE FALSE  TRUE FALSE  TRUE FALSE
> >
> > datos[duplicated(datos[,1])==F,]
>       [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]  [,11]
> [1,] 1007    2    6    2    3    2    1    6 1100  1300  650.0
> [2,] 1058    1    1    2    3    1    1    6 2000  2000 2000.0
> [3,] 1438    1    1    2    5    1    1    6  300   300  300.0
> [4,] 1451    1    1    2    3    1    1    6 1747  1747 1747.0
> [5,] 1670    2    1    2    5    1    1    6  750  1185  592.5
> [6,] 1808    2    1    1    5    1    1    6  480   690  345.0
> [7,] 1994    1    1    1    4    1    1    6  650   650  650.0
> 
> Espero que te valga,
> 
> Jorge
> 
> 
> > José Miguel Contreras García <jmcontreras en ugr.es> escribió:
> 
> >
> >
> >
> > Tengo un problemilla, aparentamente tonto pero no logro resolverlo.
> >
> > Imaginaros que teneis:
> >
> > 1007 2 6 2 3 2 1 6 1100 1300 650
> > 1007 2 6 3 2 2 1 6 200 1300 650
> > 1058 1 1 2 3 1 1 6 2000 2000 2000
> > 1438 1 1 2 5 1 1 6 300 300 300
> > 1451 1 1 2 3 1 1 6 1747 1747 1747
> > 1670 2 1 2 5 1 1 6 750 1185 592.5
> > 1670 2 6 2 4 1 1 6 435 1185 592.5
> > 1808 2 1 1 5 1 1 6 480 690 345
> > 1808 2 6 1 5 1 1 6 210 690 345
> > 1994 1 1 1 4 1 1 6 650 650 650
> >
> > Como veis se repite el primer elemento de algunas columnas, pues quiero
> > hacer un bucle que me cree una tabla con solo la 1ª fila para cada valor
> > que se repite, es decir que quede:
> >
> >
> > 1007 2 6 2 3 2 1 6 1100 1300 650
> > 1058 1 1 2 3 1 1 6 2000 2000 2000
> > 1438 1 1 2 5 1 1 6 300 300 300
> > 1451 1 1 2 3 1 1 6 1747 1747 1747
> > 1670 2 1 2 5 1 1 6 750 1185 592.5
> > 1808 2 1 1 5 1 1 6 480 690 345
> > 1994 1 1 1 4 1 1 6 650 650 650
> >
> > Lo estoy intentando con
> >
> > for (i in 1:m) {
> > levels(factor(hog[,1]))->kk
> > write.table(kk, file="kk.txt",append=TRUE,row.names=FALSE,col.names=FALSE,
> > quote = FALSE)
> > }
> >
> >
> > o con
> >
> >
> > for (j in 1:m-1){ subset (hog, hog[j,1]!=hog[j+1,1])-> hog2
> >         	write.table(hog2,
> > file="hog2.txt",append=TRUE,row.names=FALSE,col.names=FALSE, quote =
> > FALSE)
> >                 	}
> > as.matrix(read.table("hog2.txt"))->hog2
> >
> >
> >
> > pero nada.
> >
> > Gracias
> > --
> >                              \|||/
> >                              (o o)
> > +-----------------------oOOo-(_)-oOOo------------------------------+
> > | José Miguel Contreras                                            |
> >
> > | e-mail: jmcontreras en ugr.es                                       |
> > |                                                |
> > +----------------------oooO-------Oooo-----------------------------+
> >
> > _______________________________________________
> > R-help-es mailing list
> > R-help-es en r-project.org
> > 
> >
> >
> 
> 
> 
> ------------------------------
> 
> Message: 5
> Date: Sat, 16 Jan 2010 21:44:17 +0100
> From: Proyecto R UCA <r-uca en uca.es>
> Cc: r-help-es en r-project.org
> Subject: Re: [R-es] Guardar salidas R
> Message-ID: <1263674657.5369.3.camel en seta>
> Content-Type: text/plain; charset="UTF-8"
> 
> Hola,
> 
> otras alternativas con odfWeave
> ( y Sweave
> (
> 
> Ambas alternativas integran en un solo fichero el código R y las
> salidas, por lo que no es necesario andar copiando ni pegando nada.
> 
> Saludos.
> 
> El sáb, 16-01-2010 a las 15:50 +0100, J. Miguel Marin escribió:
> > Hola
> > 
> > la librería R2wd, exporta los resultados en formato doc:
> > 
> > 
> > 
> > 
> > 
> > >
> > > Hola a todos,
> > >
> > > Estoy realizando una descriptiva inicial de un conjunto de datos y 
> me 
> > > gustaría que las salidas de R se guardasen en un fichero ".txt", 
> > > ".doc", etc. para luego poder modificarlo (haciendo las mínimas 
> > > modificaciones posibles, es decir, que se guarde ya en un formato 
> 
> > > aceptable para presentar un informe) y realizar un informe.
> > >
> > > Suelo utilizar la función "sink()", pero el formato en el que lo 
> > > guarda (en un ".txt") no es muy "bonito", por lo que tengo que 
> hacer 
> > > muchos retoques y la verdad es que es mucho trabajo, ya que las 
> > > salidas de R me ocupan bien, bien unas 60 hojas!!! Además, me 
> > > gustaría, por ejemplo, poder añadir comentarios, los nombres de 
> las 
> > > variables que se viesen mejor (como estilo título), etc. entre las 
> 
> > > salidas de R.
> > >
> > > ¿Conocen alguna otra función para ello o tienen un script para 
> > > facilitarme dicho trabajo?
> > >
> > > Muchas gracias a todos por adelantado,
> > > David.
> > >
> > > _________________________________________________________________
> > >
> > >
> > > 	[[alternative HTML version deleted]]
> > >
> > >
> > 
> > 
> > 
> > 
> > jm~
> > 
> > _______________________________
> > 
> >         J. Miguel Marin
> > 
> > 
> > 
> >     Dep. of Statistics
> > University Carlos III of Madrid
> >         Spain (E.U.)
> > 
> > _______________________________________________
> > R-help-es mailing list
> > R-help-es en r-project.org
> > 
> 
> 
> -- 
> ===
> Proyecto R-UCA
> 
> r-uca en uca.es
> Manuel Muñoz Márquez
> ===
> 
> 
> 
> ------------------------------
> 
> Message: 6
> Date: Sat, 16 Jan 2010 22:43:11 +0100
> From: "David A.C." <diuck7 en hotmail.com>
> To: <r-help-es en r-project.org>
> Subject: [R-es] Guardar salidas R
> Message-ID: <COL122-W3561C38FEBEFBD0BDA263988680 en phx.gbl>
> Content-Type: text/plain
> 
> 
> Gracias por ambas respuestas!
> 
> Buscando, había encontrado información sobre la función odfWeave, pero 
> realmente no acabo de entender cómo funciona.
> He preparado el documento .odt con el texto que quiero incluir y el 
> código de R (p.ej.):
> 
> 
> En
> este documento vamos a probar el paquete odfWeave.
> Primero
> cargamos los datos de forma oculta para el documento final.
> <<>>=
> #
> Los datos son 
> 
> coches
> <- mtcars[ ,1:6]
> @
> Los
> datos a estudiar contienen \Sexpr{dim(coches)[2]}
> variables medidas sobre \Sexpr{dim(coches)[1]}
> coches.
> Podemos
> insertar una tabla resumen de los datos:
> <<>>=
> medias
> <- apply(coches,2,mean)
> odfTable(medias,
> horizontal = TRUE)
> @
> También
> podemos añadir algún bonito gráfico:
> <<>>=
> pairs(coches)
> @
> Y a continuación he ejecutado:
> 
> odfWeave("C:\\Documents and 
> Settings\\Administrator\\Escritorio\\Prueba\\Prueba2.odt","C:\\Documents 
> and Settings\\Administrator\\Escritorio\\Prueba\\Out2.odt")
> 
> Y obtengo el siguiente error:
> 
>   Copying  C:\Documents and 
> Settings\Administrator\Escritorio\Prueba\Prueba2.odt 
>   Setting wd to  
> C:\DOCUME~1\ADMINI~1\LOCALS~1\Temp\Rtmp72suQH/odfWeave16224203398 
>   Unzipping ODF file using unzip -o "Prueba2.odt" 
> Error en odfWeave("C:\\Documents and 
> Settings\\Administrator\\Escritorio\\Prueba\\Prueba2.odt",  : 
>   Error unzipping file
> Además: Warning message:
> In system(zipCmd[2], invisible = TRUE) : unzip no encontrado
> 
> De nuevo, muchas gracias por todo,
> David.
> 
>                                                
> _________________________________________________________________
> 
> 
> 	[[alternative HTML version deleted]]
> 
> 
> 
> ------------------------------
> 
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> 
> 
> 
> Fin de Resumen de R-help-es, Vol 11, Envío 5
> ********************************************



Más información sobre la lista de distribución R-help-es