import VegaLite exposing (..)

Bicycle Hires

barChart : Spec
barChart =
    let
        enc =
            encoding
                << position X [ pName "AvHireTime" ]
                << position Y [ pAggregate opCount ]
    in
    toVegaLite
        [ dataFromUrl "https://gicentre.github.io/data/bicycleHiresLondon.csv" []
        , enc []
        , bar []
        ]

fDistrib : Spec
fDistrib =
    barChart