powered by
SpatialNetwork
graph.color.legend(object) "graph.color.legend"(object) "graph.color.legend"(object) <- value
object = SpatialNetwork,value = character