format - 如何在 Lisp 中将 0 添加到整数列表中

Question

我有一个整数列表(3 11 7 26 5)

我写了一个函数来添加 0 到 1 位数字：

(defun beautify (list)
  (mapcar #'0-add list))

(defun 0-add (1digit)
  (format nil "~2,'0d" 1digit))

它输出（“03”“11”“07”“26”“05”）

但是，我想要(03 11 07 26 05)

我该如何安排呢？

标签： formatlispcommon-lisp

Answer 1

CL-USER 10 > (format t "(~{~a~^ ~})" '("03" "11" "07" "26" "05"))
(03 11 07 26 05)

CL-USER 11 > (format t "(~{~2,'0d~^ ~})" '(3 11 7 26 5))
(03 11 07 26 05)