racket - 如何在 Racket 中将数字列表转换为三位数字列表？

Question

例如，'(1 2 3 4 5 6 7 8 9) 将转换为 '(123 456 789)。我试图找到一种递归方式来做到这一点，但失败了。

标签： racket

Answer 1

例如

(define (f lst)
  (if (null? lst)
      null
      (cons (+ (* 100 (car  lst))
               (*  10 (cadr lst))
               (caddr lst))
            (f (cdddr lst)))))