Cumulating neighbours lists

plot(map_geom, border = "lightgray")
plot.nb(nblagsc, map_geom, add = TRUE)