r - 在R中将字符串转换为数字

Question

我在简单地编写一个将数字的字符串表示形式转换为十进制表示形式的函数时遇到了麻烦。要将问题归结为要点，请考虑以下功能：

   f <- function(x) {
      y <- as.numeric(x)
      return(y)
   }

当我将此函数应用于字符串“47.418”时，我得到了 47.42，但我想要得到的是 47.418。似乎由于某种原因，返回值被四舍五入。

任何建议，将不胜感激

Answer 1

您对打印选项做了一些事情。我没有四舍五入：

> f <- function(x) { y <- as.numeric(x); return(y) }
> f(47.418)
[1] 47.418

?options

数字的默认值为 7：

> options("digits")
$digits
[1] 7

进一步的问题应伴随有dput()问题的对象。