# NOT RUN {
df <- data.frame(
mon = month.abb[1:6],
values = rnorm(6)
)
join_charts(
column_chart(df, x = 'mon', series = 'values'),
column_chart(df, x = 'mon', series = 'values')
)
# }
Run the code above in your browser using DataLab