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
> ********************************************