# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
vecnorm_row <- function(x) {
.Call(`_spatialr_dev_vecnorm_row`, x)
}
vecnorm_diag <- function(x) {
.Call(`_spatialr_dev_vecnorm_diag`, x)
}
uv_norm <- function(u, v) {
.Call(`_spatialr_dev_uv_norm`, u, v)
}
fct_c_opt_adam <- function(gradients, state) {
.Call(`_spatialr_dev_fct_c_opt_adam`, gradients, state)
}
pdist <- function(x, w, index) {
.Call(`_spatialr_dev_pdist`, x, w, index)
}
fct_c_optimize <- function(x, u, v, w, index, lambda, cnorm, epsilon, maxiter) {
.Call(`_spatialr_dev_fct_c_optimize`, x, u, v, w, index, lambda, cnorm, epsilon, maxiter)
}
obs_log_like <- function(test_x, u, v, test_nn, index_map) {
.Call(`_spatialr_dev_obs_log_like`, test_x, u, v, test_nn, index_map)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.