Nothing
# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
compareOneToOne <- function(Coordinates, Weights, L = 3L, recode = TRUE, method = "approx", algorithm = "colgen", model = "mincostflow", verbosity = "silent", timelimit = 14400, opt_tolerance = 1e-06, unbalanced = FALSE, unbal_cost = 1e+09, convex = TRUE) {
.Call(`_SpatialKWD_compareOneToOne`, Coordinates, Weights, L, recode, method, algorithm, model, verbosity, timelimit, opt_tolerance, unbalanced, unbal_cost, convex)
}
compareOneToMany <- function(Coordinates, Weights, L = 3L, recode = TRUE, method = "approx", algorithm = "colgen", model = "mincostflow", verbosity = "silent", timelimit = 14400, opt_tolerance = 1e-06, unbalanced = FALSE, unbal_cost = 1e+09, convex = TRUE) {
.Call(`_SpatialKWD_compareOneToMany`, Coordinates, Weights, L, recode, method, algorithm, model, verbosity, timelimit, opt_tolerance, unbalanced, unbal_cost, convex)
}
compareAll <- function(Coordinates, Weights, L = 3L, recode = TRUE, method = "approx", algorithm = "colgen", model = "mincostflow", verbosity = "silent", timelimit = 14400, opt_tolerance = 1e-06, unbalanced = FALSE, unbal_cost = 1e+09, convex = TRUE) {
.Call(`_SpatialKWD_compareAll`, Coordinates, Weights, L, recode, method, algorithm, model, verbosity, timelimit, opt_tolerance, unbalanced, unbal_cost, convex)
}
focusArea <- function(Coordinates, Weights, x, y, radius, L = 3L, recode = TRUE, method = "approx", algorithm = "colgen", model = "mincostflow", verbosity = "silent", timelimit = 14400, opt_tolerance = 1e-06, area = "l2") {
.Call(`_SpatialKWD_focusArea`, Coordinates, Weights, x, y, radius, L, recode, method, algorithm, model, verbosity, timelimit, opt_tolerance, area)
}
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.