Dans sa forme actuelle, st_snap_lines retourne uniquement les routes snappées et si des problèmes ont été détectés en cours de route, des warnings sont émis. Les modifications proposées ici font en sorte que la fonction retourne plutôt une liste nommée avec $roads étant les routes snappée et $warnings étant soit NULL dans le cas où aucune problème n'a été détecté ou un sf de points correspondant aux nœuds en problèmes avec dans sa table attributaire l'information sur le message émis ainsi que les identifiants des routes concernées.
Il y a probablement moyen de mettre en forme le tout autrement, mais c'est vraiment essentiel d'avoir un objet quelconque contenant les warnings car ça arrive trop souvent quand on se met à traiter des centaines de segments pour ne se référer qu'à un print dans la console.
À noter que j'ai ajouté une vérification supplémentaire pour un cas plutôt rare où l'une des extrémités d'un segment corrigé tombe exactement sur la coordonnée du nouveau nœud.
Dans sa forme actuelle,
st_snap_linesretourne uniquement les routes snappées et si des problèmes ont été détectés en cours de route, des warnings sont émis. Les modifications proposées ici font en sorte que la fonction retourne plutôt une liste nommée avec$roadsétant les routes snappée et$warningsétant soitNULLdans le cas où aucune problème n'a été détecté ou unsfde points correspondant aux nœuds en problèmes avec dans sa table attributaire l'information sur le message émis ainsi que les identifiants des routes concernées.Il y a probablement moyen de mettre en forme le tout autrement, mais c'est vraiment essentiel d'avoir un objet quelconque contenant les warnings car ça arrive trop souvent quand on se met à traiter des centaines de segments pour ne se référer qu'à un print dans la console.
À noter que j'ai ajouté une vérification supplémentaire pour un cas plutôt rare où l'une des extrémités d'un segment corrigé tombe exactement sur la coordonnée du nouveau nœud.