bubbleChart :: Picture
bubbleChart =
    pictures [ color bgColor $ plotChartBackground xAxis yAxis
             , color gridColor $ plotGrid xAxis yAxis (1, 1)
             , plotAxes xAxis yAxis
             , plotAxisScales xAxis yAxis (1, 1)
             , plotBubbleChart xAxis yAxis zAxis $ zip3 xs ys zs
             ]
    where xAxis = autoScaleAxis' Linear chartW xs
          yAxis = autoScaleAxis' Linear chartH xs
          zAxis = fixedScaleAxis Linear 20 (-1.5) 1
          xs    = [1..10]
          ys    = [0.5 + maximum xs - (x + sin x) | x <- xs]
          zs    = map cos xs

-----------------------------------------------------------------------------
bubbleChart :: Picture
bubbleChart =
    pictures [ color bgColor $ plotChartBackground xAxis yAxis
             , color gridColor $ plotGrid xAxis yAxis (1, 1)
             , plotAxes xAxis yAxis
             , plotAxisScales xAxis yAxis (1, 1)
             , plotBubbleChart xAxis yAxis zAxis $ zip3 xs ys zs
             ]
    where xAxis = autoScaleAxis' Linear chartW xs
          yAxis = autoScaleAxis' Linear chartH xs
          zAxis = fixedScaleAxis Linear 20 (-1.5) 1
          xs    = [1..10]
          ys    = [0.5 + maximum xs - (x + sin x) | x <- xs]
          zs    = map cos xs

-----------------------------------------------------------------------------
bubbleChart =
    pictures [ color bgColor $ plotChartBackground xAxis yAxis
             , color gridColor $ plotGrid xAxis yAxis (1, 1)
             , plotAxes xAxis yAxis
             , plotAxisScales xAxis yAxis (1, 1)
             , plotBubbleChart xAxis yAxis zAxis $ zip3 xs ys zs
             ]
    where xAxis = autoScaleAxis' Linear chartW xs
          yAxis = autoScaleAxis' Linear chartH xs
          zAxis = fixedScaleAxis Linear 20 (-1.5) 1
          xs    = [1..10]
          ys    = [0.5 + maximum xs - (x + sin x) | x <- xs]
          zs    = map cos xs

-----------------------------------------------------------------------------