Try this:
library(drc)
plot(y ~ x)
mod <- multdrc(y ~ x)
lines(x, fitted(mod))
On 4/29/07, Milton Cezar Ribeiro <milton_ruser at yahoo.com.br>
wrote:> Hi R-friends
>
> How can I adjust a sigmondal shaped regression in R?
> My data looks like
>
> x<-c(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16)
> y<-c(10,11,11,14,15,35,42,49,80,120,130,138,149,150,151,150)
> plot(y~x)
> modlin<-glm(y~x)
> yest<-predict(modlin)
> lines(yest~x)
>
> thanks a lot
>
> Miltinho
> Brazil
>
> __________________________________________________
>
>
> [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at stat.math.ethz.ch mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>