ChatGPT - Remove rows in R