R：pixiedust - 如何为数字添加千位分隔符？

Question

在pixiedust文档中，我读到尘埃对象中的所有列都是字符。如果我有1000,2300等数字，我怎么能用数千个分隔符来格式化它们，如1'000和2'300等？

Answer 1

虽然所有列都被强制为字符，但在pixiedust的深洞中，它保留了有关每个列最初的内容的一些知识，因此您仍然可以应用函数。你只需要对它有点偷偷摸摸（到目前为止，这是pixiedust的弱点之一，但我认为这是一个不可避免的权衡）。只需将该函数包装在quote中，然后将其传递给fn撒播。

library(pixiedust)
DF <- data.frame(x1 = c(1000, 2000, 2300, 2400),
                 x2 = LETTERS[1:4])

dust(DF) %>%
  sprinkle(cols = "x1", 
           fn = quote(formatC(value, big.mark = "'")))