powered by
The function finds the average of the input vector x between change-points given in cpt.
x
cpt
means.between.cpt(x, cpt = NULL, ...)
a vector
a vector of integers with localisations of change-points
further arguments passed to mean method
mean
a vector of the same length as x, piecewise constant and equal to the mean between change-points given in cpt
# NOT RUN { x <- rnorm(100)+c(rep(-1,50),rep(1,50)) cpt <- 50 means.between.cpt(x,cpt) w <- wbs(x) cpt <- changepoints(w) means.between.cpt(x,cpt=cpt$cpt.ic$sbic) # }
Run the code above in your browser using DataLab