R
の数値は浮動小数点ですので、一般的なプログラミング言語での浮動小数点の比較と同じ注意が必要です。
> sin(pi/6) - 0.5
[1] -5.551115e-17
> cos(pi/3) - 0.5
[1] 1.110223e-16
のように、実際には異なる数値ですので、等値比較はFALSEになります。
よくある方法としてはあらかじめ許容誤差を決めておき、それを含めて判定するということをやります。
> epsilon <- 1e-10
> abs(sin(pi/6) - cos(pi/3)) <= epsilon
[1] TRUE
以下の質問投稿で、こうした誤差を考慮した比較用関数を自前で用意するという案もでていました。
cf. floating point - Numeric comparison difficulty in R - Stack Overflowfloating point - Numeric comparison difficulty in R - Stack Overflow