Lisp 格式程序

Question

我开始用 Lisp 编程，但在使用 Format 函数时遇到了困难。

我的目标是将整数子列表列表打印为行的 N 个整数。例如：

'((1 2 3)
(4 5 6)
(7 8 9))

应打印为

1 2 3
4 5 6
7 8 9

我尝试在格式化过程中使用迭代，但失败了。

我写的是：

(format t "~{~S ~}" list)

但是这样我得到的子列表是“(1 2 3)”而不是“1 2 3”，所以我尝试了：

(format t "~:{ ~S ~}" list)

这次我进入了子列表，但只打印了第一个元素，所以我介入了并将该函数重写为：

(format t "~:{ ~S ~S ~S ~}" list)

它适用于具有 3 个元素的子列表，但如何使其适用于 n 个元素？

谢谢！

Answer 1

(format t "~{~%~{~A~^ ~}~}"  '((1 2 3) (4 5 6) (7 8 9)))

印刷

1 2 3
4 5 6
7 8 9