#---------------------
# 2-parameters variant
# Predictor variable values to be used
time<-seq(0,50,by=0.1)
# Using the function, phi must be provided
y<-asymreg.fx(x=time,a=20,b=2.5,phi =5)
plot(time,y,type="l",ylim=c(0,20))
Run the code above in your browser using DataLab