...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.eyJpc3MiOiJnaXRodWIuY29tIiwiYXVkIjoicmF3LmdpdGh1YnVzZXJjb250ZW50LmNvbSIsImtleSI6ImtleTUiLCJleHAiOjE3NDAwMjQyMDEsIm5iZiI6MTc0MDAyMzkwMSwicGF0aCI6Ii84NTYzMzYyLzMxOTc3NTYwMy1lYTY3MjY5My01N2UwLTRjZWUtOWMxNS1iMGYyYWI1NDY2ZWUucG5nP1gtQW16LUFsZ29yaXRobT1BV1M0LUhNQUMtU0hBMjU2JlgtQW16LUNyZWRlbnRpYWw9QUtJQVZDT0RZTFNBNTNQUUs0WkElMkYyMDI1MDIyMCUyRnVzLWVhc3QtMSUyRnMzJTJGYXdzNF9yZXF1ZXN0JlgtQW16LURhdGU9MjAyNTAyMjBUMDM1ODIxWiZYLUFtei1FeHBpcmVzPTMwMCZYLUFtei1TaWduYXR1cmU9ZmE3NzFjODA4NzY5NmM4Mjg5Zjc5YmM5NWY1ZmM5MDE1NTZlMmQ1ZjlhYjYxYzA0OTc1ODU2Zjg4Y2ZkOTJhNyZYLUFtei1TaWduZWRIZWFkZXJzPWhvc3QifQ.rWX2Co9WwXajq8mlpw2hWFj2bojDjLhYYxXSekPRg8Y)
Generates a less organized network for clusters/relationships
![](https://private-user-images.githubusercontent.com/8563362/319775641-7a859cde-30f9-4b79-a9d8-61ba10976692.png?jwt=eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJpc3MiOiJnaXRodWIuY29tIiwiYXVkIjoicmF3LmdpdGh1YnVzZXJjb250ZW50LmNvbSIsImtleSI6ImtleTUiLCJleHAiOjE3NDAwMjQyMDEsIm5iZiI6MTc0MDAyMzkwMSwicGF0aCI6Ii84NTYzMzYyLzMxOTc3NTY0MS03YTg1OWNkZS0zMGY5LTRiNzktYTlkOC02MWJhMTA5NzY2OTIucG5nP1gtQW16LUFsZ29yaXRobT1BV1M0LUhNQUMtU0hBMjU2JlgtQW16LUNyZWRlbnRpYWw9QUtJQVZDT0RZTFNBNTNQUUs0WkElMkYyMDI1MDIyMCUyRnVzLWVhc3QtMSUyRnMzJTJGYXdzNF9yZXF1ZXN0JlgtQW16LURhdGU9MjAyNTAyMjBUMDM1ODIxWiZYLUFtei1FeHBpcmVzPTMwMCZYLUFtei1TaWduYXR1cmU9MDgzNDRjNGQ4ZWNiODI0ODlhYzg0YjhkMDgyNWU0NzYzMzhmYWNkNzVjYjQzZDgxNmIzMDI0NGI1OTg2NDE1ZSZYLUFtei1TaWduZWRIZWFkZXJzPWhvc3QifQ.v6OjVuSnkI8GevqAFG3a75DbI6OaKoyDTFEg6AI1MdM)