I got an error when using plot(doseResponse(dat), log.scale = TRUE)
plot(doseResponse(dat), log.scale = TRUE)