map<rue,float> carte_poids <- rue as_map (each:: (each.usage_coeff * each.shape.perimeter));
reseau <- as_edge_graph(shp_rue) with_weights carte_poids;