rCharts - highcharts速度

时间:2014-05-22 05:15:13

标签: highcharts rcharts

关于(rCharts)highcharts渲染速度的一般问题。

给出以下代码

rm(list = ls())
require(rCharts)

set.seed(2)
time_stamp<-seq(from=as.POSIXct("2014-05-20 01:00",tz=""),to=as.POSIXct("2014-05-22 20:00",tz=""),by="1 min")
Data1<-abs(rnorm(length(time_stamp))*50)
Data2<-rnorm(length(time_stamp))
time<-as.numeric(time_stamp)*1000

CombData=data.frame(time,Data1,Data2)
CombData$Data1=round(CombData$Data1,2);CombData$Data2=round(CombData$Data2,2);
HCGraph <- Highcharts$new()

HCGraph$yAxis(list(list(title = list(text = 'Data1')),
                   list(title = list(text = 'Data2'),
                        opposite =TRUE)))

HCGraph$series(data = toJSONArray2(CombData[,c('time','Data1')], json = F, names = F),enableMouseTracking=FALSE,shadow=FALSE,name = "Data1",type = "line")
HCGraph$series(data = toJSONArray2(CombData[,c('time','Data2')], json = F, names = F),enableMouseTracking=FALSE,shadow=FALSE,name = "Data2",type = "line",yAxis=1)
HCGraph$xAxis(type = "datetime"); HCGraph$chart(zoomType = "x")
HCGraph$plotOptions(column=list(animation=FALSE),shadow=FALSE,line=list(marker=list(enabled=FALSE)));
HCGraph

生成2个系列的高图图表,每个长度为4021个点并立即渲染。

但是,如果我将时间跨度增加到10天(8341分),则生成的绘图可能需要几分钟才能生成。

我知道可以对highcharts进行一些修改以获得更好的性能, Highcharts Performance Enhancement Method?, 但是,从R / rCharts的角度来看,我可以做些什么改变来提高性能?

干杯

0 个答案:

没有答案