Update KEGGCol.R