Second update of plot1.R using POSIXlt date and time format