Update createSSURGORasters.R