在 Flextable 中针对特定列设置数字格式

Question

我在 RStudio 中使用 R 版本 3.6.1。我有flextable版本0.5.5和officer版本0.3.5。

我在 RMarkdown 中的弹性表中格式化数字时遇到困难。默认情况下，所有数字均显示为小数点后 3 位。对于我的一些数字，这很好（实际上是首选），但对于其他数字，我想删除小数。

使用here找到的建议，我能够调整我的表格，以便所有数字都四舍五入到最接近的整数。我的代码如下（用于再现性的示例表；其他格式与我当前的代码相同）。

ft_test <- head(iris) %>% flextable() %>% 
    hline(part = 'header', border = fp_border(color = "black", width = 3)) %>% 
    align(align ='center', part = 'all') %>% 
    align(j = 1, align ='left', part = 'all') %>% 
    set_formatter_type(fmt_double = "%.0f")
ft_test

但是，我只希望某些列是整数，而其他列仍然有小数。我尝试使用

j

参数来调用某些列：

ft_test <- head(iris) %>% flextable() %>% 
    hline(part = 'header', border = fp_border(color = "black", width = 3)) %>% 
    align(align ='center', part = 'all') %>% 
    align(j = 1, align ='left', part = 'all') %>% 
    set_formatter_type(fmt_double = "%.0f", j = 2)
ft_test

...但后来我收到一个错误，告诉我

j = 2

是一个未使用的参数。

对于如何仅调整some列的数量有什么建议吗？预先感谢您的帮助！

Answer 1

您不能使用参数

j

，因为它不是

set_formatter_type

的参数。该功能是为一种或多种数据类型设置格式化程序。对于你的情况，最好使用

colformat_num

。

library(flextable)
library(officer)
library(magrittr)

ft_test <- head(iris) %>% flextable() %>% 
  hline(part = 'header', border = fp_border(color = "black", width = 3)) %>% 
  align(align ='center', part = 'all') %>% 
  align(j = 1, align ='left', part = 'all') %>% 
  colformat_num(j = c("Sepal.Length", "Sepal.Width",
                             "Petal.Length", "Petal.Width"), digits = 1)
ft_test

您可以在此处了解有关格式化内容的更多信息：https://davidgohel.github.io/flextable/articles/display.html

Answer 2

我发现你可以通过在创建灵活之前运行来做到这一点：

set_flextable_defaults（数字= 1）

它对我有用。