2

好吧，转换as.double似乎可以工作，但是添加一个非整数会被截断回整数。例如，这是设置：

geo <- fetch.data.from.mysql(...)
> head(geo$total_time)
[1] 1586  165 5339 1586 2895 1178
> typeof(geo$total_time)
[1] "integer"
> typeof(as.double(geo$total_time))
[1] "double"

到目前为止，一切都按预期进行。但是当你尝试向它添加 0.5 时，它说它是一个双精度数，但它会像整数一样截断小数部分：

> head(geo$total_time + 0.5)
[1] 1586  166 5340 1586 2896 1178
> head(as.double(geo$total_time) + 0.5)
[1] 1586  166 5340 1586 2896 1178
> typeof(geo$total_time + 0.5)
[1] "double"

MySQL数据库中的列是：`total_time` int(32) default NULL

我真的需要为这个向量添加一些抖动，所以这让我发疯了。任何帮助，将不胜感激。最后，sessionInfo()：

 > sessionInfo()
 R version 2.12.0 (2010-10-15)
 Platform: x86_64-apple-darwin9.8.0/x86_64 (64-bit)

 locale:
 [1] en_US.UTF-8/en_US.UTF-8/C/C/en_US.UTF-8/en_US.UTF-8

 attached base packages:
 [1] grid      stats     graphics  grDevices utils     datasets  methods   base     

 other attached packages:
 [1] RMySQL_0.7-5  DBI_0.2-5     ggplot2_0.8.8 proto_0.3-8   reshape_0.8.3 plyr_1.2.1   

 loaded via a namespace (and not attached):
 [1] tools_2.12.0
4

1 回答 1

4

我现在觉得很愚蠢，但事实证明，数字确实有小数部分，但由于options(digits=3)在我的.Rprofile.

> options(digits=10)
> head(geo$total_time + 0.5)
[1] 1586.5  165.5 5339.5 1586.5 2895.5 1178.5

故事的寓意是：不要相信你的一切print()。

于 2010-12-08T01:46:45.310 回答