Nuevamente hola
Pude solucionar el problema en R, ahora me sale al final del pdf pero eso
ya es latex.
La solución fue la siguiente:
<<echo=FALSE, results=tex>>library(xtable)
# creo un dataframe para colocar los nombres y realozar la tabla
tablaEdadServ <- data.frame(C_L_J_1$Edad_1_Pre,C_L_J_1$Establec)
colnames(tablaEdadServ)<-c(''EdadServicio'',
''Establecimiento'')
#with(tablaEdadServ, table(EdadServicio, Establecimiento))
xtable(with(tablaEdadServ, table(EdadServicio,
Establecimiento)),label=''tabla_1Serv-est'',caption=''Edad
de primer servicio
fertil por establecimiento'', scalebox=0.7, floating=FALSE)
#print(tablaEdadServ, scalebox=0.7, floating=FALSE)
@
El 23 de julio de 2012 10:17, Marcuzzi, Javier Rubén <
javier.ruben.marcuzzi@gmail.com> escribió:
> Hola a todos:
>
> Les consulto lo siguiente: dentro de un resumen de datos realizo una tabla
> donde cuento la cantidad de servicios que hay, para que quede más
> presentado utilizo xtable, en el siguiente código que me da error explico
> lo siguiente: creo un data.frame a partir de otro data.frame, a esto lo
> realicé para no tener nombres codificados, para lo cuál a partir del
> data.frame nuevo utilizo la opción colnames (esto en R sin xtable funciona,
> con xtable no utiliza los nombres).
> Del data frame, realizo la taba donde las entradas son: en la parte
> superior los establecimientos y en la izquierda la edad de servicio, dentro
> de la tabla aparece la cantidad de servicios a diferentes edades por
> establecimiento.
> Utilizado el vignettes de xtable copio la parte de “, label.......” (punto
> 4.12).
> Quedando de la siguiente forma, lo cuál no funciona.
>
> <<echo=FALSE, results=tex>>> library(xtable)
> # creo un dataframe para colocar los nombres y realozar la tabla
> tablaEdadServ <- data.frame(C_L_J_1$Edad_1_Pre,C_L_J_1$Establec)
> colnames(tablaEdadServ)<-c(''EdadServicio'',
''Establecimiento'')
> #with(tablaEdadServ, table(EdadServicio, Establecimiento))
> tablaEdadServ<-xtable(with(tablaEdadServ, table(EdadServicio,
> Establecimiento, label=''tabrescaled'',caption=''A
rescaled table'')))
> print(tablaEdadServ, scalebox=0.7)
> @
>
> Pero si funciona sin “label....”, aunque como es lógico deseo colocar un
> título a la tabla (que a lo largo del trabajo son varias).
> Código que funciona:
> <<echo=FALSE, results=tex>>> library(xtable)
> # creo un dataframe para colocar los nombres y realozar la tabla
> tablaEdadServ <- data.frame(C_L_J_1$Edad_1_Pre,C_L_J_1$Establec)
> colnames(tablaEdadServ)<-c(''EdadServicio'',
''Establecimiento'')
> #with(tablaEdadServ, table(EdadServicio, Establecimiento))
> tablaEdadServ<-xtable(with(tablaEdadServ, table(EdadServicio,
> Establecimiento)))
> print(tablaEdadServ, scalebox=0.7)
> @
>
> ¿Alguna idea para mi problema?
>
> Desde ya muchas gracias.
>
> Javier Marcuzzi
>
>
[[alternative HTML version deleted]]