## 3 example sequences
x <- list("01" = list(c("A","B"), "C"),
"02" = list("C"),
"03" = list("B", "B"))
## coerce
s <- as(x, "sequences")
as(s, "data.frame")
## get reference set
as(itemsets(s), "data.frame")
Run the code above in your browser using DataLab