Create ToTOARadiance.R