Agregar títulos a xtable

Question

No estoy seguro de si esta es una pregunta R o una pregunta de Sweave. Estoy mirando las marcas de los estudiantes desde 2 puntos de tiempo en una tabla simple (Grado 3 y Grado 6). He creado la tabla e imprime, sin embargo, quiero agregar etiquetas para que las personas sepan qué marca es de qué grado.

Mi código de Sweave es:

<<MakeData,results='asis'>>=
library(xtable)
Grade3 <- c("A","B","B","A","B","C","C","D","A","B","C","C","C","D","B","B","D","C","C","D")
Grade6 <- c("A","A","A","B","B","B","B","B","C","C","A","C","C","C","D","D","D","D","D","D")
Cohort <- table(Grade3,Grade6)
print(xtable(Cohort))
@

Obtengo una buena tabla con recuentos, sin embargo, tanto las filas como las columnas tienen la misma notación. ¿Cómo agrego una etiqueta para que sea más claro?

Answer 1

Para cambiar las etiquetas para Cohort, Cambie la columna y los rOwnames:

rownames(Cohort) <- 1:4
colnames(Cohort) <- 5:8

También agregas títulos de mesa al xtable llamar:

print(xtable(Cohort, caption = 'My Title'), caption.placement = 'top')

Puedes usar caption.placement para decir dónde poner el subtítulo.

EDITAR:

Según los comentarios, no respondí la pregunta anterior. Para hacer xtable Imprima más como table Con las etiquetas por encima de los niveles, usa add.to.row en el print.xtable función:

addtorow <- list()
addtorow$pos <- list()
addtorow$pos[[1]] <- 0
addtorow$pos[[2]] <- 0
addtorow$command <- c('& & Grade 6 & & \\\\\n', "Grade 3 & A & B & C & D \\\\\n")
print(xtable(Cohort, caption = 'My Title'), caption.placement = 'top', 
      add.to.row = addtorow, include.colnames = FALSE)

add.to.row Toma una lista con dos elementos: pos y command. pos es una lista de cuya longitud es la misma que command que es un vector. Cada elemento de pos es la línea en la tabla donde está colocando el elemento correspondiente de command.

Aquí, quiero que las dos primeras líneas estén donde van las etiquetas. Establecí el primer y segundo elemento de pos a 0 para indicar que estoy poniendo cosas en la parte superior de la mesa. La posición 0 es la entre las dos reglas horizontales en la tabla.

los \\\\\n Producir el '' en el código de látex que se usa al final de cada línea de una tabla más un carácter nuevo.

La ayuda para xtable tiene un buen ejemplo de add.to.row para más información.