Network Exploration

The following is a network chart performed with visNetworkD3 and using data from a Partipipatory Plant Breeding Project done by Rete Semi Rurali in Italy. The project data was uploaded the Shinemas database and then dowloaded after the relations were created. Some data is missing or not precise. This is only a proof of concept.

visNetwork(nodeswlevels, edges,
           main = "Solibam Tomato Participatory Breeding Project Scheme") %>% 
  visOptions(selectedBy = "group", 
             highlightNearest = TRUE, 
             nodesIdSelection = TRUE) %>%
  visHierarchicalLayout() %>% visLegend(main= "Location") %>%
  visPhysics(solver = "repulsion")