...scripts to visualize Darwin Core Event core datasets with Humboldt extensions as trees, networks, etc following examples from the R Graph Gallery.
Interactive Event-tree chart generated with the event_tree app which references humboldtTree.R
-
Clone or download this repo, and open its 'Rproj' file in RStudio.
-
Install packages if needed:
# Paste and run this in the RStudio console (lower-left panel)
install.packages(c("collapsibleTree", "shiny",
"igraph", "readr", "RColorBrewer",
"data.table", "data.tree", "ggraph"))
-
Copy your input-CSV to the "data_input" folder
-
Name the input-CSV "FM_Humboldt_data.csv"
-
Run a charting script. e.g. in the RStudio console, type:
# To see a network-diagram:
`source("humboldtNetwork.R")`
# To launch the interactive tree-diagram shiny-app:
`shiny::runApp('event_tree')`
Generates a collapsible tree/dendrogram to illustrate parent-child relationships
![](https://private-user-images.githubusercontent.com/8563362/319775603-ea672693-57e0-4cee-9c15-b0f2ab5466ee.png?jwt=eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJpc3MiOiJnaXRodWIuY29tIiwiYXVkIjoicmF3LmdpdGh1YnVzZXJjb250ZW50LmNvbSIsImtleSI6ImtleTUiLCJleHAiOjE3MzkyODc1NjYsIm5iZiI6MTczOTI4NzI2NiwicGF0aCI6Ii84NTYzMzYyLzMxOTc3NTYwMy1lYTY3MjY5My01N2UwLTRjZWUtOWMxNS1iMGYyYWI1NDY2ZWUucG5nP1gtQW16LUFsZ29yaXRobT1BV1M0LUhNQUMtU0hBMjU2JlgtQW16LUNyZWRlbnRpYWw9QUtJQVZDT0RZTFNBNTNQUUs0WkElMkYyMDI1MDIxMSUyRnVzLWVhc3QtMSUyRnMzJTJGYXdzNF9yZXF1ZXN0JlgtQW16LURhdGU9MjAyNTAyMTFUMTUyMTA2WiZYLUFtei1FeHBpcmVzPTMwMCZYLUFtei1TaWduYXR1cmU9MDM5MzQzODQzMTc3YjM4ZGIzNzBlNDMyM2YwNGE2YjcyNGU1MjI2ZDRmZjA2ZTU2M2FhOWViZGI0MzFlMjAwYyZYLUFtei1TaWduZWRIZWFkZXJzPWhvc3QifQ.K-UGoNH0eSCSRL0qP-IA9iod7okEswrWWLtesDaCNXQ)
Generates a less organized network for clusters/relationships
![](https://private-user-images.githubusercontent.com/8563362/319775641-7a859cde-30f9-4b79-a9d8-61ba10976692.png?jwt=eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJpc3MiOiJnaXRodWIuY29tIiwiYXVkIjoicmF3LmdpdGh1YnVzZXJjb250ZW50LmNvbSIsImtleSI6ImtleTUiLCJleHAiOjE3MzkyODc1NjYsIm5iZiI6MTczOTI4NzI2NiwicGF0aCI6Ii84NTYzMzYyLzMxOTc3NTY0MS03YTg1OWNkZS0zMGY5LTRiNzktYTlkOC02MWJhMTA5NzY2OTIucG5nP1gtQW16LUFsZ29yaXRobT1BV1M0LUhNQUMtU0hBMjU2JlgtQW16LUNyZWRlbnRpYWw9QUtJQVZDT0RZTFNBNTNQUUs0WkElMkYyMDI1MDIxMSUyRnVzLWVhc3QtMSUyRnMzJTJGYXdzNF9yZXF1ZXN0JlgtQW16LURhdGU9MjAyNTAyMTFUMTUyMTA2WiZYLUFtei1FeHBpcmVzPTMwMCZYLUFtei1TaWduYXR1cmU9M2VkYTI3MGYyZDE2OTk5MmM5YjgxMzViZmMzMWVhMmMxMzcwMzI3NTk2Yzg4NDU1N2JhODIyNTU4OGU3MWJkYiZYLUFtei1TaWduZWRIZWFkZXJzPWhvc3QifQ.oeeO8amaJbluNXZhraMnM1HK0YGNGuP-LPa7WvgQwRk)