The problem is the following:
sqrt (3) ^ 2 == 3
When the R compiler evaluates this line of code it gives the following result:
> sqrt (3) ^ 2 == 3
[1] FALSE
But this expression can not be FALSE because of the following: (sqrt(x))^2 = x. What is the problem?