doc/test_plot.nls.R

fileName <- "https://www.casaonofri.it/_datasets/degradation.csv"
degradation <- read.csv(fileName)
head(degradation, 10)
modNlin <- nls(Conc ~ A*exp(-k*Time), 
               start=list(A=100, k=0.05), 
               data=degradation)
summary(modNlin)
plot(modNlin, which = 1)
OnofriAndreaPG/aomisc documentation built on May 16, 2023, 3:40 p.m.