如何在Scheme中創建和添加列表中的元素？

Question

我想定義一個方法，它將一個整數作爲輸入，並動態創建一個所有遞減整數數字爲零的列表。我發現n-1元素的調用方法存在問題

Answer 1

這並不是那麼漂亮，但這應該可以在DrScheme中測試。

(define (gen-list x) 
    (if (= x 0) (list 0) (cons x (gen-list (- x 1))))) 

Answer 2

如果您正在使用PLT方案中，推導庫將讓你這樣做而整齊：

; natural -> (listof natural) 
(define (list-to-zero start-num) 
(for/list ([i (in-range start-num 0 -1)]) 
    i)) 

只是一個替代遞歸形式...

Answer 3

現在，它的一個作業問題，我認爲一個尾遞歸版本可能是一個替代方案。

(define (gen-list x) 
      (let lp ((n 0) (ret '())) 
       (if (> n x) 
       ret 
       (lp (1+ n) (cons n ret)))))