使用球拍繪製線

我正在嘗試使用線條功能來繪製圖形，但我似乎無法弄清楚確切的語法。下面是一些代碼，我嘗試：使用球拍繪製線

(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>

2013-12-22 JNevens

的lines函數的第一個參數應該是實數序列的序列（而不是隻是一個實數序列）。這就是在文檔中顯示該合同是指：(sequence/c (sequence/c real?))

例如，這是一個有效的輸入：(lines '((1 2) (3 4)))

2013-12-22 19:42:57

回答