R-VoronoiPlus包：圆形树状地图

论文论文图加载R包library(tidyverse)library(ggtext)library(glue)#install.packages("rcartocolor")library(rcartocolor)library(VoronoiPlus) # devtools::install_github("AllanCameron/VoronoiPlus")导入数据all_countries "all_countries.csv")country_regions "country_regions.csv")global_economic_activity "global_economic_activity.csv")global_human_day "global_human_day.csv")数据清洗au_data    select(Category, Subcategory, hoursPerDayCombined, country_iso3) |>   left_join(country_regions, by = "country_iso3") |>   filter(country_name == "Australia") |>   select(Category, Subcategory, hoursPerDayCombined)构建绘图数据au_vor                           data = au_data)                          set.seed(1234)groups subgroups    group_by(group) |>   mutate(alpha = runif(1, 0, 0.6)) |>   ungroup()r theta clock_data   x = r * cos(theta),  y = r * sin(theta),  angle  ………………………………