如何從球拍語言的給定索引的列表中獲取項目？

Question

我試圖從列表中獲取循環語句的給定索引的項目。

(define decision-tree-learning 
    (lambda (examples attribs default) 
    (cond 
     [(empty? examples) default] 
     [(same-classification? examples) (caar examples)] ; returns the classification 
     [else (lambda() 
       (let ((best (choose-attribute attributes examples)) 
        (tree (make-tree best)) 
        (m (majority-value examples)) 
        (i 0) 
        (countdown (length best)) ; starts at lengths and will decrease by 1 
        (let loop() 
        (let example-sub ; here, totally stuck now 
         ; more stuff 
         (set! countdown (- countdown 1)) 
         ; more stuff 
        )))))]))) 

在這種情況下，best是列表，我需要在countdown指數來獲得它的值。你能幫助我嗎？

Answer 1

例子：

> (list-ref '(a b c d e f) 2) 
'c 

參見：

http://docs.racket-lang.org/reference/pairs.html

Answer 2

或者這樣建立自己：

(define my-list-ref 
    (lambda (lst place) 
     (if (= place 0) 
      (car lst) 
      (my-list-ref (cdr lst) (- place 1))))) 

，但如果你想檢查列表完成和Don」不要擔心錯誤喲也可以這樣做：

(define my-list-ref 
    (lambda (lst place) 
     (if (null? lst) 
      '() 
      (if (= place 0) 
      (car lst) 
      (my-list-ref (cdr lst) (- place 1))))))