我想用千位分隔符和指定小数位数来格式化数字.我知道如何分开做，但不能一起做.
例如，我用format/this表示小数:
FormatDecimal <- function(x, k) {
return(format(round(as.numeric(x), k), nsmall=k))
}
FormatDecimal(1000.64, 1) # 1000.6
而对于formatC0人，formatC人:
formatC(1000.64, big.mark=",") # 1,001
不过，这两个因素并不能很好地结合在一起:
formatC(FormatDecimal(1000.64, 1), big.mark=",")
# 1000.6, since no longer numeric
formatC(round(as.numeric(1000.64), 1), nsmall=1, big.mark=",")
# Error: unused argument (nsmall=1)
我怎么能拿到1,000.6？
编辑:这与this question不同，后者要求将3.14格式化为3,14(标记为可能的dup).