R/plott.R

Defines functions plott

plott <-
function(data, x, L){
  ddx <- array(0, dim = c(L, 1))
  for(i in 1 : (length(x)- 1)){
    ddx[x[i] : (x[i + 1] - 1), ] <- (mean(data[x[i] : (x[i + 1] - 1), 1]))
  }
  return(ddx)
}

Try the breakpoint package in your browser

Any scripts or data that you put into this service are public.

breakpoint documentation built on May 29, 2017, 11 a.m.