向R中的表添加额外的列名和行名？

我有一个从

table（）

函数生成的表，我进一步使用xtable将其打印如下：

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

我想添加以下格式的附加列名和行名

           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执行相同的操作

你有两个选择

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

---

data.frame（table（））

@Ananta，谢谢！我尝试过这样做，但没有帮助，因为已经有一个列/行名称。谢谢。对于表格来说，dimnames（）是有意义的。我浪费了太多时间专注于colnames（）。@Arihant--是的，我记得有一次也同样被这个问题难住了。执行

str（x）

（尤其是在确实显示维度名称的表对象

x

上）可能已经为您提供了所需的线索。

## 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(Time1 = warpbreaks[[2]], Time2 = warpbreaks[[3]])
#      Time2
# Time1 L M H
#     A 9 9 9
#     B 9 9 9