rCharts - Adding second y axis to time series

前端 未结 1 1935
孤城傲影
孤城傲影 2021-01-06 00:43

Does any of the packaged charting frameworks in rCharts support making a time series plot of two series with different y axis? In the case has anyone an example to share?

相关标签:
1条回答
  • 2021-01-06 01:31

    This can be done in highcharts and most likely others. I have taken the nice work done here. A simplified version of that is:

    library(rCharts)
    h <- Highcharts$new()
    h$xAxis(categories = c('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun',
                           'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec'))
    h$yAxis(list(list(title = list(text = 'Rainfall'))
                 , list(title = list(text = 'Temperature'), opposite = TRUE)
                 , list(title = list(text = 'Sea Pressure'), opposite = TRUE))
            )
    h$series(name = 'Rainfall', type = 'column', color = '#4572A7',
                    data = c(49.9, 71.5, 106.4, 129.2, 144.0, 176.0, 135.6, 148.5, 216.4, 194.1, 95.6, 54.4))
    h$series(name = 'Temperature', type = 'spline', color = '#89A54E',
                    data = c(7.0, 6.9, 9.5, 14.5, 18.2, 21.5, 25.2, 26.5, 23.3, 18.3, 13.9, 9.6),
             yAxis = 1)
    
    h$series(name = 'Sea-Level Pressure', type = 'spline', color = '#AA4643',
             data = c(1016, 1016, 1015.9, 1015.5, 1012.3, 1009.5, 1009.6, 1010.2, 1013.1, 1016.9, 1018.2, 1016.7),
             yAxis = 2)
    h
    

    Which will hopefully give this chart

    enter image description here

    0 讨论(0)
提交回复
热议问题