将字符串转换为R中的数字

Question

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

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

当我将此函数应用于字符串＆＃34; 47.418＆＃34;我回到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()。