# NOT RUN {
f1 <- function(x) paste0(x, collapse = ",")
combn(x = 1:3, m = 3, FUN = f1, simplify = TRUE)
combns(x = 1:3, m = 3, FUN = f1, simplify = TRUE)
combns(x = 1:3, m = 1:3, FUN = f1, simplify = TRUE)
# }
Run the code above in your browser using DataLab