hPlot R x-轴标号与x-y对应

Question

我有以下数据，并试图使用hPlot绘图

hPlot(Numbers~Date, data = df, group='Type', type = "line", radius=6)


     Date        Type      Numbers
 2014-01-05     Type-1          16
 2014-01-12     Type-1          82
 2014-01-12     Type-2           2
 2014-01-19     Type-1         177
 2014-01-26     Type-1         270
 2014-01-26     Type-2           3
 2014-02-02     Type-1         381
 2014-02-09     Type-1         461
 2014-02-09     Type-2           4

我得到多个日期作为x轴，如下图所示。我也尝试过unique和as.character，但是x-数据与y-数据不相对应。

​

​

Answer 1

这是解决你的问题的方法。您可以与代码这里一起查看图表。我也把它发到这里

# don't switch to scientific notation, since we want date to be
# represented in milliseconds
options(scipen = 13)
dat = transform(df, Date2 = as.numeric(as.POSIXct(Date))*1000)

library(rCharts)
h1 <- hPlot(Numbers ~ Date2, data = dat, 
  group = 'Type', 
  type = "line", 
  radius=6
)
h1$xAxis(type = 'datetime', labels = list(
  format = '{value:%Y-%m-%d}'  
))
h1