Nothing
# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
norm_fdata_c <- function(v) {
.Call(`_rofanova_norm_fdata_c`, v)
}
norm_fdata_c_sur <- function(v) {
.Call(`_rofanova_norm_fdata_c_sur`, v)
}
wfun_c <- function(x, k, ktun) {
.Call(`_rofanova_wfun_c`, x, k, ktun)
}
sum_fdata_c <- function(x) {
.Call(`_rofanova_sum_fdata_c`, x)
}
sum_fdata_c_sur <- function(x) {
.Call(`_rofanova_sum_fdata_c_sur`, x)
}
div_fdata_c <- function(x, k) {
.Call(`_rofanova_div_fdata_c`, x, k)
}
div_fdata_c_sur <- function(x, k) {
.Call(`_rofanova_div_fdata_c_sur`, x, k)
}
stdandar <- function(x, mu, sig) {
.Call(`_rofanova_stdandar`, x, mu, sig)
}
stdandar_sur <- function(x, mu, sig) {
.Call(`_rofanova_stdandar_sur`, x, mu, sig)
}
center_sur <- function(x, mu) {
.Call(`_rofanova_center_sur`, x, mu)
}
dife <- function(resi_new, resi) {
.Call(`_rofanova_dife`, resi_new, resi)
}
iteration <- function(x, mu0, sig0, kpsi, ktun, tol, maxit) {
.Call(`_rofanova_iteration`, x, mu0, sig0, kpsi, ktun, tol, maxit)
}
iteration_sur <- function(x, mu0, sig0, kpsi, ktun, tol, maxit) {
.Call(`_rofanova_iteration_sur`, x, mu0, sig0, kpsi, ktun, tol, maxit)
}
Mwgt_r <- function(x, cc, family) {
.Call(`_rofanova_Mwgt_r`, x, cc, family)
}
iteration_ho <- function(x, mu0, sig0, cc, family, tol, maxit) {
.Call(`_rofanova_iteration_ho`, x, mu0, sig0, cc, family, tol, maxit)
}
iteration_ho_sur <- function(x, mu0, sig0, cc, family, tol, maxit) {
.Call(`_rofanova_iteration_ho_sur`, x, mu0, sig0, cc, family, tol, maxit)
}
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.