在R中手动输入列联表

Question

嗨，我在R中有以下代码，

> trial <- matrix(c(6,9,6,5,2,2,5,8,5,3,2,4,6,8,8), ncol=5,byrow=T)
> colnames(trial) <- c('Never','Rarely','Sometimes', 'Often' ,'Always')
> rownames(trial) <- c('Walk', 'Bus','Drive')

> trial
      Never Rarely Sometimes Often Always
Walk      6      9         6     5      2
Bus       2      5         8     5      3
Drive     2      4         6     8      8

但是我想要的是

Breakfast  Never  Rarely  Sometimes Often  Always
Travel
Walk         6      9       6         5      2
Bus          2      5       8         5      3
Drive        2      4       6         8      8

即早餐有选项从不，很少等的列联表。 和Travel可以选择Walk，bus等。 谢谢

Answer 1

有礼貌的礼貌：Salvatore S. Mangiafico，博士。

trial <- matrix(c(6,9,6,5,2,2,5,8,5,3,2,4,6,8,8), ncol=5,byrow=T)
colnames(trial) <- c('Never','Rarely','Sometimes', 'Often' ,'Always')
rownames(trial) <- c('Walk', 'Bus','Drive')

Trial = as.table(trial)

dimnames(Trial)
names(dimnames(Trial)) = c("Transport", "Breakfast")