powered by
cut_tour(x, cut, exclude_cut = TRUE)
TOUR
FALSE
data("USCA50") tsp <- insert_dummy(USCA50, label = "cut") tour <- solve_TSP(tsp) ## cut tour into path at the dummy city path <- cut_tour(tour, "cut") labels(path)
Run the code above in your browser using DataLab