R/diff0.R

diff0 <- function(x, ...) {
  if (!is.vector(x)) stop("Muste be vetor")
  return(c(0,diff(x , ...)))
}
felasa/fdtools documentation built on May 16, 2019, 12:46 p.m.