使用分类法绘制简单的树状图，而无需在R中聚类

Question

我有一个看起来像这样的分类数据集：

我想绘制一个简单的树状图，该模拟图仅显示分类关系，而在哪里宽度或颜色代表数据集中该属的丰度。似乎R中的许多软件包都希望您使用层次群集或基于DNA的数据来创建树状图，但是在这里我不需要这样做，也找不到可以以这种格式处理数据的软件包。有没有办法在R中进行此操作，还是我使用Photoshop卡住了？

编辑： 可再现的数据示例：

structure(list(phylum = c("Arthropoda", "Arthropoda", "Arthropoda", 
"Arthropoda", "Arthropoda", "Arthropoda", "Arthropoda", "Arthropoda", 
"Arthropoda", "Arthropoda", "Arthropoda", "Arthropoda", "Arthropoda", 
"Arthropoda", "Arthropoda", "Arthropoda", "Arthropoda", "Arthropoda", 
"Arthropoda", "Arthropoda"), class = c("Insecta", "Insecta", 
"Insecta", "Arachnida", "Insecta", "Insecta", "Insecta", "Insecta", 
"Insecta", "Insecta", "Insecta", "Insecta", "Insecta", "Insecta", 
"Insecta", "Insecta", "Insecta", "Insecta", "Arachnida", "Insecta"
), order = c("Plecoptera", "Trichoptera", "Diptera", "Sarcoptiformes", 
"Diptera", "Trichoptera", NA, "Plecoptera", "Plecoptera", "Plecoptera", 
"Plecoptera", "Plecoptera", "Megaloptera", "Plecoptera", "Diptera", 
"Plecoptera", "Plecoptera", "Plecoptera", "Trombidiformes", "Plecoptera"
), family = c("Leuctridae", "Odontoceridae", "Chironomidae", 
"Malaconothridae", NA, "Hydropsychidae", NA, "Perlidae", "Leuctridae", 
"Leuctridae", "Leuctridae", "Leuctridae", "Corydalidae", "Perlidae", 
"Limoniidae", "Perlidae", "Perlidae", "Perlidae", "Aturidae", 
"Perlidae"), tribe = c(NA_character_, NA_character_, NA_character_, 
NA_character_, NA_character_, NA_character_, NA_character_, NA_character_, 
NA_character_, NA_character_, NA_character_, NA_character_, NA_character_, 
NA_character_, NA_character_, NA_character_, NA_character_, NA_character_, 
NA_character_, NA_character_), genus = c("Leuctra", "Psilotreta", 
"Tanytarsus", "Malaconothrus", "Parametriocnemus", "Cheumatopsyche", 
NA, "Paragnetina", "Leuctra", "Leuctra", "Leuctra", "Leuctra", 
"Nigronia", "Paragnetina", "Hexatoma", NA, "Paragnetina", "Paragnetina", 
"Aturus", NA)), row.names = c(NA, 20L), class = "data.frame")