Testing scaleRaster