Одинаковый вывод комбинаций, comboGeneral и combn путем преобразования матрицы в список

Question

Я хочу использовать функцию комбинаций из пакета договоренностей и comboGeneral из пакета RcppAlgos, чтобы получить выходные данные, имеющие тот же формат, что и я, получаемый из функции combn из пакета utils.

library(arrangements); library(magrittr); library(purrr); library(RcppAlgos)

comb1 <- map(1:2, ~combn(x=names(mtcars), m = .x, simplify=F)) %>% unlist(recursive = F)

comb2 <- map(1:2, ~combinations(names(mtcars), k = .x))

comb3 <- map(1:2, ~comboGeneral(names(mtcars), m = .x))

Что мне нужно сделать, чтобы comb2 и comb3 имели тот же формат вывода, что и comb1?

Answer 1

Для этого вы можете использовать

comb2 <- map(1:2, ~combinations(names(mtcars), k = .x) %>% split(row(.))) %>% unlist(recursive = FALSE)
comb3 <- map(1:2, ~comboGeneral(names(mtcars), m = .x, FUN = c)) %>% unlist(recursive = FALSE)

comb2 - именованный список;если это проблема, вы можете добавить дополнительные %>% unname.