Update cormat.R