스택 사용 효율 및 시간면에서 가장 좋은 함수는

Question

a-list에 나타나는 an-element 횟수를 세는 함수를 작성했습니다. 나는 다양한 입력을 시도해 보았지만 그 프로파일을 만들었지 만 스택 사용 효율과 시간 효율성면에서 어떤 기능이 가장 좋은지 아직 알지 못합니다. 제발 도와주세요. 컴파일러/interperter이 꼬리 재귀 위해 그것을 optmize 수

;; Using an accumulator 
    (defn count-instances1 [a-list an-element] 
     (letfn [(count-aux [list-aux acc] 
         (cond 
          (empty? list-aux) acc 
          :else (if (= (first list-aux) an-element) 
            (count-aux (rest list-aux) (inc acc)) 
            (count-aux (rest list-aux) acc))))] 
     (count-aux a-list 0))) 

;; Normal counting 
    (defn count-instances2 [a-list an-element] 
    (cond 
     (empty? a-list) 0 
     :else 
      (if (= (first a-list) an-element) 
       (+ 1 (count-instances2 (rest a-list) an-element)) 
       (count-instances2 (rest a-list) an-element)))) 

;; using loop. does this help at all? 
    (defn count-instances3 [a-list an-element] 
     (loop [mylist a-list acount 0] 
      (if (empty? mylist) 
       acount 
       (if (= (first mylist) an-element) 
       (recur (rest mylist)(inc acount)) 
       (recur (rest mylist) acount))))) 

Answer 1

루프/RECUR 버전 적당한 방법이다. Clojure는 JVM의 한계로 인해 꼬리 호출을 최적화 할 수 없습니다.

Answer 2

코드를 작성, 약간의 성능 향상 결과 및 사용 감소를 스택해야한다. 나는 평범한 계산 기능이 꼬리 재귀를위한 자격이 될 수있어서 꽤 빨리해야한다고 생각한다. 나는 Lisp을 취미로 다루기 때문에 확신 할 수 없다.

http://en.wikipedia.org/wiki/Tail_recursion