Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/date/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在R hexbin()中创建日期为的hexbin_R_Date_Time Series_Binning - Fatal编程技术网

在R hexbin()中创建日期为的hexbin

在R hexbin()中创建日期为的hexbin,r,date,time-series,binning,R,Date,Time Series,Binning,我正在尝试使用R中hexbin包中的hexbin函数创建x轴为日期的hexbin。当我输入数据时,它似乎将日期转换为数字,并显示在x轴上。我希望它强制x轴成为一个日期 #Create Hex Bins hbin <- hexbin(xData$Date, xData$YAxis, xbins = 80) #Plot using rBokeh figure() %>% ly_hexbin(hbin) #创建十六进制存储箱 hbin% 吕赫宾(hbin) 这给了我: 下面是

我正在尝试使用R中hexbin包中的hexbin函数创建x轴为日期的hexbin。当我输入数据时,它似乎将日期转换为数字,并显示在x轴上。我希望它强制x轴成为一个日期

#Create Hex Bins
hbin <- hexbin(xData$Date, xData$YAxis, xbins = 80)

#Plot using rBokeh
figure() %>% 
  ly_hexbin(hbin) 
#创建十六进制存储箱
hbin%
吕赫宾(hbin)
这给了我:


下面是一个使用底层网格绘图包的暴力方法。斧子很丑;也许有人拥有比我更好的
grid
技能

# make some data
x = seq.Date(as.Date("2015-01-01"),as.Date("2015-12-31"),by='days')
y = sample(x)

# make the plot and capture the plot
p <- plot(hexbin(x,y),yaxt='n',xaxt='n')

# calculate the ticks
x_ticks_date <- 
x_ticks <- axTicks(1, log = FALSE, usr = as.numeric(range(x)),
                axp=c(as.numeric(range(x)) ,5))
class(x_ticks_date) <- 'Date'
y_ticks_date <- 
y_ticks <- axTicks(1, log = FALSE, usr = as.numeric(range(y)),
                   axp=c(as.numeric(range(y)) ,5))
class(y_ticks_date) <- 'Date'

# push the ticks to the view port.
pushViewport(p$plot.vp@hexVp.off)
grid.xaxis(at=x_ticks, label = format(y_ticks_date))
grid.yaxis(at=y_ticks, label = format(y_ticks_date))
#制作一些数据
x=序号日期(截止日期(“2015-01-01”)、截止日期(“2015-12-31”),由='天')
y=样品(x)
#制作情节并捕捉情节

p回顾过去,更好的解决方案是使用ggplot2,结合使用,以更少的工作量制作漂亮的axis。如果有人加上那个答案,我会投赞成票。