Convert number to list of digits

Question

How do I convert a number to a list of digits?

I am currently doing:

;; (num->list 12345) -> \'(1 2 3 4 5)
(define (num->list n)
  (local 
          


        

Answer 1

"Better" is always open to definition, but a bit more direct/obvious way would be something like this:

(define (int->list n) (if (zero? n) `()
                          (append (int->list (quotient n 10)) (list (remainder n 10)))))

As to whether this is "good", "bad", "better", etc., I guess it depends on what you want. There's no question that you can find code that's more efficient, more versatile, etc. (in fact, @user448810 has already posted some). This is more what I'd think of as example code for something like an introduction to Scheme -- the emphasis is on being simple and easy to understand/explain¹. I'd expect that almost anybody with a bare minimum of exposure to some Lisp-like language and a general idea of how such numeric conversion is done should be able to figure out everything that's going on here fairly quickly/easily.

---

1. Even at the expense of incorrect behavior for some corner cases -- e.g., as-is, it only even attempts to work correctly for strictly positive numbers.