Когда я не использую канал, я могу изменить исходный дифрейм с помощью этой команды

df<-slice(df,-c(1:3))%>% # delete top 3 rows
df<-select(df,-c(Col1,Col50,Col51)) # delete specific columns

Как можно сделать это с трубкой? Я пробовал это ноslice а такжеselect функции не меняют исходный фрейм данных.

df%>%
  slice(-c(1:3))%>% 
  select(-c(Col1,Col50,Col51))

Я хотел бы изменить оригинальный дф.