हो जाओ प्रत्येक सूची

Question

के अंतिम तत्व हमें मैं एक सूची ((3 4 5) (d e f) (h i j) (5 5 5 5))

मैं इस तरह से कि उत्पादन इस (5 च जे 5) कैसा दिखेगा में प्रत्येक सूची के अंतिम तत्व कैसे प्राप्त कर सकते हैं मान लीजिए?

Answer 1

एक ऐसी प्रक्रिया लिखें जो सूची का अंतिम तत्व लौटाती है, फिर अंतर्निहित MAP (ए.के.ए. MAPCAR) प्रक्रिया के बारे में कुछ जानें और देखें कि कोई लाइटबुल बंद हो गया है या नहीं।

Answer 2

मान लीजिए यह सामान्य लिस्प के बारे में है, एक कार्य last है जो एक सूची के अंतिम आइटम वाली एक सूची देता है। यदि आप mapcan के साथ इस फ़ंक्शन का उपयोग करते हैं, जो किसी सूची के प्रत्येक तत्व को दिए गए फ़ंक्शन को लागू करता है और समेकित परिणाम देता है, तो आप जो चाहते हैं उसे प्राप्त करेंगे।

ध्यान दें कि सूची के अंतिम तत्व तक पहुंचने के लिए O(N) ऑपरेशन है, इसलिए यदि यह केवल होमवर्क नहीं है, तो आप शायद यह विचार करना चाहें कि क्या आप अंतिम समस्या को अंतिम रूप से हल करने से अधिक कुशलता से हल नहीं कर सकते हैं प्रत्येक सूची का आइटम (शायद इसके बजाय एक और डेटास्ट्रक्चर का उपयोग करें)।

Answer 3

यह, प्रारंभिक LISPY होमवर्क समस्याओं की तरह, प्रेरण के संदर्भ में पुनरावर्ती और/या सोचने में एक अभ्यास है। शुरू करने का तरीका अपने आप से सरल प्रश्न पूछना है कि आप आसानी से जवाब दे सकते हैं।

उदाहरण के लिए, आप कुछ है कि आप प्रत्येक सूची में पहले तत्व दिया लिखने के लिए कहा गया था अगर, मैं करूंगा इसके बारे में बात इस तरह से:

सूचियों की एक सूची को देखते हुए:

1. क्या सूची '() सूची में प्रत्येक सूची का पहला तत्व है? (आसान - null)
2. '(a) सूची में प्रत्येक सूची का पहला तत्व क्या है? (आसान - a, या शायद एक त्रुटि)
3. '((a)) सूची में प्रत्येक सूची का पहला तत्व क्या है? (आसान - (a))
4. फॉर्म '(anything) में किसी भी सूची का पहला तत्व क्या है, जहां कुछ भी एक सूची है? (आसान - (first anything))
5. फॉर्म '(anything morestuff) में प्रत्येक सूची का पहला तत्व क्या है? (आसान - (cons (first anything) (first-element morestuff)))
6. परमाणु का पहला क्या है? या तो परमाणु या त्रुटि (आपके दृष्टिकोण पर निर्भर करता है)
7. शून्य का पहला क्या है? nil।
8. सूची में से पहला क्या है? (car list)

यहाँ से हम कोड लिखना शुरू कर सकते हैं:

;; here's first, meeting questions 6-8 
(define first (lambda (l) 
    (cond 
    ((null? l) nil) ; Q7 
    ((atom? l) l) ; Q6 
    (t (car l))))) ; Q8 

;; with first we can write first-element, meeting questions 1-5 
(define first-element (lambda (l) 
    (cond 
    ((null? l) nil) ; Q1 
    ((atom? l) (first l)) ; Q2 
    (t (cons (first (car l) (first-element (cdr l)))))))) ; Q4-5 

अब इस अपना होमवर्क (जानबूझकर) नहीं है। आपको इसके साथ खेलना चाहिए और समझना चाहिए कि यह कैसे काम करता है। आपका अगला लक्ष्य यह पता लगाना चाहिए कि यह आपके असाइनमेंट से अलग कैसे है और वहां कैसे पहुंचे।

मैपकर के संबंध में? इसके बारे में चिंता मत करो। आपको सीखना होगा कि पहले रिकर्सिव समस्याओं को कैसे हल किया जाए। फिर आप मैपकर के बारे में चिंता कर सकते हैं। इस असाइनमेंट का क्या मतलब है? इस मोड में सोचने में आपकी मदद करने के लिए।के पास डांग LISP/योजना में सब कुछ इस तरह सोचकर सुलझाया जाता है।

कारण मैं उन सभी हिस्सों में इसे तोड़ने के लिए सभी प्रश्नों के साथ गया जिसके बारे में मुझे चिंता है। अगर मुझे कार्य दिया गया है "मैं सूची में प्रत्येक आइटम पर कैसे फू करूं?" मुझे सवालों का जवाब देना चाहिए: मैं कैसे संभाल सकता हूं? एक परमाणु कैसे संभालते हैं? मैं सूची में पहले तत्व पर कैसे संभाल सकता हूं? मैं सबकुछ कैसे संभाल सकता हूं? एक बार मैंने इसका उत्तर देने के बाद, मुझे पता चला कि वास्तव में कैसे करना है। मैं शून्य पर फू कैसे करूं? मैं परमाणु पर फू कैसे करूं? मैं सूची में foo कैसे करूं?

Answer 4

शायद यह पहले से ही हल किया जाता है, लेकिन मैं समझ यह पता

; SELECT-FROM-INNER-LIST :: [list] -> [list] 
(DEFUN SFIL (lst) 
    (COND ((NULL lst) NIL) 
     ((LISTP (FIRST lst)) (APPEND (LAST (FIRST lst)) (SFIL (REST lst)))) 
)) 

अब, यह कानूनी सूची के लिए काम करता है ... इसलिए यदि आप सही सूची के साथ समारोह SFIL फोन .... नहीं तो, यह वापसी शून्य

उम्मीद है कि यह उपयोगी हो जाएगा, जो इसे तुतलाना की शुरुआत के रूप में

Answer 5

(defun get-last-lists (s) 
    (setq rt 'nil) 
    (loop for i from 0 to (- (length s) 1) 
     do (setq rt (append rt (last (nth i s))))) 
    (print rt)) 

पाता है किसी के लिए, मैं अपने समाधान पोस्ट।