在带或不带空格和标点符号的字符串之间提取字符串

我正在尝试使用str_extract从给定模式的空格和标点符号的可变格式中提取文本字符串中的单词“ Present”或“ Absent”。我在逻辑上哪里去了?

test<-c("as follows: ABC Staining Absent in Tissue","as follows: ABC:   StainingPresent in Tissue","as follows: ABC:   Staining Present in Tissue","as follows ABC Staining Present in Tissue extra words here in Present")

pattern<-"(?<=ABC[:]|[\\s]* Staining ).*(?=in)"
unique(str_extract(string = test, (pattern)))