r - 带有多行标题的 print.xtable？

Question

我一直在尝试创建一个带有包含类似中断的标题的表。我在这里并没有太大的野心，我并不真正关心我是否只是打破了极长的字符串或一般只有两行标题。

dat <- matrix(round(rnorm(9, 20, 10)), 3, 3)
colnames(dat) <- c("some very long colname","short","another toooooooolong colname")
require(xtable)
m <- xtable(dat)

print(m,                  
              floating=FALSE, 
              hline.after=NULL,                  
              size="\\footnotesize",
              tabular.environment="tabular",
              add.to.row=list(pos=list(-1,0,nrow(m),0
                                       ), 
              command=c('\\toprule ',
                        '\\midrule ',
                        '\\bottomrule',
                        '\\\\ \\rowcolor[gray]{.9}'
                        )
                              )
              )

有没有办法换行标题，因为我的表格不再适合页面，尽管我已经使用landscape了。一些sanitize.rownames基于技巧？摆弄着，\shortstack但无法让它去......

Answer 1

（将我的评论写成正确的答案）

在对 的调用中xtable，您可以指定各种对齐参数，其中一个是parbox用于包装文本的固定宽度的 a。这是用p{1in}大括号内指定的值指定框（列）的宽度来指定的。您必须手动指定它（而不是让它适应可用空间），但它确实为您提供了一种包装文本的选项。