Update ToTOAReflectance.R