在输出中使用ftable和引号进行平移

Question

我试图用ftable和pander来获得一个可爱的三向交叉。通常输出没问题，但行和列名都是引号，这是不理想的。

示例：

library(pander)
varA <-c("a","a","a","a","b","b")
varB <-c(1,2,1,2,1,2)
varC <-c(1,2,3,4,5,6)

tab1<-ftable(table(varA,varB,varC))
pander(tab1)

我不知道我怎么能插入格式化表格，所以它看起来不会很糟糕（复制粘贴用它做了一些奇怪的事情），但在编织后它看起来像在下面的截图：

提前感谢您的帮助。

Answer 1

我认为这是一个错误，所以感谢报告此问题 - 希望现在fixed：

> pander(tab1)

---- ---- ---- - - - - - -
          varC 1 2 3 4 5 6

varA varB                 

 a    1        1 0 1 0 0 0

      2        0 1 0 1 0 0

 b    1        0 0 0 0 1 0

      2        0 0 0 0 0 1
---- ---- ---- - - - - - -

请尝试development version installed from GitHub并随时报告GitHub issue tracker中可能存在的类似问题或任何建议。