# NOT RUN {
library(cartograflow)
data(flowdata)
bkg <- system.file("shape/MGP_TER.shp",
package = "cartograflow",
lib.loc = NULL, mustWork = TRUE)
###1:Computes the total flow volume of places : Long format
voli <- flowplaces(flows, origin ="i",destination="j",fij="Fij",format = "L", x = "voli")
###2:Computes the total flows received by destination place : Long format
tab_bali <- flowplaces(flows, origin ="i",destination="j",fij="Fij",format = "L", x = "bali")
# }
Run the code above in your browser using DataLab