Nothing
# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
UpdateGamma_cpp <- function(sobj, hyperpar, ini, S, method, MRF_G, MRF_2b) {
.Call(`_BayesSurvive_UpdateGamma_cpp`, sobj, hyperpar, ini, S, method, MRF_G, MRF_2b)
}
UpdateRPlee11_cpp <- function(sobj, hyperpar, ini, S, method, MRF_G) {
.Call(`_BayesSurvive_UpdateRPlee11_cpp`, sobj, hyperpar, ini, S, method, MRF_G)
}
func_MCMC_graph_cpp <- function(sobj, hyperpar, ini, S, method, MRF_2b) {
.Call(`_BayesSurvive_func_MCMC_graph_cpp`, sobj, hyperpar, ini, S, method, MRF_2b)
}
list_to_matrix <- function(r_list) {
.Call(`_BayesSurvive_list_to_matrix`, r_list)
}
list_to_cube <- function(r_list) {
.Call(`_BayesSurvive_list_to_cube`, r_list)
}
list_to_vector <- function(r_list) {
.Call(`_BayesSurvive_list_to_vector`, r_list)
}
settingInterval_cpp <- function(y, delta_, s_, J_) {
.Call(`_BayesSurvive_settingInterval_cpp`, y, delta_, s_, J_)
}
updateBH_cpp <- function(x_, beta_, J_, ind_r_d_, hPriorSh_, d_, c0_) {
.Call(`_BayesSurvive_updateBH_cpp`, x_, beta_, J_, ind_r_d_, hPriorSh_, d_, c0_)
}
updateBH_list_cpp <- function(x_, beta_, J_, ind_r_d_, hPriorSh_, d_, c0_) {
.Call(`_BayesSurvive_updateBH_list_cpp`, x_, beta_, J_, ind_r_d_, hPriorSh_, d_, c0_)
}
calJpost_helper_cpp <- function(cbtau, x_, beta_, h_, hPriorSh_, c0_, ind_r_d_, ind_d_) {
.Call(`_BayesSurvive_calJpost_helper_cpp`, cbtau, x_, beta_, h_, hPriorSh_, c0_, ind_r_d_, ind_d_)
}
updateRP_genomic_cpp <- function(p, x_, J_, ind_r_, ind_d_, ind_r_d_, be_, be_prop_sd_scale, ga_, h_, tau, cb) {
.Call(`_BayesSurvive_updateRP_genomic_cpp`, p, x_, J_, ind_r_, ind_d_, ind_r_d_, be_, be_prop_sd_scale, ga_, h_, tau, cb)
}
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.