strsplit с вертикальной чертой (труба)

Вот,

> r<-c("AAandBB", "BBandCC")
> strsplit(as.character(r),'and')
[[1]]
[1] "AA" "BB"

[[2]]
[1] "BB" "CC"

Работает хорошо, но

> r<-c("AA|andBB", "BB|andCC")
> strsplit(as.character(r),'|and')
[[1]]
[1] "A" "A" "|" ""  "B" "B"

[[2]]
[1] "B" "B" "|" ""  "C" "C"

Здесь ответ не правильный. Как получить «AA» и «BB», когда я использую «| и»?
Заранее спасибо.

Ответы на вопрос(1)

Ваш ответ на вопрос