格式化/引用 kable 表中的字符串

Question

我正在尝试格式化 kable 表列以用引号将字符串括起来。我的问题是，如果标签有尾随或前导空格或类似问题，我无法区分它们。

library(knitr)
kable(as.data.frame(table(c('',' ',' '))), format='html')

我的首选输出是这样的：

|Var1 | Freq|
|:----|----:|
| " " |    3|
|  "" |    5|

Answer 1

感谢 Nice，我创建了一个小函数来解决这个问题。

myKableCount <- function(x) {
  df <- as.data.frame(table(x), stringsAsFactors=FALSE)
  df[[1]] <- paste0('"', df[[1]], '"')
  kable(df)
}