R/applyTheiler.R

Defines functions applyTheiler

Documented in applyTheiler

applyTheiler <-
function(RM,thW){
  
  YmX <- RM$ones$Y - RM$ones$X
  aa <- which(YmX > thW)
  RM$ones <- RM$ones[aa,]
  rownames(RM$ones) <- NULL
  RM
  
}

Try the KarsTS package in your browser

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

KarsTS documentation built on Jan. 16, 2021, 5:07 p.m.