# NOT RUN {
library(cartograflow)
data(flowdata)
###Extract the upper part of the matrix : Long format
tab_up <- flowlowup(flows, format="L", lowup="up")
tab_low<-flowlowup(flows, format="L", lowup="low")
# }
Run the code above in your browser using DataLab