2007-05-20から1日間の記事一覧

combinations.scm

30分プログラム。その32。util.combinationsの再実装。ネタに困ったら車輪を再発明すればいいんだ。 ;; 組み合わせ gosh> (print (combination 2 '(a b c))) ((a b) (a c) (b c)) ;; 順列 gohs> (perm '(a b c)) ((c b a) (c a b) (b a c) (b c a) (a c b) (…