Sweave: diferència entre les revisions

1.193 bytes afegits ,  6 juny 2005
Línia 30: Línia 30:
* echo=TRUE (por defecto) para mostrar el código de R (''input'') en el documento final, o echo=FALSE para ocultarlo
* echo=TRUE (por defecto) para mostrar el código de R (''input'') en el documento final, o echo=FALSE para ocultarlo
* hide=FALSE (por defecto) para mostrar el resultado de R (''output'') en el documento final, o hide=TRUE para ocultarlo
* hide=FALSE (por defecto) para mostrar el resultado de R (''output'') en el documento final, o hide=TRUE para ocultarlo
* figure=TRUE para indicar que el código generará como resultado (''output'') un gráfico. En este caso se puede indicar el tamaño deseado para dicho gráfico
* figure=TRUE para indicar que el código generará como resultado (''output'') un gráfico. En este caso se puede indicar el tamaño deseado para dicho gráfico con los argumentos ''width'' y ''height''
* results=tex para indicar que el código generará como resultado (''output'') directo un código de [[R]], habitualmente mediante el uso de funciones de librería [[R#Sistema_pedestre xtable]]
* results=tex para indicar que el código generará como resultado (''output'') directo un código de [[R]], habitualmente mediante el uso de funciones de librería [[R#Sistema_pedestre xtable]]
* '''nota: me falta añadir: figure, caption, ¿label?, results=tex'''


Aunque en la mayoría de ocasiones el código de R debe situarse en ''chunks'', si se trata de una única expresión puede ir dentro de un ''chunk'' de texto con la siguiente sintaxis:
Aunque en la mayoría de ocasiones el código de R debe situarse en ''chunks'', si se trata de una única expresión puede ir dentro de un ''chunk'' de texto con la siguiente sintaxis:
Línia 76: Línia 75:
  \end{document}
  \end{document}


* Ejemplo 3:
* Ejemplo 3 (resultado [http://www.ci.tuwien.ac.at/~leisch/Sweave/example-3.pdf aquí]):
 
\documentclass[a4paper]{article}
\begin{document}
<<echo=false,results=hide>>=
library(lattice)
library(xtable)
data(cats, package="MASS")
@
\section*{The Cats Data}
Consider the \texttt{cats} regression example from Venables \& Ripley
(1997). The data frame contains measurements of heart and body weight
of \Sexpr{nrow(cats)} cats (\Sexpr{sum(cats$Sex=="F")} female,
\Sexpr{sum(cats$Sex=="M")} male).
A linear regression model of heart weight by sex and gender can be
fitted in R using the command
<<>>=
lm1 = lm(Hwt~Bwt*Sex, data=cats)
lm1
@
Tests for significance of the coefficients are shown in
Table~\ref{tab:coef}, a scatter plot including the regression lines is
shown in Figure~\ref{fig:cats}.
\SweaveOpts{echo=false}
<<results=tex>>=
xtable(lm1, caption="Linear regression model for cats data.", label="tab:coef")
@
\begin{figure}
  \centering
<<fig=TRUE,width=12,height=6>>=
lset(col.whitebg())
print(xyplot(Hwt~Bwt|Sex, data=cats, type=c("p", "r")))
  \caption{The cats data from package MASS.}
  \label{fig:cats}
\end{figure}
\begin{center}
\end{center}
\end{document}


== Procesamiento ==
== Procesamiento ==