关于r语言:R语言旅行推销员问题TSP

原文链接：http://tecdat.cn/?p=6551

罕用术语中的旅行推销员问题（TSP）是最简单的问题之一，归结为组合优化。旅行到n个城市（顶点）须要查看（n-1）！可能性。3,000个地点有4 * 10 ^ 9131个可能的解决方案。

本文考察了R包的性能：TSP和tspmeta。后果对我的应用十分称心。

以下代码输入您的TSP225.csv文件并输入您的解决方案和可视化。生成的'tour'对象是一类TOUR和整数;它蕴含您的解决方案。

coords.df <- data.frame(long=TSP225$Long, lat=TSP225$Lat)coords.mx <- as.matrix(coords.df)# Compute distance matrixdist.mx <- dist(coords.mx)# Construct a TSP objecttsp.ins <- tsp_instance(coords.mx, dist.mx )#tour <- run_solver(tsp.ins, method="2-opt")#Plotautoplot(tsp.ins, tour)

比拟解决方案：下图显示了7种启发式解决方案的最佳游览长度和协和式的确切解决方案。对于协和解决方案，我应用了在UW-Madison主持的NEOS-Server。

methods <- c("nearest_insertion" "2-opt")tours <- sapply(methods  simplify = FALSE)dotchart( ), )

在2D中的＃2 3000个随机顶点

显然，随着顶点数量的增长，准确解和其余启发式解决方案之间的差别显着减少。2-opt解决方案最靠近最优。反复的2-opt解决方案和筛选最小的值让我十分靠近于确切的解决方案 。