# NOT RUN {
is.subsetof(c(1,2),c(1,2,3))
is.subsetof(c(1,2,3), c(1,2))
l <- list(c(1,2),c(1,2,3),c(2,4),c(5,6), 5)
#subsetofList(c(1,2), l)
#subsetofList(c(1,2,3,4), l)
removeRedundant(l)
removeRedundant(l, maximal=FALSE)
is.insetlist (c(2,4), l)
is.insetlist (c(2,8), l)
# }
Run the code above in your browser using DataLab