Fixed regression with QFAC (was to be qnorm(.25,lower.tail=F)*2, copy
glitch from R package np)