computeAUC(concentration, viability, trunc = TRUE, area.type = c("Fitted", "Actual"), verbose = TRUE)
dose <- c("0.0025","0.008","0.025","0.08","0.25","0.8","2.53","8")
viability <- c("108.67","111","102.16","100.27","90","87","74","57")
computeAUC(dose, viability)
Run the code above in your browser using DataLab