C.4.1 测试 print-graph

我们可以使用一个短数字列表来测试 print-graph 函数:

  1. 安装 Y-axis-columngraph-body-printprint-graph 的最终版本(以及其余的代码)。
  2. 复制以下表达式:
    (print-graph '(3 2 5 6 7 5 3 4 6 4 3 2 1))
    
  3. 切换到 *scratch* 缓冲区,并将光标放在你希望轴标签开始的位置。
  4. 键入 M-:eval-expression)。
  5. 使用 C-yyank)将测试表达式粘贴到迷你缓冲区中。
  6. 按下 RET 键来评估表达式。

Emacs 将打印一个看起来像这样的图表:

10 -


         *
        **   *
 5 -   ****  *
       **** ***
     * *********
     ************
 1 - *************

     |   |    |    |
     1   5   10   15

另一方面,如果你将 print-graphvertical-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’),你可以修改源代码。)