当字符串转换为数值时，带有 numeric 的 as.character（） 会失去精度

问：

在 R 中，我想运行以下代码：

str <- "2811.1019192874087"
val <- as.numeric(str)
str2 <- as.character(val)
print(str2)
print(val)

它打印：

"2811.10191928741"
 2811.102

但我想要：

"2811.1019192874087"
 2811.102

简而言之，我希望 as.character（） 的精度不会丢失。我已经尝试使用where是我选择的数字，但这只会改变输出，而不会改变值本身。我也尝试使用.这个系统似乎可以工作，但不幸的是，输出是类型而不是类型。options(digits = x)xtrimws(format(round(x, k), nsmall=k))characternumeric

如果我在 Java 中做同样的事情，它就可以正常工作。我运行以下代码：

String str = "2811.1019192874087";
double val = Double.parseDouble(str);
String str2 = String.valueOf(val);
System.out.println(str2);
System.out.println(val);

它打印：

2811.1019192874087
2811.1019192874087

如何在 R 中解决问题？非常感谢