Here,
> r<-c(\"AAandBB\", \"BBandCC\")
> strsplit(as.character(r),\'and\')
[[1]]
[1] \"AA\" \"BB\"
[[2]]
[1] \"BB\" \"CC\"
Worki
As you can read on ?strsplit, the argument split in function strsplit is a regular expression. Hence either you need to escape the vertical bar (it is a special character)
strsplit(r,split='\\|and')
or you can choose fixed=TRUE to indicate that split is not a regular expression
strsplit(r,split='|and',fixed=TRUE)