install.packages('PerformanceAnalytics')
library(PerformanceAnalytics)

chart.Correlation(Ozone, histogram=TRUE, pch=19)