有人可以用正则表达式来解释什么(?i)并(?-i)包装一个单词吗？

(?i)test(?-i)

我测试和它匹配test,TEST和teSt.但我以前从未见过这个.什么是?之前i是什么意思？我看到这个在这里.

我觉得应该有一种有效的方法来dplyr使用case_whenand 来改变新列contains,但是无法让它工作.

我理解使用case_when内部mutate是"有点实验性"(如本文所述),但对任何建议都会感激不尽.

不起作用:

library(tidyverse)

set.seed(1234)

x <- c("Black", "Blue", "Green", "Red")

df <- data.frame(a = 1:20, 
                 b = sample(x,20, replace=TRUE))

df <- df %>%
  mutate(group = case_when(.$b(contains("Bl")) ~ "Group1",
                 case_when(.$b(contains("re", ignore.case=TRUE)) ~ "Group2")
  )  

我正在尝试使用 str_detect 和 case_when 根据多个模式重新编码字符串，并将重新编码的值的每次出现粘贴到新列中。正确列是我试图实现的输出。

这类似于this question和this question If it can't be done with case_when (仅限于我认为的一种模式)有没有更好的方法可以仍然使用tidyverse来实现？

Fruit=c("Apples","apples, maybe bananas","Oranges","grapes w apples","pears")
Num=c(1,2,3,4,5)
data=data.frame(Num,Fruit)

df= data %>% mutate(Incorrect=
paste(case_when(
  str_detect(Fruit, regex("apples", ignore_case=TRUE)) ~ "good",
  str_detect(Fruit, regex("bananas", ignore_case=TRUE)) ~ "gross",
  str_detect(Fruit, regex("grapes | oranges", ignore_case=TRUE)) ~ "ok",
  str_detect(Fruit, regex("lemon", ignore_case=TRUE)) ~ "sour",
  TRUE ~ "other"
),sep=","))

  Num                 Fruit Incorrect
  1                Apples      good
  2 apples, maybe bananas      good
  3               Oranges      other
  4       grapes w apples      good
  5                pears       other

 Num …