删除包含特定对象的多行

Question

这是我正在处理的数据集的一个示例：

> head(dataraw)
   ACTIVITY_X ACTIVITY_Y ACTIVITY_Z     Event Proportion
1:         19         21         28 Vigilance          1
2:         20         14         24 Vigilance          1
3:         34         35         49 End                1
4:         18          5         19 Unknown            1
5:         23         27         35 Vigilance          1
6:         33         20         39 Vigilance          1

我想以某种方式转换数据，以删除列End中包含Unknown和Event的所有行。使用以下命令，我一次能够成功地对一个对象执行此操作：

datanet1<-dataraw[!grepl("End", dataraw$Event),]
datanet<-datanet1[!grepl("Unknown", datanet1$Event),]

但是，我想一步一步完成此操作，但是如果使用以下命令，则会收到错误消息：

datanet<-datanet1[!grepl(("Unknown","End"), datanet1$Event),]

感谢任何输入！