
Calculate the length of a tour given a TSP and an order.
tour_length(x, ...)
# S3 method for TOUR
tour_length(x, tsp = NULL, …)
an object of class TOUR
.
a TSP object of class TSP
, ATSP
or ETSP
.
further arguments are currently unused.
If no tsp
is given, then the tour length stored in x
as attribute "tour_length"
is returned.
If tsp
is given then the tour length is recalculated.
If a distance in the tour is infinite, the result is also infinite. If
the tour contains positive and negative infinite distances then the method
returns NA
.
# NOT RUN {
data("USCA50")
## original order
tour_length(solve_TSP(USCA50, method="identity"))
## length of a manually created (random) tour
tour <- TOUR(sample(seq(n_of_cities(USCA50))))
tour
tour_length(tour)
tour_length(tour, USCA50)
# }
Run the code above in your browser using DataLab