Numeric vector with accounting format

accounting(x, digits = 2L, format = "f", big.mark = ",", ...)

# Default S3 method
accounting(x, digits = 2L, format = "f", big.mark = ",", ...)

# S3 method for class 'character'
accounting(x, digits = max(get_digits(x)), format = "f", big.mark = ",", ...)

Arguments

x

a numeric vector.

digits

an integer to indicate the number of digits of the percentage string.

format

format type passed to formatC.

big.mark

thousands separator

...

additional parameters passed to formattable.

Examples

accounting(15320)
#> [1] 15,320.00
accounting(-12500)
#> [1] (12,500.00)
accounting(c(1200, -3500, 2600), format = "d")
#> [1] 1,200   (3,500) 2,600  
accounting(c("123,23.50", "(123.243)"))
#> [1] 12,323.500 (123.243)