# NOT RUN {
df <- data.frame(x = 2010:2015, sales = rnorm(6,10, 2))
column_chart(df, df$x, 'sales') %>%
add_title(line1 = 'Department of Big Computers',
line2_measure = "Sales",
line2_rest = "in mEUR",
line3 = "2010..2015")
# }
Run the code above in your browser using DataLab