Open
Description
remotes::install_github("jespermaag/gganatogram")
library(gganatogram)
library(tidyverse)
male_system <- hgMale_key %>%
filter(type %in% "nervous_system") %>%
gganatogram(organism = "human", sex = "male",
fill = "colour", outline = FALSE) +
theme_void() +
coord_fixed()
ggplotly(male_system)
Metadata
Metadata
Assignees
Labels
No labels