fn_Plot1.R completed

Plot1 is completed and exports png per spec