R/newS.R

Defines functions newS

newS <- function(y) {
  ind <- order(y[,1])
  list(time = as.double(y[ind,1]),
       fail = as.double(y[ind,2]),
       ind  = ind)
}

Try the grpreg package in your browser

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

grpreg documentation built on July 27, 2021, 1:08 a.m.