r <- data.frame(sets = c("A", "A", "A", "B", "C"),
elements = c(letters[1:3], letters[2:3]),
fuzzy = runif(5),
info = rep_len(c("important", "very important"), 5))
TS <- tidySet(r)
TS
as.list(TS)
Run the code above in your browser using DataLab