r - pivottabler：用逗号格式化数字

Question

我想知道如何使用包中的逗号qpvt和qhpvt函数显示数字pivottabler R。

library(pivottabler)
qpvt(bhmtrains, "TOC", "TrainCategory", "n()")
                    Express Passenger  Ordinary Passenger  Total  
Arriva Trains Wales               3079                 830   3909  
CrossCountry                     22865                  63  22928  
London Midland                   14487               33792  48279  
Virgin Trains                     8594                       8594  
Total                            49025               34685  83710  

qhpvt(bhmtrains, "TOC", "TrainCategory", "n()")

Answer 1

由于函数被评估为表达式中提到的vignette

... 指定计算。summarise 表达式必须是可以与 dplyr summarise() 函数一起使用的表达式。此表达式由具有 dplyr 汇总函数的 pivottabler 包在内部使用。

comma我们可以用from包裹那些formattable

library(pivottabler)
qhpvt(bhmtrains, "TOC", "TrainCategory", "formattable::comma(n(), digits = 0)")

-输出

---

还有一个format/formats参数，我们可以使用单一格式或格式列表（当使用多个表达式时），即如果我们想显示数字

qhpvt(bhmtrains, "TOC", "TrainCategory", "n()", format = "%.2f" )