How to mutate a column in tidyverse for 'if text contains text string'

Question

How do I edit this code to replace == with if the Species contains %setosa%

new_iris <- iris %>% 
   mutate(flag = ifelse(Species == "setosa", 1, 0)  # add a new column
          )

user_9349302 · Answer

To stay in the tidyverse you could use stringr.

library(dplyr)
library(stringr)

 iris %>%
    mutate(flag = str_detect(Species, "setosa"))

user_3732271 · Answer

We can use %like% from data.table

library(dplyr)
library(data.table)
iris %>% 
     mutate( flag = as.integer(Species %like% "setosa") )