# Base R
RandomX=rnorm(500)
PlottedFig=hist(RandomX)
VI(PlottedFig)
# ggplot
if(require(ggplot2)){
ggplot(economics_long, aes(date, value01, colour = variable)) +
geom_line() +
ggtitle('dummy title')
}
Run the code above in your browser using DataLab