# install_github('rCharts', 'ramnathv', ref = 'dev')
require(rCharts)
dat <- read.csv(textConnection('x, y
  "2005 Actual", 90
  "Price", 15
  "Volume", 21
  "Fixes", -37
  "Taxation", -43
  "Escalation", -40
  "Mix", 46
  "Market Effect", 91
  "Partners", 61')
)
uPlot("x", "y", data = dat, type = 'Waterfall')