使用球拍图线

Question

我正在尝试使用线条函数绘制图形，但我似乎无法弄清楚确切的语法。 这是我尝试的一些代码：

(require plot)

(define lst '(1 2 3 4 5 6 7 8 9))
(define f (plot-frame (lines lst)))
(send f show #t)

但它给了我以下错误消息：

lines: contract violation
expected: sequence of length >= 2
given: #<sequence>

Answer 1

lines函数的第一个参数应该是一系列实数序列（而不仅仅是一个实数序列）。这就是文档中显示的合同意味着：(sequence/c (sequence/c real?))

例如，这是一个有效的输入：(lines '((1 2) (3 4)))

文档中还有一个完整的示例：http://www.cs.utah.edu/plt/snapshots/current/doc/plot/renderer2d.html?q=lines#%28def._%28%28lib._plot%2Fmain..rkt%29._lines%29%29