search for: 7_growth

...ceptual problem which can't be solved by me staring at it ... Since I'm repeating something I have done with gnuplot I know that 3 and 4e-3 as starting values for the fit are appropriate ... Thanks for any hint, Joh setwd("~/Biology/R_versuch") mydata<-read.table("YJG45-7_Growth.dat") x<-mydata$V1 y<-mydata$V2 VH <- function(p) y ~ p[1]/(1+((p[1]-0.008)/0.008)*exp(-(p[2]*x))) plot(x, y, xlab="Time (h)",ylab=expression(OD[600][~nm]),las=1) out <- nlm(VH, p = c(3, 4e-3), hessian = TRUE)