Update ChemModel.R