根据r中另一列中的多个关键字在一个列中添加值

我要执行以下操作：如果“名称”列中存在关键字“车库”，“对等”，“地段”，那么我将在“类型”列中添加值“停车和车库”。

这是数据集：

df<-data.frame(Name=c("GARAGE 1","GARAGE 2", "101 GARAGE","PARKING LOT","CENTRAL PARKING","SCHOOL PARKING 1","CITY HALL"))

以下代码对我来说很有效，但是有没有一种精巧的方法可以缩短代码呢？谢谢！

df$Type[grepl("GARAGE", df$Name) | 
                       grepl("PARKING", df$Name) |
                          grepl("LOT", df$Name)]<-"Parking&Garage"