powered by
rpf.drm(factors = 1, multidimensional = TRUE, poor = FALSE)
TRUE
factors>1
FALSE
factors==1