annotate yetilab/plot/test/test_plot.yeti @ 254:5eb57c649de0 sparse

Using hashes is simpler, but turns out to be mostly no faster and sometimes much slower. Not one to merge back.
author Chris Cannam
date Tue, 21 May 2013 17:40:33 +0100
parents 4065178f776b
children
rev   line source
Chris@125 1 module yetilab.plot.test.test_plot;
Chris@125 2
Chris@144 3 ch = load yetilab.plot.chart;
Chris@125 4
Chris@125 5 { compare } = load yetilab.test.test;
Chris@125 6
Chris@125 7 [
Chris@125 8
Chris@125 9 "stack": \(
Chris@125 10 compare
Chris@144 11 (ch.stack
Chris@125 12 [ "Conrad", "Alice", "Bob" ]
Chris@125 13 [ "Jan", "Feb", "Mar" ]
Chris@125 14 [ "Alice": [ "Jan": 3, "Mar": 2 ],
Chris@125 15 "Bob": [ "Jan": 0, "Feb": 1, "Mar": 4 ],
Chris@129 16 "Conrad": [ "Feb": 2, "Mar": 1 ] ]
Chris@129 17 false)
Chris@127 18 [ "Conrad": [ "Jan": { y0 = 0, y1 = 0 },
Chris@127 19 "Feb": { y0 = 0, y1 = 2 },
Chris@127 20 "Mar": { y0 = 0, y1 = 1 } ],
Chris@127 21 "Alice": [ "Jan": { y0 = 0, y1 = 3 },
Chris@127 22 "Feb": { y0 = 2, y1 = 2 },
Chris@127 23 "Mar": { y0 = 1, y1 = 3 } ],
Chris@127 24 "Bob": [ "Jan": { y0 = 3, y1 = 3 },
Chris@127 25 "Feb": { y0 = 2, y1 = 3 },
Chris@127 26 "Mar": { y0 = 3, y1 = 7 } ] ]
Chris@125 27 ),
Chris@125 28
Chris@129 29 "stack-normalised": \(
Chris@129 30 compare
Chris@144 31 (ch.stack
Chris@129 32 [ "Conrad", "Alice", "Bob" ]
Chris@129 33 [ "Jan", "Feb", "Mar" ]
Chris@129 34 [ "Alice": [ "Jan": 3, "Mar": 2 ],
Chris@129 35 "Bob": [ "Jan": 0, "Feb": 1, "Mar": 4 ],
Chris@129 36 "Conrad": [ "Feb": 2, "Mar": 1 ] ]
Chris@129 37 true)
Chris@129 38 [ "Conrad": [ "Jan": { y0 = 0, y1 = 0 },
Chris@129 39 "Feb": { y0 = 0, y1 = 2/3 },
Chris@129 40 "Mar": { y0 = 0, y1 = 1/7 } ],
Chris@129 41 "Alice": [ "Jan": { y0 = 0, y1 = 1 },
Chris@129 42 "Feb": { y0 = 2/3, y1 = 2/3 },
Chris@129 43 "Mar": { y0 = 1/7, y1 = 3/7 } ],
Chris@129 44 "Bob": [ "Jan": { y0 = 1, y1 = 1 },
Chris@129 45 "Feb": { y0 = 2/3, y1 = 1 },
Chris@129 46 "Mar": { y0 = 3/7, y1 = 1 } ] ]
Chris@129 47 ),
Chris@129 48
Chris@125 49 ] is hash<string, () -> boolean>;
Chris@125 50