r - 有効数字付きのパーセンテージ

Question

percent()同じ大きさのパーセンテージのベクトルを印刷している場合、有効数字3桁を取得するのにうまく機能することに気付きました。

> 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%" 

桁数が異なる場合、各パーセントに対して 3 つの有効数字を取得するにはどうすればよいですか?

Answer 1

を使用sapply()して、各要素を個別に検討できます。

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