# NOT RUN {
library(cartograflow)
data(flowdata)
bkg<- system.file("shape/MGP_TER.shp", package="cartograflow",
lib.loc = NULL, mustWork = TRUE)
graph_ckij_1<-flowcontig(bkg,"EPT_NUM",ordre =1)
# }
# NOT RUN {
flowmap(graph_ckij_1,format="L",bkg,"EPT_NUM",
filter = TRUE, taille = 0.5)
# }
Run the code above in your browser using DataLab