update to R script that writes out time coordinate variable.
Getting some things checked in.