title: Hierarchical / Multilevel pie chart
body: <p>Is there any way to create a chart like this in R? </p>
  
  <p><img src="https://i.stack.imgur.com/5fGNI.jpg" alt="enter image description here"></p>
  
  <p>Here is an extract of the data shown in the chart:</p>
  
  <pre><code>df &lt;- structure(list(Animal = structure(c(2L, 2L, 2L, 2L, 2L, 2L, 2L, 
  2L, 2L, 2L, 2L, 1L, 1L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L), .Label = c("Buffalo", 
  "Goat", "Sheep"), class = "factor"), Texture = structure(c(4L, 
  4L, 4L, 4L, 4L, 3L, 3L, 3L, 2L, 1L, 1L, 4L, 3L, 4L, 2L, 2L, 2L, 
  2L, 1L, 1L, 1L, 1L), .Label = c("Hard", "Semi-Hard", "Semi-Soft", 
  "Soft"), class = "factor"), Name = structure(c(16L, 9L, 3L, 21L, 
  5L, 4L, 10L, 2L, 12L, 11L, 8L, 14L, 1L, 7L, 22L, 15L, 6L, 20L, 
  18L, 17L, 19L, 13L), .Label = c("Buffalo Blue", "Charolais", 
  "Chevre Bucheron", "Clochette", "Crottin de Chavignol", "Feta", 
  "Fleur du Maquis", "Garrotxa", "Golden Cross", "Humboldt Fog", 
  "Idaho Goatster", "Majorero", "Manchego", "Mozzarella di Bufala Campana", 
  "Ossau-Iraty", "Pantysgawn", "Pecorino Romano", "Pecorino Sardo", 
  "Roncal", "Roquefort", "Sainte-Maure de Touraine", "Yorkshire Blue"
  ), class = "factor")), .Names = c("Animal", "Texture", "Name"
  ), class = "data.frame", row.names = c(NA, -22L))
  </code></pre>