On Github zmanian / haskell_charts_prezo
dp :: [Double] dp = [24,21,32.3,24,15,34,43,55,57,72,74,75,73,72,55,44] sl :: Sparkline sl = SparkLine barSpark dp fopt :: FileOptions fopts = FileOptions (sparkSize sl) PNG main = do renderableToFile fopts (sparkLineToRenderable sl) "bar_spark.png"
scatterDataToPointData :: ((V.Vector Double, V.Vector Double, String), Colour a) -> PlotPoints Double Double scatterDataToPointData ((x_vals,y_vals,title),color) = points (zip (V.toList x_vals) (V.toList y_vals)) title color zipForHistData :: Double -> [Double] zipForHistData first = [first] tupleToPlotVals :: (V.Vector Double) -> [[Double]] tupleToPlotVals histo = V.toList $ V.map zipForHistData histo