如何解决不要在kable函数中删除空格-例如
我正在汇总数据并在Shiny应用程序中创建一个表。我的基本问题是,我想在级联字符串的元素之间添加一些额外的空格,以使其更具可读性,但是添加的空格似乎消失了。我认为paste()函数适当地在“ +/-”符号周围添加了额外的空格,但是使用kable或kableExtra创建表会删除空格。
我想我问的是the same question as this person did,但那个人没有提供完整的可复制示例。我试图用虹膜数据集在下面创建一个reprex。
我有3次尝试使用mutate()创建带有“ +/-”符号的新变量。我最好的理解是,这并不是真正的问题。我希望能够在此符号的两侧添加任意数量的空格,以提高可读性。
library(tidyverse)
library(kableExtra)
data(iris)
data.summary = iris %>%
group_by(Species) %>%
summarise(N = n(),avg.sepal.width = round(mean(Sepal.Width),2),sd.sepal.width = round(sd(Sepal.Width),2)) %>%
# mutate(table.name = paste(avg.sepal.width,'\u00B1',sd.sepal.width)) %>%
# mutate(table.name = paste(avg.sepal.width,sd.sepal.width,sep= " ")) %>%
mutate(table.name = paste(avg.sepal.width,' ',sep= " ")) %>%
knitr::kable(caption = "Iris Avg Sepal Width \u00B1 Standard Deviation ",align = "c") %>%
kableExtra::kable_styling(bootstrap_options = c("striped","hover","condensed"),full_width = F,position = "left")
data.summary
这是在RStudio中查看的结果表的屏幕快照。使用Shiny时,结果是相同的。不管我添加多少空格,在此表中格式化时它们都会消失
解决方法
这不是kable
问题。这就是html的行为方式。如果要在文本中添加多余的空格,则需要在文本中添加" "
。将其设置为粘贴分隔符,并确保您在escape = FALSE
内转动kable
:
library(tidyverse)
library(kableExtra)
data(iris)
data.summary = iris %>%
group_by(Species) %>%
summarise(N = n(),avg.sepal.width = round(mean(Sepal.Width),2),sd.sepal.width = round(sd(Sepal.Width),2)) %>%
mutate(table.name = paste(avg.sepal.width,'\u00B1',sd.sepal.width,sep = " ")) %>%
knitr::kable(caption = "Iris Avg Sepal Width \u00B1 Standard Deviation ",align = "c",escape = FALSE) %>%
kableExtra::kable_styling(bootstrap_options = c("striped","hover","condensed"),full_width = F,position = "left")
data.summary
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。