# NOT RUN {
rIM1xIPC81 <- drfit(IM1xIPC81, linlogit = TRUE, showED50 = TRUE, EDx = 10)
rIM1xIPC81.drc <- drcfit(IM1xIPC81, linlogit = TRUE, showED50 = TRUE, EDx = 10)
print(rIM1xIPC81,digits=4)
print(rIM1xIPC81.drc,digits=4)
# }
Run the code above in your browser using DataLab