Написание функции кортежей, которая переставляет все возможные n-кортежи

Question

Я работаю над функцией tuples, которая берет коллекции и параметр n. Параметр обозначает количество индексов, которые должен иметь сгенерированный вектор. Затем функция переставляет все возможные n-кортежи элементов в коллекции.

До сих пор я пытался комбинировать функции от tuples.core и math.combinatoris, , а именно, кортежей и перестановок.

(defn Tuples [& args] 
     (combo/permutations (tuple args))) 

Пример)

ввода: (0,1) п = 3

выход: [[0,0,0] [0,0,1] [0,1,0 ] [1,0,0] [0,1,1] [1,1,0] [1,0,1] [1,1,1]]

Answer 1

Что вы ищете: clojure.math.combinatorics/selections:

(require '[clojure.math.combinatorics :as c]) 

(c/selections [0 1] 3) 
;=> ((0 0 0) (0 0 1) (0 1 0) (0 1 1) (1 0 0) (1 0 1) (1 1 0) (1 1 1))