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-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’ 是 bug 还是特意设计的功能?如果你认为这是 bug,应该显示 ‘1’(甚至是 ‘0’),你可以修改源码。)