# Create a scatter plot block
new_ggplot_block(type = "point", x = "mpg", y = "hp")
# Create a bar chart block
new_ggplot_block(type = "bar", x = "cyl")
if (interactive()) {
library(blockr.core)
serve(new_ggplot_block(), list(data = mtcars))
}
Run the code above in your browser using DataLab