Delete rougher draft.R