#load antigenicity data
data(antigenicity)
#run step1_down fit
fit1 <- step1_down(data = antigenicity, y = "conc", .time = "time",
C = "Celsius", max_time_pred = 3)
#plot diagnostic plots to asses the fit
step1_plot_diagnostic(fit1)
Run the code above in your browser using DataLab