zapsmall - RとLinuxと...

RとLinuxと...


zapsmall

Rの備忘録

> (x <- 2.3 - 1.3)
[1] 1
> # 厳密には1ではない
> sprintf("%.16f", x)
[1] "0.9999999999999998"
> # したがって1との比較は偽になる
> if (x >= 1) print("x >=1") else print("x<1")
[1] "x<1"
> # このような場合に「zapsmall」が使えることがある
> if (zapsmall (x) >= 1) print("x >=1") else print("x<1")
[1] "x >=1"
>

ただし注意のこと

 
Link: Rの備忘録(1824d)
Last-modified: 2011-01-09 (日) 11:55:16 (2898d)