suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Altered a couple of tests to test list-of-lists histogram arguments

Browse Source
This commit is contained in:
Neil Toronto 2012-08-12 08:58:51 -06:00
parent b8c025da61
commit ca99eb4a5e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/plot/tests/plot2d-tests.rkt
View File

@ -184,7 +184,7 @@
(time (time
(plot (list (x-axis) (plot (list (x-axis)
(discrete-histogram '(#(a -1) #(b 2.6) #(c 4) #(d 3.1)) #:y-min #f (discrete-histogram '((a -1) (b 2.6) (c 4) (d 3.1)) #:y-min #f
#:color 5 #:line-color 5 #:line-style 'long-dash #:color 5 #:line-color 5 #:line-style 'long-dash
#:label "Corrupt") #:label "Corrupt")
(discrete-histogram '(#(a 1) #(b 2.6) #(c 4) #(d 3.1)) (discrete-histogram '(#(a 1) #(b 2.6) #(c 4) #(d 3.1))
@ -215,7 +215,7 @@
[discrete-histogram-skip 2] [discrete-histogram-skip 2]
[stacked-histogram-line-widths '(3)]) [stacked-histogram-line-widths '(3)])
(plot (list (stacked-histogram '(#(a (0.2 1)) #(b (2.5 1.2)) #(c (2 0)))) (plot (list (stacked-histogram '(#(a (0.2 1)) #(b (2.5 1.2)) #(c (2 0))))
(stacked-histogram '(#(a (2 1)) #(b (1.1 0.9)) #(c (1 1.1))) #:x-min 7/8 (stacked-histogram '((a (2 1)) (b (1.1 0.9)) (c (1 1.1))) #:x-min 7/8
#:colors '(3 4) #:colors '(3 4)
#:line-colors '(3 4)))))) #:line-colors '(3 4))))))