Number options

[teunbrand]

This PR aims to fix #376.

Briefly, it adds a new function number_options() that globally sets options for formatting numbers.
Subsequently, the label_*() functions use these options by default.

Rendered examples of the documentation:

devtools::load_all("~/packages/scales/")
#> ℹ Loading scales

# Default number formatting
x <- c(0.1, 1, 1000)
label_number()(x)
#> [1] "0.1"     "1.0"     "1 000.0"

# Now again with new options set
number_options(style_positive = "plus", decimal.mark = ",")
label_number()(x)
#> [1] "+0,1"     "+1,0"     "+1 000,0"

# The options are the argument names with a 'scales.'-prefix
options("scales.style_positive")
#> $scales.style_positive
#> [1] "plus"

# Resetting the options to their defaults
number_options()
label_number()(x)
#> [1] "0.1"     "1.0"     "1 000.0"

^{Created on 2024-10-03 with reprex v2.1.1}