add R script to create 3d sst .nc file