Clean main.R