mf_label : couleur des lignes

[mgageo]

Merci pour ce package.

J'essaye d'afficher des labels avec des couleurs différentes suivant le label.
J'utilise "lines = true" et "overlap = FALSE".
La couleur de la ligne et du label ne sont pas identiques, j'ai l'impression que la couleur de la ligne dépend de la première couleur utilisée.

library(sf)
#> Linking to GEOS 3.10.2, GDAL 3.4.1, PROJ 7.2.1; sf_use_s2() is TRUE
library(mapsf)
p1 <- st_point(c(1,1))
sfc <- st_sfc(p1, p1, p1, p1)
sf <- st_sf(a = 1:4, couleur = c("orange", "red", "green", "blue"), geom = sfc)
mf_map(x = sf)
mf_label(x = sf,
  var = "a",
  cex = 1.5,
  overlap = FALSE,
  lines = TRUE,
  lwd = 4,
  col = sf$couleur
)

Created on 2022-12-22 with reprex v2.0.2

[mgageo]

Merci pour la correction

Un exemple concret d'utilisation : le tracé et les arrêts d'une ligne de bus de Vannes