<= returns wrong result? Why

 this is the output result

 > Rk[47] <= RB[21]

 [1] FALSE

 > Rk[47]

 [1] 0.002842007

 > RB[21]

 [1] 0.002842007

I would suspect that, if you're looking at all the digits, the two are
not exactly the same. I would try
round(Rk[47], 10) <= round(RB[21], 10)

Liviu