因果的反復違法引数 - クロージャー

Question

(defn fac [n] 
     (def result 1) 
     (loop [i n c 1] 
     (if (<= c 5) 
      result 
      (recur (* c i) (inc c)) 
     ) 
     ) 
     (println result) 
    ) 

    (fac 5) 

エラー：スレッド "main"の例外java.lang.IllegalArgumentException：ループでは、そのバインディングにベクトルが必要です。

数値の階乗を評価する関数を作成しようとしています。私のミスはどこですか？これは、一見答え

Answer 1

として私に1を与える：

• defn内defを使用しないでください。
• REPLは、関数の評価結果を出力します。これを使って。

これはresultが浮いているので、コンパイルされません

(defn fac [n] 
    (loop [i n c 1] 
    (if (<= c 5) 
     result 
     (recur (* c i) (inc c))))) 

...に私たちを取得します。

• 戻りi、ないresult：

  が必要ないくつかの修正があります。

• でiで始まり、nではありません。
• <=の代わりに>の周りでテストを回します。

  (fac 5) 
  => 120 
  

  ---

  編集を一回限りの誤りを訂正し、説明を改善するために：

は、我々は働く...

(defn fac [n] 
    (loop [i 1, c 1] 
    (if (> c n) 
     i 
     (recur (* c i) (inc c))))) 

で終わります。