library(reticulate) library(gcookbook) library(ggplot2) library(dplyr)
ggplot(cars, aes(x = dist)) + geom_histogram(fill = "red", colour = "black")
ggplot(cars, aes(x = speed, y = dist)) + geom_point(colour = "red")