# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
C_midrqLoss <- function(b, G, x, yo, offset, type, tau, n, p, k) {
.Call(`_Qtools_C_midrqLoss`, b, G, x, yo, offset, type, tau, n, p, k)
}
C_midrqLoss_bc <- function(b, G, x, yo, offset, type, tau, lambda, n, p, k) {
.Call(`_Qtools_C_midrqLoss_bc`, b, G, x, yo, offset, type, tau, lambda, n, p, k)
}
C_midrqLoss_ao <- function(b, G, x, yo, offset, type, tau, lambda, n, p, k) {
.Call(`_Qtools_C_midrqLoss_ao`, b, G, x, yo, offset, type, tau, lambda, n, p, k)
}
C_rcTest <- function(x, psi, omega, n, p, B) {
.Call(`_Qtools_C_rcTest`, x, psi, omega, n, p, B)
}
C_projfun <- function(x, z, sgn, nx, nz, p, ndir) {
.Call(`_Qtools_C_projfun`, x, z, sgn, nx, nz, p, ndir)
}
C_phifun <- function(x, z, nx, nz, B, ndir, ng, taus, minn, maxn) {
.Call(`_Qtools_C_phifun`, x, z, nx, nz, B, ndir, ng, taus, minn, maxn)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.