Update srs_BioOptical_pigment.R