Nothing
# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
#' @noRd
Amat <- function(b, X, W_star, H, I, logT, Q) {
.Call('_qris_Amat', PACKAGE = 'qris', b, X, W_star, H, I, logT, Q)
}
#' @noRd
ghatC <- function(Time, censor, wgt) {
.Call('_qris_ghatC', PACKAGE = 'qris', Time, censor, wgt)
}
#' @noRd
isObjE <- function(b, X, H, I, logT, D, t0, Q, B) {
.Call('_qris_isObjE', PACKAGE = 'qris', b, X, H, I, logT, D, t0, Q, B)
}
#' @noRd
isObj <- function(b, X, W, H, I, logT, Q) {
.Call('_qris_isObj', PACKAGE = 'qris', b, X, W, H, I, logT, Q)
}
#' @noRd
isObjL <- function(b, X, H, logT) {
.Call('_qris_isObjL', PACKAGE = 'qris', b, X, H, logT)
}
#' @noRd
rev_isObj <- function(b, X, W, H, E, I, logT, Q) {
.Call('_qris_rev_isObj', PACKAGE = 'qris', b, X, W, H, E, I, logT, Q)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.