Compute the flows incoming at each destination location
Examples
positions <- matrix(rnorm(10 * 2), ncol = 2)
distances <- as.matrix(dist(positions))
production <- rep(1, 10)
attractiveness <- c(2, rep(1, 9))
model <- static_blvim(distances, production, 1.5, 1, attractiveness)
destination_flow(model)
#> [1] 2.5754358 0.8088614 0.7280552 0.9253737 0.8347053 0.7933465 0.8973018
#> [8] 0.8472799 0.8412366 0.7484039