R/solver.christofides.R

In jakobbossek/salesperson: Computation of Instance Features and R Interface to the State-of-the-Art Exact and Inexact Solvers for the Traveling Salesperson Problem

#' @export
makeTSPSolver.christofides = function() {
  makeTSPSolverInternal(
    cl = "christofides",
    short.name = "chris",
    name = "Christofides 2/3 approximation",
    properties = c("euclidean", "external", "requires.tsplib", "deterministic")
  )
}

#' @export
# @interface see runTSPSolver
run.christofides = function(solver, instance, ...) {
  callAustralianSolverInterface(instance, bin = solver$bin, solver = "CHRIS")
}