Update col2rownames.R