Technology, Graph Theory, Tidygraph, Graph Analytics, Data Visualization.
data.frame() %>% pull(id) for(i in distributor_id){ n_neighbors <- network_grph %>% activate(nodes) %>% morph(to_local_neighborhood, node = i, order = 1, mode = 'all') %>% mutate(neighbor = TRUE) %>% unmorph() %>% data.frame() %>% filter(neighbor == TRUE, id != i) %>% nrow() distributor_name <-