Create plot2.r

Creates the Global active power graph