updated comments

analyseCERdata.R

@@ -31,9 +31,7 @@ print(paste0("Working directory is: ", getwd()))
 setwd("~/Documents/Work/Data/CER Smart Metering Project/data/processed")
 
 # Load data & describe it ----
-# Load the data
-
-# loop over months and years
+# Load the data by looping over months and years
 months <- c("October", "December")
 years <- c("2009", "2010")
 for (m in months) {