如何从球拍语言的给定索引的列表中获取项目？

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))))))