本人R语言写的,可运行,且正确的dijkstra算法