如何在R中将数字格式化为百分比

作为 R 的新手，曾经让我感到困惑的一件事是如何将数字格式化为打印的百分比。

例如，显示0.12345为12.345%。我有许多解决方法，但这些似乎都不是“新手友好”。例如：

set.seed(1)
m <- runif(5)

paste(round(100*m, 2), "%", sep="")
[1] "26.55%" "37.21%" "57.29%" "90.82%" "20.17%"

sprintf("%1.2f%%", 100*m)
[1] "26.55%" "37.21%" "57.29%" "90.82%" "20.17%"

scales

library('scales')
percent((1:10) / 100)
#  [1] "1%"  "2%"  "3%"  "4%"  "5%"  "6%"  "7%"  "8%"  "9%"  "10%"

formattable

查看包中的percent函数formattable：

library(formattable)
x <- c(0.23, 0.95, 0.3)
percent(x)
[1] 23.00% 95.00% 30.00%