Update cleanup.R