Sun burst
| 1 | 
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 | ## Not run: 
   amSunburst(data = list(list(name = "f", value = 1), list( name = "s", value = 2)),
              dataFields =list(
                value = "value",
                name = "name"))
data = list(list(name = "First",
                            children = list(list(name = "A1" ,value = 100),
                                            list(name = "A2" ,value = 60),
                                            list(name = "A3" ,value = 30)
                            )),
                       list(
                         name = "Second",
                         children = list(list(name = "B1" ,value = 135),
                                         list(name = "B2" ,value = 98),
                                         list(name = "B3" ,value = 56)
                         )),
                       list(
                         name = "Third",
                         children = list(list(name = "C1" ,value = 335),
                                         list(name = "C2" ,value = 148),
                                         list(name = "C3" ,value = 126),
                                         list(name = "C4" ,value = 26)
                         )),
                       list(
                         name = "Fourth",
                         children = list(list(name = "D1" ,value = 415),
                                         list(name = "D2" ,value = 148),
                                         list(name = "D3" ,value = 89),
                                         list(name = "D4" ,value = 64),
                                         list(name = "D4" ,value = 16)
                         )),
                       list(
                         name = "Fifth",
                         children = list(list(name = "E1" ,
                                              children = list(
                                                list(name = "EE1" ,value = 415),
                                                list(name = "EE1" ,value = 256)
                                              )),
                                         list(name = "E2" ,value = 148)
                         ))
)
amSunburst(data = data,
dataFields =list(
  value = "value",
  name = "name",
  children = "children"))
## End(Not run)
 | 
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.