rCharts: Highcharts example

library(rCharts)

a <- rCharts:::Highchart$new()
a$title(text = "Fruits")
a$data(x = c("Apples", "Bananas", "Oranges"), y = c(15, 20, 30), type = "pie", 
    name = "Amount")
a$printChart()