R/get_one_sample.R
In sprtt: Sequential Probability Ratio Tests: Using t-Statistic

get_one_sample <- function(y) {
  if (is.null(y) || (length(y) == 1)) {
    one_sample <- TRUE
  } else{
    one_sample <- FALSE
  }
  one_sample
}

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

sprtt documentation built on Aug. 7, 2021, 1:06 a.m.

Note that we can't provide technical support on individual packages. You should contact the package authors for that.

Try the sprtt package in your browser