Deprecated: integrated into chart-svg v0.6
chart-svg-compound
is an experimental addon to chart-svg that attempts to render multiple charts that share a common canvas space.
:r
:set prompt "> "
:set -Wno-type-defaults
:set -Wno-name-shadowing
:set -XOverloadedStrings
:set -XOverloadedLabels
:set -Wno-incomplete-uni-patterns
import Chart.Compound
import Chart
import Chart.Examples
import Prettychart
import Data.Bifunctor
putStrLn "ok"
(display, quit) <- startChartServer Nothing
disp x = display $ x & set (#markupOptions % #markupHeight) 250 & set (#hudOptions % #frames % ix 1 % _2 % #buffer) 0.1
unit2 = unitExample & set (#hudOptions % #axes) [(4,defaultAxisOptions & set #place PlaceRight),(4,defaultAxisOptions & set #place PlaceTop)]
disp $ compoundMerge [unit2, lineExample]