Add R script and its output for 1st plot (global active power histogram)