r - 有效数字百分比

Question

我注意到，如果您要打印相同数量级的百分比向量，则percent()可以很好地获得三位有效数字。

> library(scales)
> percent(c(0.123,0.234))
[1] "12.3%" "23.4%"

>percent(c(0.00123,0.00234))
[1] "0.123%" "0.234%"

但是，如果您的百分比具有不同的数量级，percent则会选择适用于最大元素的精度——这对我的用例没有帮助。

> percent(c(0.123,0.00234))
[1] "12.3%" "0.2%" 

当它们具有不同的数量级时，如何获得每个百分比的三个有效数字？

Answer 1

您可以使用sapply()单独考虑每个元素。

> sapply(c(0.123,0.00234), percent)
[1] "12.3%"  "0.234%"

Answer 2

percent 只允许您查看最多 3 位数字，但如果您想要更多数字，您可以做的是：

> test <- c(123.46644, 139.23424646)
> test <- paste(test*100, "%", sep = "")
> test
[1] "12346.644%"    "13923.424646%"