R/RcppExports.R

In shitoushan/mixtureSPRT: Mixture Sequential Probability Ratio Test

# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

#' Calculate mixture Sequential Probability Ratio Test in C++
#'
#' @param x,y Numeric vectors
#' @param xpre,ypre Numeric vectors of pre-experiment data
#' @param sigma Population standard deviation
#' @param tau Mixture variance
#' @param theta Hypothesised difference between \code{x} and \code{y}
#' @param distribution The desired distribution.
#' @param alpha Significance level
#' @return The likelihood ratio
#' @name cppmSPRT
#' @export
NULL

cppmSPRT <- function(x, y, xpre, ypre, sigma, tau, theta = 0, distribution = "normal") {
    .Call('_mixtureSPRT_cppmSPRT', PACKAGE = 'mixtureSPRT', x, y, xpre, ypre, sigma, tau, theta, distribution)
}