如何使用 lisp 格式函数用零填充参数？答案

【问题标题】：How can I pad an argument with zeroes using the lisp format function?如何使用 lisp 格式函数用零填充参数？
【发布时间】：2008-12-29 14:06:05
【问题描述】：

我正在玩 lisp 的格式化函数，但我遇到了一个障碍，因为虽然我可以让它写出很好地对齐的数字列表，但我似乎无法让它补零：

(defun inc (a) (+ 1 a))
(dotimes (i 10)
  (format t "~3@:D ~:*~R~%" (inc i)))

这会产生以下输出：

+1: one
+2: two
+3: three
+4: four
+5: five
+6: six
+7: seven
+8: eight
+9: nine
+10: ten

有人知道如何将其填零吗？

【问题讨论】：

【解决方案1】：

示例取自the PCL chapter on FORMAT:

(format nil "~12d" 1000000)    ==> "     1000000"
(format nil "~12,'0d" 1000000) ==> "000001000000"

【讨论】：