क्लोजर में एक पेड़ का प्रतिनिधित्व

Question

क्लोजर में एक पेड़ का प्रतिनिधित्व करने के लिए एक बेवकूफ तरीका क्या होगा? उदा .:

 A 
    /\ 
    B C 
    /\ \ 
D E F 

प्रदर्शन महत्वपूर्ण नहीं है और पेड़ पिछले 1000 तत्वों में नहीं बढ़ेगा।

Answer 1

'(A (B (D) (E)) (C (F))) 

Answer 2

का उपयोग कर बस cons यह करने का एक डरावना तरीका उपलब्ध नहीं है:

(defn mktree 
    ([label l r] (cons label (cons l r))) 
    ([leaf] (cons leaf (cons nil nil)))) 
(defn getlabel [t] (first t)) 
(defn getchildren [t] (rest t)) 
(defn getleft [t] (first (getchildren t))) 
(defn getright [t] (rest (getchildren t))) 

ध्यान दें कि बच्चों को एक सूची नहीं है; यह एक जोड़ी है यदि आपके पेड़ सिर्फ बाइनरी नहीं हैं, तो आप इसे एक सूची बना सकते हैं। निश्चित रूप से कोई बाएं या दायां बच्चा नहीं होने पर शून्य का उपयोग करें।

अन्यथा, this answer देखें।

अपने चित्र में पेड़:

(mktree 'A (mktree 'B (mktree 'D) (mktree 'E)) (mktree 'C nil (mktree 'F))) 

Answer 3

पेड़ सिर्फ Clojure में सब कुछ के बारे में underly क्योंकि वे खुद को लगातार डेटा संरचना में संरचनात्मक साझा करने के लिए इतनी अच्छी तरह से उधार दे। मानचित्र और वेक्टर वास्तव में पेड़ लुकअप और समय सम्मिलित करने के लिए एक उच्च शाखा कारक वाले पेड़ हैं। तो सबसे छोटा जवाब जो मैं दे सकता हूं (हालांकि यह वास्तव में उपयोगी नहीं है) यह है कि मैं वास्तव में इस प्रश्न के वास्तविक उत्तर के लिए Purely functional data structures by Chris Okasaki की अनुशंसा करता हूं। इसके अलावा blip.tv

(set 'A 'B 'C)