round_scale
display the tidy unit of your observations
round_scale(vec)
a vector, which may include different scale of numeric number.
a character vector, which adjust format unit for each element
vec <- c(100.1,10.1,1.1,0.1,0.01,0.001,0.0001,0.00001)
round_scale(vec)
#> [1] "100.1" "10.1" "1.1" "0.1" "0.01" "0.001" "1e-04"
#> [8] "1.0e-05"