Chris@125: module yetilab.plot.test.test_plot;
Chris@125: 
Chris@144: ch = load yetilab.plot.chart;
Chris@125: 
Chris@125: { compare } = load yetilab.test.test;
Chris@125: 
Chris@125: [
Chris@125: 
Chris@125: "stack": \(
Chris@125:     compare
Chris@144:        (ch.stack
Chris@125:             [ "Conrad", "Alice", "Bob" ]
Chris@125:             [ "Jan", "Feb", "Mar" ]
Chris@125:             [ "Alice":  [ "Jan": 3, "Mar": 2 ],
Chris@125:               "Bob":    [ "Jan": 0, "Feb": 1, "Mar": 4 ],
Chris@129:               "Conrad": [ "Feb": 2, "Mar": 1 ] ]
Chris@129:             false)
Chris@127:         [ "Conrad": [ "Jan": { y0 = 0, y1 = 0 },
Chris@127:                       "Feb": { y0 = 0, y1 = 2 },
Chris@127:                       "Mar": { y0 = 0, y1 = 1 } ],
Chris@127:           "Alice":  [ "Jan": { y0 = 0, y1 = 3 },
Chris@127:                       "Feb": { y0 = 2, y1 = 2 },
Chris@127:                       "Mar": { y0 = 1, y1 = 3 } ],
Chris@127:           "Bob":    [ "Jan": { y0 = 3, y1 = 3 },
Chris@127:                       "Feb": { y0 = 2, y1 = 3 },
Chris@127:                       "Mar": { y0 = 3, y1 = 7 } ] ]
Chris@125: ),
Chris@125: 
Chris@129: "stack-normalised": \(
Chris@129:     compare
Chris@144:        (ch.stack
Chris@129:             [ "Conrad", "Alice", "Bob" ]
Chris@129:             [ "Jan", "Feb", "Mar" ]
Chris@129:             [ "Alice":  [ "Jan": 3, "Mar": 2 ],
Chris@129:               "Bob":    [ "Jan": 0, "Feb": 1, "Mar": 4 ],
Chris@129:               "Conrad": [ "Feb": 2, "Mar": 1 ] ]
Chris@129:             true)
Chris@129:         [ "Conrad": [ "Jan": { y0 = 0, y1 = 0 },
Chris@129:                       "Feb": { y0 = 0, y1 = 2/3 },
Chris@129:                       "Mar": { y0 = 0, y1 = 1/7 } ],
Chris@129:           "Alice":  [ "Jan": { y0 = 0, y1 = 1 },
Chris@129:                       "Feb": { y0 = 2/3, y1 = 2/3 },
Chris@129:                       "Mar": { y0 = 1/7, y1 = 3/7 } ],
Chris@129:           "Bob":    [ "Jan": { y0 = 1, y1 = 1 },
Chris@129:                       "Feb": { y0 = 2/3, y1 = 1 },
Chris@129:                       "Mar": { y0 = 3/7, y1 = 1 } ] ]
Chris@129: ),
Chris@129: 
Chris@125: ] is hash<string, () -> boolean>;
Chris@125: