如何将数字格式化为百分比值,但仍能够以商业方式处理？

Question

我想知道是否可以在表上显示百分比值,但仍然可以使用它们进行算术运算.

我试过percent()从scales包中使用,但似乎它将值从数字转换为字符.我试图将它们转换回来as.numeric(),但它也无法正常工作.

有解决方案吗 谢谢.

Answer 1

一个非常黑客的方法是这样做

x <- runif(10)
class(x) <- "percent"
print.percent <- function(x) print(scales::percent(as.numeric(x)))

这对于快速分析或短脚本可能很有用,但我不会将其放入任何类型的包或共享代码中.