R言語数字をまるめたい

R
1>a<-2.2000003
2>a<-sprintf('%0.1f',a)
3>a
4[1]"2.2"

となるのですが
as.numeric型で数値変換するとせっかく切り落とした数値が復活します

R
1>a<-as.numeric(a)
2>[1] 2.2000003

切り落とした数値を復活させないまま"2.2"を数値化するにはどうしたらいいでしょうか。
よろしくお願いします。

行動規範の内容に同意します

回答3件

ベストアンサー

私の環境では再現しませんが……。

R
1> a<-2.2000003
2> a<-sprintf("%0.1f", a)
3> a
4[1] "2.2"
5> as.numeric(a)
6[1] 2.2
7> sessionInfo()
8R version 3.2.0 (2015-04-16)
9Platform: x86_64-pc-linux-gnu (64-bit)
10Running under: Ubuntu 14.04.5 LTS
11
12locale:
13 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C              
14 [3] LC_TIME=ja_JP.UTF-8        LC_COLLATE=en_US.UTF-8    
15 [5] LC_MONETARY=ja_JP.UTF-8    LC_MESSAGES=en_US.UTF-8   
16 [7] LC_PAPER=ja_JP.UTF-8       LC_NAME=C                 
17 [9] LC_ADDRESS=C               LC_TELEPHONE=C            
18[11] LC_MEASUREMENT=ja_JP.UTF-8 LC_IDENTIFICATION=C

基本的にコンピューターは2進数に変換した形でしか実数を扱えないので、小数点以下の細かい桁まで完璧に再現できるとの前提でプログラムを書くと問題が出ることがあります。丸めた数値をどう使うつもりか存じませんが、表示だけの問題なら文字列として保持しておくのも一つの現実的な対処法でしょう。

投稿2017/12/06 03:58

KojiDoi

総合スコア13671

KSwordOfHaste

2017/12/06 04:04

あ、誤差の問題というよりfloat/doubleの精度の桁数の問題だったのでしょうかね？自分の回答は大雑把すぎたようです。

KojiDoi

2017/12/06 04:10

私も実数の内部表現についてそれほど深い見識があるわけではないのですが、KSwordOhHasteさんの回答がそれほどおおざっぱすぎるとは感じません。ここで問題なのは「実数は正確には再現できると期待してはいけない（誤差を減らしたり、誤差が問題にならないようにする工夫の余地はある）」ということに尽きると思います。

fermat

2017/12/06 05:11

再現性が無いとのご指摘で、こちらのR言語の仕様を確認したところ、有効桁数のオプションを変えていたためこのような結果になったことが判明しました。気温によって植物に水をやる量を決めたいのですが、計算途中の見やすさから数字をまるめてしまえ～という感じで作業をすすめていました。計算はあくまでも計算として処理しようと考え直して、再度Rのスクリプトを組みなおしています。ありがとうございました。

行動規範の内容に同意します