シーケンスでの奇妙な振る舞い

Question

私はシンプルな状態からいくつかの非常に珍しい結果を経験しており、マシンでこれを実行してサニティチェックを行う必要があります。ここでは、コードです：

になり

mySEQ <- seq(0.1, 1.0, by = 0.1) 
for (s in c(0.1, 0.2, 0.3, 0.4, 0.5, 0.6, 0.7, 0.8, 0.9, 1.0)) { print((s + .1) %in% mySEQ) } 
mySEQ[3] == 0.3 

：

> mySEQ <- seq(0.1, 1.0, by = 0.1) 
> for (s in c(0.1, 0.2, 0.3, 0.4, 0.5, 0.6, 0.7, 0.8, 0.9, 1.0)) { print(s %in% mySEQ) } 
[1] TRUE 
[1] TRUE 
[1] FALSE 
[1] TRUE 
[1] TRUE 
[1] TRUE 
[1] FALSE 
[1] TRUE 
[1] TRUE 
[1] TRUE 
> mySEQ[3] == 0.3 
[1] FALSE 
> mySEQ[3] 
[1] 0.3 

私は、彼らがすべてTRUEプリントアウトしていない理由として絶対に当惑しています。 0.3と0.7で何か問題があるかのようです。私はRとすべてのパッケージを更新しましたが、ただそれが私のものかどうかを確認するためにこれを実行する他の人が必要です。それはseq機能で何かのように見えます。ありがとうございました。

これはあなたが詳細については、「Rインフェルノ」の最初の章を読むことができますR.でどのように扱われるか浮動小数点数に関係しています

Answer 1

：

http://www.burns-stat.com/pages/Tutor/R_inferno.pdf

はあなたの例では、質問に答えるために==ではなく、all.equalを使用して浮動小数点数の等価性をチェックしてください。