有谁知道如何在R中绘制“日期”的分布图？

Question

我有一个data.frame，其中几列，有些是characters，有些是numerics，其中之一是Date。我想可视化Date的范围，但是如何做到这一点并不是很直观。

有人对方法有什么好的建议吗？我不是在要求特定的代码，而只是要求如何了解日期的分布方向。但是，如果您有用于说明目的的代码，我也将不胜感激。

更新

这是日期的演示代码。

date3 <- data.frame(example=c(as.Date("01/01/2011", format="%m/%d/%Y"), as.Date("02/01/2012", format="%m/%d/%Y"),  as.Date("03/01/2013", format="%m/%d/%Y")))

Answer 1

作为直方图和箱形图的替代方法，在日历上查看日期可能很有用。以googleVis提供的示例为基础...

library(googleVis)
library(tidyverse)

date4 <- c(as.Date("01/01/2011", format="%m/%d/%Y"), as.Date("02/01/2012", format="%m/%d/%Y"),  as.Date("03/01/2013", format="%m/%d/%Y"))
Date_seq =  seq(from = as.Date('2011-01-01'), to = as.Date('2013-12-31'), by = '1 day')
Dates_of_interest <- rep(0, n = length(Date_seq))
Dates_of_interest[Date_seq %in% date4] <- 1 

df <- data_frame(Date_seq = Date_seq, Dates_of_interest = Dates_of_interest)

Cal <- gvisCalendar(df, 
                    datevar="Date_seq", 
                    numvar="Dates_of_interest",
                    options=list(
                      title="Dates of interest",
                      height=320,
                      calendar="{yearLabel: { fontName: 'Times-Roman',
                               fontSize: 32, color: '#1A8763', bold: true},
                               cellSize: 10,
                               cellColor: { stroke: 'red', strokeOpacity: 0.2 },
                               focusedCellColor: {stroke:'red'}}")
)
plot(Cal)