Erhalten letzten n Elemente in einer Liste in DrRacket, ohne list-ref

Question

Ich weiß, wie die ersten n Elemente in einer Liste zu bekommen,

(define (countup n ls) 
    (cond 
    [(zero? n) '()] 
    [else (cons (first ls) (countup (sub1 n) (rest ls)))])) 

aber wie kann ich so etwas tun für die letztenn Elemente in einer Liste (ohne List-Ref)? Wenn Sie (countup 3 '(a b c d e)) anrufen, bekomme ich (list a b c). Ich muss in der Lage sein, (counter 3 '(a b c d e)) einzugeben und (list c d e) zu erhalten.

Ich brauche Fehlermeldungen, falls die angegebene Nummer n größer ist als die Listenlänge.

Answer 1

Verwenden Sie einfach das eingebaute in take-right Verfahren, es tut genau das, was Sie brauchen:

(take-right '(a b c d e) 3) 
=> '(c d e) 

Oder man kann es von Grund auf neu implementieren, mit primitiven Prozeduren:

(define (counter n lst) 
    (define (move n lst) 
    (if (zero? n) 
     lst 
     (move (sub1 n) (rest lst)))) 
    (define (trim-left lst rst) 
    (if (empty? rst) 
     lst 
     (trim-left (rest lst) (rest rst)))) 
    (trim-left lst (move n lst))) 

Es funktioniert auch als erwartet:

(counter 3 '(a b c d e)) 
=> '(c d e)