如何插入“。”到数字列中的特定位置？

Question

我要插入一个“。”数字列中每个条目的第二位数字后的字符。

例如，我希望数值4440046成为字符串44.40046。我尝试了几种方法并在线搜索了问题，但我没有任何运气。

Answer 1

可能适用于正数的一种解决方案可能是：

x <- c(4440046, 444004600, 4440, 445.2, 40)

x/10^(nchar(trunc(x)) - 2)

[1] 44.40046 44.40046 44.40000 44.52000 40.00000

它不适用于单个整数正数。但是，我不确定这种情况下的输出是什么。

Answer 2

sub("(^[0-9]{2})", "\\1.", as.character(x))