Добавление названий в Xtable

Question

Я не уверен, что это вопрос R или вопрос о том. Я смотрю на отметки учеников с 2 временных точек в простой таблице (3 -й класс и 6 класс). Я создал таблицу и печатает, однако я хочу добавить этикетки, чтобы люди знали, какой марк, из какого класса.

Мой код для освоения:

<<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))
@

Я получаю хороший таблицу с подсчетом, однако как ряды, так и столбцы имеют одинаковые обозначения. Как добавить этикетку, чтобы прояснить его?

Answer 1

Чтобы изменить этикетки для Cohort, изменить столбец и rownames:

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

Вы также добавляете названия таблиц в xtable вызов:

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

Вы можете использовать caption.placement Чтобы сказать, куда поместить подпись.

РЕДАКТИРОВАТЬ:

Основываясь на комментариях, я не ответил на вопрос выше. Делать xtable Печать больше похоже на table С этикетками выше уровней вы используете add.to.row в print.xtable Функция:

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 берет список с двумя элементами: pos а также command. pos это список, длина которой такая же, как и command который вектор. Каждый элемент pos это линия в таблице, где вы размещаете соответствующий элемент command.

Здесь я хочу, чтобы первые две строки были туда, где идут этикетки. Я установил первые и вторые элементы pos 0, чтобы указать, что я ставлю вещи на вершину стола. Положение 0 заключается в том, что между двумя горизонтальными правилами в таблице.

А \\\\\n Создайте «» в латексном коде, который используется в конце каждой строки таблицы плюс новая линия.

Помощь для xtable имеет хороший пример add.to.row Чтобы получить больше информации.