球拍/方案中的惯用嵌套循环

时间:2013-05-18 20:04:31

标签: scheme range racket nested-loops

有没有人知道在一个范围内的数字上嵌套循环的惯用方法是什么?在Racket / Scheme中?在Python中我们有:

for i in range(numb1):
    for j in range(numb2):

Racket / Scheme中的等价物是什么?

1 个答案:

答案 0 :(得分:11)

在Racket中,使用Iterations and Comprehensions

就这么简单
(for* ([i (in-range numb1)]
       [j (in-range numb2)])
  <body of iteration>)

以上内容仅适用于Racket。相比之下,以下代码段可以在任何标准RxRS解释器中使用 - 例如,使用一对嵌套的do

(do ((i 0 (+ i 1))) ((= i numb1))
  (do ((j 0 (+ j 1))) ((= j numb2))
    <body of iteration>))

另一个选择:使用显式递归并命名为let

(let loop1 ((i 0))
  (cond ((< i numb1)
         (let loop2 ((j 0))
           (cond ((< j numb2)
                  <body of iteration>
                  (loop2 (+ j 1)))))
         (loop1 (+ i 1)))))

最后,您可以随时执行以下操作,有关详细信息,请参阅“嵌套映射”部分下的SICP

(define (range start stop)
  (let loop ((i (- stop 1))
             (acc '()))
    (if (< i start)
        acc
        (loop (- i 1) (cons i acc)))))

(for-each
 (lambda (i)
   (for-each
    (lambda (j)
      <body of iteration>)
    (range 0 numb2)))
 (range 0 numb1))