我们可以使用grepl来查找单词，并在base R中查找subset

subset(data, grepl("\\bbunt\\b", des))

• 输出

des
1                      Austin Hedges bunt single
3          Pete Alonso out on a ground ball bunt
4 Yonathan Daza sac bunt ground out to shortstop

使用dplyr和stringr包，这里有一个解决方案。

library(dplyr)
#> 
#> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats':
#> 
#>     filter, lag
#> The following objects are masked from 'package:base':
#> 
#>     intersect, setdiff, setequal, union
library(stringr)

data <-data.frame(des=c("Austin Hedges bunt single", "Francisco Lindor Homerun", 
                        "Pete Alonso out on a ground ball bunt", 
                        "Yonathan Daza sac bunt ground out to shortstop",
                        "Jose Ramirez pop up to second baseman"))

data %>%
  filter(stringr::str_detect(des, "bunt"))
#>                                              des
#> 1                      Austin Hedges bunt single
#> 2          Pete Alonso out on a ground ball bunt
#> 3 Yonathan Daza sac bunt ground out to shortstop

创建于2023年3月24日，使用reprex v2.0.2