`disnet_commuting` gets the `from` nodes, and sends them as the parameter for the disnet_comm2 along with the entire dataframe `nd_edges`. It incoporates both the individual and all nodes' functions. Note: it removes nodes with less than 10 people in them.
disnet_commuting(g, N_c = 0.11, round_sigma = FALSE, ...)
g | The `graphml` (network) object for which to calculate commuting rates |
---|---|
N_c | The commuting proportion of the entire population. Default = 0.11 from Simini |
f = system.file("sample_data/network", "g10.RDS", package = "SEEDNet") g = readRDS(f) disnet_commuting(g)#> [1] "working on node: 20" #> [1] "working on node: 128" #> [1] "working on node: 358" #> [1] "working on node: 416" #> [1] "working on node: 781" #> [1] "working on node: 874" #> [1] "working on node: 890" #> [1] "working on node: 958" #> [1] "working on node: 995"#> IGRAPH 1c382d3 DN-- 9 72 -- #> + attr: name (v/c), pop (v/n), lat (v/n), lon (v/n), sigma (v/n), #> | Total_Length (e/n), pop_from (e/n), pop_to (e/n), commuting_prop #> | (e/n) #> + edges from 1c382d3 (vertex names): #> [1] 20 ->128 20 ->358 20 ->416 20 ->781 20 ->874 20 ->890 20 ->958 20 ->995 #> [9] 128->20 128->358 128->416 128->781 128->874 128->890 128->958 128->995 #> [17] 358->20 358->128 358->416 358->781 358->874 358->890 358->958 358->995 #> [25] 416->20 416->128 416->358 416->781 416->874 416->890 416->958 416->995 #> [33] 781->20 781->128 781->358 781->416 781->874 781->890 781->958 781->995 #> [41] 874->20 874->128 874->358 874->416 874->781 874->890 874->958 874->995 #> + ... omitted several edges