ring wandering
こうすれば効率的かも。(write (map (pa$ append '(1 6)) (combinations-list '(0 2 3 4 5 7 8 9) 1 2)))
確かに！ありがとうございます！書きながら「効率悪いよなー・・・」とは思ってましたが、良い方法が思いつきませんでした＾＾；
こうすれば効率的かも。
返信削除(write (map (pa$ append '(1 6)) (combinations-list '(0 2 3 4 5 7 8 9) 1 2)))
確かに！ありがとうございます！
返信削除書きながら「効率悪いよなー・・・」とは思ってましたが、良い方法が思いつきませんでした＾＾；