Rounding to Significant Digits
Rounds to significant digits similarly to signif
.
signi(x, digits = 6)
x
: numeric vector to be rounded.digits
: number of significant digits required.numeric vector close to x
, i.e. by at least digits
significant digits.
Martin Maechler, in prehistoric times (i.e. before 1990).
This is really just round(x, digits - trunc(log10(abs(x))))
and hence mainly of didactical use. Rather use signif()
otherwise.
signif
, round
.
(x1 <- seq(-2, 4, by = 0.5)) identical(x1, signi(x1))# since 0.5 is exact in binary arithmetic (x2 <- pi - 3 + c(-5,-1,0, .1, .2, 1, 10,100)) signi(x2, 3)