## Not run:
# ## (data example 2)
# data("dengueoutbreak2")
#
# ##Time point from which is required to see the changes over time
# ##of the final size and turning point estimates:20
#
# t2<-changetimeFSTP(dengueoutbreak2$Incidence,dengueoutbreak2$Time,20)
#
# ##summary function for changetimeFSTP object
# summary(t2)
#
# ## plot function for changetimeFSTP object
# plot(t2,which=c(5,6))
# ## End(Not run)
Run the code above in your browser using DataLab