如何在R中执行正则表达式任务

因此，我试图找到一种方法，让R为我正在制作的函数检测字符“ar1”

if(str_detect(as.character(y1.AR2), regex('ar1', ignore_case = T)) == T){
  print('love')
} else {
  print('nolove')
}

例如，上面的代码的计算结果为True，但我希望它的计算结果为false，因为在对象“y1.AR2”的名称中没有“AR1”，其顺序为“A”后跟“R”后跟“1”。我唯一希望语句求值为True的时间是它是否按照该顺序匹配“AR1”，无论它是大写还是小写

有人知道一种方法让这成为可能吗

---

提前谢谢你

func
y1.AR2
是一个对象。是否要基于对象的名称进行检测？