R/scurve.R

Defines functions scurve

Documented in scurve

scurve <-function(x,a=1,start=1,end=2){

x<-x*20 - 10

b<-end-start

y<-1/(1+exp(-a*x))

y<-y*b+start

return(y)
}

Try the LS2Wstat package in your browser

Any scripts or data that you put into this service are public.

LS2Wstat documentation built on July 19, 2018, 9:02 a.m.