print-graph
我们可以使用一个短数字列表来测试 print-graph
函数:
Y-axis-column
、graph-body-print
和 print-graph
的最终版本(以及其余的代码)。
(print-graph '(3 2 5 6 7 5 3 4 6 4 3 2 1))
eval-expression
)。
yank
)将测试表达式粘贴到迷你缓冲区中。
Emacs 将打印一个看起来像这样的图表:
10 - * ** * 5 - **** * **** *** * ********* ************ 1 - ************* | | | | 1 5 10 15
另一方面,如果你将 print-graph
的 vertical-step
值设为 2,通过评估以下表达式:
(print-graph '(3 2 5 6 7 5 3 4 6 4 3 2 1) 2)
图表看起来像这样:
20 - * ** * 10 - **** * **** *** * ********* ************ 2 - ************* | | | | 1 5 10 15
(一个问题:垂直轴底部的 ‘2’ 是一个错误还是一个特性?如果你认为这是一个错误,应该是 ‘1’ 而不是 ‘2’(甚至是 ‘0’),你可以修改源代码。)