This is a short demo to illustrate how to use the function create_chart in rCharts to publish an interactive visualization along with its source code. The key idea is to save the code used to create the visualization in an R file, call create_chart on it, and then publish the visualization.
require(rCharts)
my_chart <- create_chart("code.R")
my_chart$publish("Publishing using create_chart")