如何用最短的距离走过北京所有线路的地铁？ 第1页

       BeijingSubway=Import["http://www.bjsubway.com/station/zjgls/","Data"]; linedata=Catenate@Map[Flatten,Thread/@Transpose[{Table[BeijingSubway[[2,1,i]],{i,Range@10~Join~{12}}],Table[BeijingSubway[[2,2,i,2]][[;;,1;;2]],{i,Range@10~Join~{12}}]}],{2}]~Join~Map[Flatten,Thread[{"14号线",Catenate[BeijingSubway[[2,2,11]][[;;,2]]][[;;,1;;2]]},List],{1}]; line=ToExpression@MapAt[StringReplace[#,"ꆪꆪ"->"<->"]&,linedata,{All,2}]; g=Graph[line[[;;,2]],EdgeWeight->line[[;;,3]],VertexLabels->"Name",EdgeLabels->"EdgeWeight"](*Graph[linedata[[;;,2]],EdgeWeight[Rule]linedata[[;;,3]],VertexLabels[Rule]"Name"]*) route=First@FindPostmanTour[g]; Total[PropertyValue[{g,#},EdgeWeight]&/@route]/1000. stalist=route[[;;,1]]~Join~{苹果园} Length[%] linenumber=#1->#2&@@@Reverse/@MapAt[StringReplace[#,"ꆪꆪ"<>___->""]&,linedata[[;;,1;;2]],{All,2}]; Split[(ToString/@stalist)/.linenumber][[;;,1]](*换乘，有些问题*) %//Length     

       苹果园,古城,八角游乐园,八宝山,玉泉路,五棵松,万寿路,公主坟,西钓鱼台,慈寿寺,西钓鱼台,公主坟,莲花桥,六里桥,西局,七里庄,大井,郭庄子,大瓦窑,园博园,张郭庄,园博园,大瓦窑,郭庄子,大井,七里庄,丰台东大街,丰台南路,科怡路,丰台科技园,郭公庄,丰台科技园,科怡路,丰台南路,丰台东大街,七里庄,六里桥,六里桥东,北京西站,六里桥东,六里桥,西局,泥洼,丰台站,首经贸,纪家庙,草桥,角门西,公益西桥,角门西,马家堡,北京南站,陶然桥,永定门外,景泰,蒲黄榆,方庄,十里河,分钟寺,成寿寺,分钟寺,十里河,潘家园,劲松,双井,劲松,潘家园,十里河,南八里庄,北工大西门,平乐园,九龙山,大郊亭,百子湾,化工,南楼梓庄,欢乐谷景区,垡头,双合,焦化厂,双合,垡头,欢乐谷景区,南楼梓庄,化工,百子湾,大郊亭,九龙山,双井,广渠门外,广渠门内,磁器口,桥湾,珠市口,虎坊桥,菜市口,陶然亭,北京南站,马家堡,角门西,角门东,大红门,石榴庄,宋家庄,成寿寺,宋家庄,刘家窑,蒲黄榆,天坛东门,磁器口,崇文门,前门,和平门,宣武门,菜市口,广安门内,达官营,湾子,北京西站,军事博物馆,白堆子,白石桥南,花园桥,慈寿寺,海淀五路居,慈寿寺,车道沟,长春桥,火器营,巴沟,苏州街,海淀黄庄,知春里,知春路,西土城,牡丹园,健德门,北土城,健德门,牡丹园,西土城,知春路,大钟寺,西直门,新街口,平安里,北海北,南锣鼓巷,东四,南锣鼓巷,什刹海,鼓楼大街,安德里北街,安华桥,北土城,奥体中心,奥林匹克公园,北沙滩,六道口,清华东路西口,六道口,北沙滩,奥林匹克公园,奥体中心,北土城,安贞门,惠新西街南口,和平西桥,和平里北街,雍和宫,安定门,鼓楼大街,积水潭,西直门,动物园,国家图书馆,白石桥南,车公庄西,车公庄,平安里,西四,灵境胡同,西单,宣武门,长椿街,复兴门,阜成门,车公庄,西直门,动物园,国家图书馆,魏公村,人民大学,海淀黄庄,中关村,北京大学东门,圆明园,西苑,北宫门,安河桥北,北宫门,西苑,圆明园,北京大学东门,中关村,海淀黄庄,知春里,知春路,五道口,上地,西二旗,龙泽,回龙观,霍营,回龙观东大街,平西府,育知路,朱辛庄,育知路,平西府,回龙观东大街,霍营,育新,西小口,永泰庄,林萃桥,森林公园南门,奥林匹克公园,安立路,大屯路东,关庄,望京西,望京,东湖渠,来广营,善各庄,来广营,东湖渠,望京,望京东,崔各庄,马泉营,孙河,国展,花梨坎,后沙峪,南法信,石门,顺义,俸伯,顺义,石门,南法信,后沙峪,花梨坎,国展,孙河,马泉营,崔各庄,望京东,望京,阜通,望京南,高家园,将台,东风北桥,枣营,朝阳公园,金台路,红庙,大望路,红庙,金台路,十里堡,青年路,褡裢坡,黄渠,常营,草房,物资学院路,通州北关,通运门,北运河西,北运河东,郝家府,东夏园,潞城,东夏园,郝家府,北运河东,北运河西,通运门,通州北关,物资学院路,草房,常营,黄渠,褡裢坡,青年路,十里堡,金台路,呼家楼,团结湖,农业展览馆,亮马桥,三元桥,太阳宫,芍药居,望京西,北苑,立水桥,霍营,立水桥,天通苑南,天通苑,天通苑北,天通苑,天通苑南,立水桥,立水桥南,北苑路北,大屯路东,惠新西街北口,惠新西街南口,芍药居,光熙门,柳芳,东直门,东四十条,东直门,雍和宫,北新桥,张自忠路,东四,朝阳门,东四十条,朝阳门,东四,灯市口,东单,崇文门,北京站,建国门,朝阳门,东大桥,呼家楼,金台夕照,国贸,双井,九龙山,大望路,四惠,四惠东,四惠,大望路,国贸,永安里,建国门,东单,王府井,天安门东,天安门西,西单,复兴门,南礼士路,木樨地,军事博物馆,公主坟,万寿路,五棵松,玉泉路,八宝山,八角游乐园,古城,苹果园