LISP Auto des letzten Elements?

LISP stumpft mich noch einmal ... Warum kann ich nicht den Wert des letzten Elements in einer Liste bekommen? Ich habe eine Liste aufgebaut ähnlich wie diese:LISP Auto des letzten Elements?

(setq bar '(((1 2) 3 4 5)((6 7) 8 9 10)))

Jetzt bekomme ich eine Rendite von 4 für:

(caddar bar)

Es ist eine Rückkehr von (5) für:

(cdddar bar)

Aber ich kann nicht eine 5 bekommen für:

Warum ist das - ein d wie bekomme ich den Wert der 5?

Fehler:

; Warning: This function is undefined: 
; CADDDAR 

Error in KERNEL:%COERCE-TO-FUNCTION: the function CADDDAR is undefined. 
[Condition of type UNDEFINED-FUNCTION]

Quelle

2010-11-19 toast

Die Funktionen mit 5 oder mehr a's und d's sind nicht definiert. Nur 4 und weniger. Es gibt zu viele mögliche Funktionen dieser Länge, um praktisch zu sein.

Sie müssen nur es buchstabieren: (car (cdr (cdr (cdr (cdr (car x))))))

Quelle

2010-11-19 04:57:35 jtdubs

Die Antwort war: (Auto (cdddar lst)) .... jetzt warum das! = Cadddar, verstehe ich nicht. – toast

Irgendwo tief in den Eingeweiden Ihrer LISP-Implementierung sind: (defun cadr (x) ...) (defun cdar (x) ...) (defun caar (x) ...) (defun cddr (x) ...) usw. für alle Kombinationen von 'a' und 'd' der Länge 1 bis 4. Die Spezifikation enthält nicht diejenigen der Länge 5, da es zu viele sind. Es gibt nichts Besonderes an der # cdadr-Familie von Funktionen. Sie werden nicht auf eindeutig interpretiert geparst. Sie sind nur normale Funktionen. Sie sind herzlich willkommen, einige neue Lücken zu füllen. – jtdubs

Nun, pro der Fehlermeldung gibt es keine cadddar Funktion. Beachten Sie, dass car und cdr die primitiven Funktionen zum Lesen von Listen sind. Andere wie caddar sind Komfortfunktionen, die aus einer Kombination von einem oder mehreren car und cdr aufgebaut sind. Das heißt, Sie konnten Listenmanipulation nur mit car und cdr durchführen, wenn caddar usw. nicht existierte, die erweiterten Funktionen machen Ihnen einfach das Leben ein bisschen einfacher.

Also, der Weg, dies zu erreichen, ist Ihre eigenen cadddar mit car und cdr zu synthetisieren. Wenn es nicht sofort ersichtlich ist, wie dies zu tun ist, starten Sie einfacher (mit, sagen wir cadr oder cdar) und bauen Sie bis cadddar.

Quelle

2010-11-19 04:56:58 Greg

(first (last (first '(((1 2) 3 4 5) ((6 7) 8 9 10))))) 

-> 5

Quelle

2010-11-19 08:35:25

Die Funktionen mit mehr als 4 a s und d s werden durch den Standard nicht definiert ist, vielleicht, weil gibt es 32 von ihnen [und es wird von da an exponentiell unordentlicher].

Ein sicherer Weg, das letzte Element einer Liste zu erhalten: last die letzte cons Zelle zurückkehrt, so

(car (last list))

gibt Ihnen die letzte Listenelement. Natürlich könnte list etwas anderes wie (first list) sein.

Quelle

2012-03-26 10:57:43 michaelb958

LISP Auto des letzten Elements?

Antwort

Verwandte Themen