powered by
drFitSpline(conc, test, drID = "undefined", control = grofit.control())
conc
grofit.control
drFit
test
nls
smooth.spline
control
summary.drFitSpline
plot.drFitSpline
x <- 1:30 y <- 1/(1+exp(-0.5*(15-x)))+rnorm(30)/20 TestRun <- drFitSpline(x,y) print(summary(TestRun)) plot(TestRun)
Run the code above in your browser using DataLab