Full_Name: Paul Vos
Version: 2.0.1
OS: windows XP
Submission from: (NULL) (150.216.148.20)


> zapsmall(.3-.2-.1,digits=7)
[1] -2.775558e-17

This should be zero.  By changing the condition
if (mx > 0)
in zapsmall to 
if (mx > 1)
we get

> zapsmall(.3-.2-.1,digits=7)
[1] 0

______________________________________________
R-devel@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel

Reply via email to