Delete double complete.R