Если они всегда имеют одинаковый формат, то должно работать следующее:
a <- rep('(A,B) => (C) ,Support=0.1 ,Confidence=0.0',6)
b <- matrix(unlist(strsplit(a,' ,')),ncol=3,byrow=TRUE)
b[,1] <- gsub('[(]','{',b[,1])
b[,1] <- gsub('[)]','}',b[,1])
b[,1] <- gsub(',',' ',b[,1])
b[,2:3] <- gsub('^.*=','',b[,2:3])
paste(b[,1],b[,2],b[,3])
Я не могу придумать какого-либо краткого способа сделать это, кроме как разбить строки и разобраться с подстроками.