r - 在 knitr 中打印 HTML 或 Word 表，以便考虑字符串中的空格

Question

使用 knitr 和 Rstudio，我试图将数据帧打印到 HTML 或 Word，以便 versicolor 中的前导空格将 versicolor 推到右侧。

#data
library(knitr ) 
library(xtable)

df <- iris[c(1,51),c(5,1)]
df$Species  <- as.character(df$Species)
df$Species[ df$Species=="versicolor"]  <- "         versicolor"

尝试 kable() 的不同组合...

#table
kable(  df)
kable(  df, right = FALSE,align = c("l", "l" ) )
kable(  df, right = FALSE,align = c("r", "l" ) )

我明白了:


...或这个:


但我试图得到这个:

Answer 1

如果您愿意使用一些 HTML:

df$Species[ df$Species=="versicolor"]  <- 
  "<code style='background:white'>         </code>versicolor"` will get you something like you want

或者

df$Species[ df$Species=="versicolor"]  <- 
  "<span style='padding-left:30px'>         versicolor</span>"

会让你留下空间填充。

后者甚至可能以编程方式更干净(在 padding-left 中插入 # 的倍数。