updating plot3.R and plot4.R to scale and adjust the sub metering legend