sunburst chart for multi columns in R using shiny-CodePudding

Consider following data

 > temp
   year  v13 per_v10 per_v11 per_v12
 1 1397 2506   20.11   65.13   14.76
 2 1398 1759   16.66   79.99    3.35
 3 1399 1754   19.44   75.43    5.13

 temp<-structure(list(year = c(1397, 1398, 1399), v13 = c(2506, 1759, 
 1754), per_v10 = c(20.11, 16.66, 19.44), per_v11 = c(65.13, 79.99, 
 75.43), per_v12 = c(14.76, 3.35, 5.13)), row.names = c(NA, -3L
 ), class = "data.frame")

I want to make a pie plot for 4 variables (per_v10 ,per_v11 ,per_v12 ,per_v13) in three years(1397,1398,1399). It should be something like this:

with Onclick in each year(1397:1399) it shows the percent only for that year. I saw

Plotting sunburst in R is annoying, you need to reformat the dataframe. I suggest you try out the Python APIs.