Update TothResults.R