powered by
numeric
Finds changes points (i.e. corners) in the numeric vector.
ChangePoints(x)
The vector of index of change points.
numeric vector.
The end points of the vector will be always included in the results.
x <- rwiener(100) cid <- ChangePoints(x) plot(x, type="l") points(time(x)[cid], x[cid], cex=0.5, col=2, pch=19)
Run the code above in your browser using DataLab