1 2 3 4
library(drfit) data(XY) rXY <- drfit(XY,logit=TRUE,weibull=TRUE,chooseone=FALSE) print(rXY,digits=5)
Contact - Imprint