You can try this:
library(inflection)
#you have to instsall package inflection first
a<-findiplist(cbind(year),cbind(piproute),1)
a
The answer:
[,1] [,2] [,3]
[1,] 5 35 1986.0
[2,] 5 30 1983.5
shows that the total inflection point is between 1983 and 1986, if we treat
data as first concave and then convex, as it can be found from a simple
graph.
--
View this message in context:
http://r.789695.n4.nabble.com/Identifying-breakpoints-inflection-points-tp2065886p4668889.html
Sent from the R help mailing list archive at Nabble.com.
______________________________________________
[email protected] 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.