如何在 R 中设置千位分隔符?
How to set thousands separator in R?
有人知道如何在 R 中设置千位分隔符吗?
我想得到这样的输出:
123 425 231
或
123.425.231
而不是:
123425231
谢谢。
你可以试试这个:
x <- 123456789101112
formatC(x, format="f", big.mark = ",", digits=0)
#[1] "123,456,789,101,112"
当然您可以根据需要更改"big.mark"的条目,例如,将其替换为空格。
通过正则表达式,
gsub("(?!^)(?=(?:\d{3})+$)", ".", '53332', perl=T)
# [1] "53.332"
gsub("(?!^)(?=(?:\d{3})+$)", ".", '533382', perl=T)
# [1] "533.382"
gsub("(?!^)(?=(?:\d{3})+$)", ".", '5333829', perl=T)
# [1] "5.333.829"
gsub("(?!^)(?=(?:\d{3})+$)", ",", '5333829', perl=T)
# [1] "5,333,829"
有人知道如何在 R 中设置千位分隔符吗?
我想得到这样的输出:
123 425 231
或
123.425.231
而不是:
123425231
谢谢。
你可以试试这个:
x <- 123456789101112
formatC(x, format="f", big.mark = ",", digits=0)
#[1] "123,456,789,101,112"
当然您可以根据需要更改"big.mark"的条目,例如,将其替换为空格。
通过正则表达式,
gsub("(?!^)(?=(?:\d{3})+$)", ".", '53332', perl=T)
# [1] "53.332"
gsub("(?!^)(?=(?:\d{3})+$)", ".", '533382', perl=T)
# [1] "533.382"
gsub("(?!^)(?=(?:\d{3})+$)", ".", '5333829', perl=T)
# [1] "5.333.829"
gsub("(?!^)(?=(?:\d{3})+$)", ",", '5333829', perl=T)
# [1] "5,333,829"