Get or set the numeral system of a vector

These functions retrieve or replace the system attribute of a numeral vector.

Usage

numr_system(x)

Arguments

x

numeral vector.

Examples

x <- numeral(1, "ar")
numr_system(x)
#> [1] "ar"