方案 - 如何修改列表中的单个元素？

Question

如果我有一个 0 列表，我该如何修改，例如列表中的第 16 个 0？

Answer 1

你必须自己写。它没有内置到Scheme 中，因为它不符合惯用法，并且可以通过set-car! 轻松构建。

(define (list-set! l k obj)
  (cond
    ((or (< k 0) (null? l)) #f)
    ((= k 0) (set-car! l obj))
    (else (list-set! (cdr l) (- k 1) obj))))

如果您经常这样做，您可能应该考虑使用向量和向量集！。