在R中的表中添加额外的列名和行名?

时间:2013-11-13 20:44:39

标签: r formatting xtable

我有一个我从table()函数生成的表,我还使用xtable打印它,如下所示:

          FF NF NN Sum
     FF   8  0  0   8
     NF   7  8  0  15
     NN   3  1  4   8

我想以下列格式添加其他列名和rowname。

           Time2
   Time1 FF NF NN Sum
     FF   8  0  0   8
     NF   7  8  0  15
     NN   3  1  4   8

我看了xtable但找不到任何东西。 colnames()更改现有列的名称,rownames()对rownames执行相同操作。

1 个答案:

答案 0 :(得分:6)

你有几个选择。

第一种是“手动”将这些名称添加到表格对象中。

## An example of a table object with unnamed dimnames 
x <- with(warpbreaks, table(unname(wool), unname(tension)))
x
#     L M H
#   A 9 9 9
#   B 9 9 9

names(dimnames(x)) <- c("Time1", "Time2")
x
#      Time2
# Time1 L M H
#     A 9 9 9
#     B 9 9 9

第二个(通常更可取的)选项是在table()的初始调用中提供名称,如下所示:

table(Time1 = warpbreaks[[2]], Time2 = warpbreaks[[3]])
#      Time2
# Time1 L M H
#     A 9 9 9
#     B 9 9 9