Method for hist
applied to date or datetime objects.
1 2 3 4 5 6 7 8 9 10 11  ## S3 method for class 'POSIXt'
hist(x, breaks, ...,
xlab = deparse1(substitute(x)),
plot = TRUE, freq = FALSE,
start.on.monday = TRUE, format, right = TRUE)
## S3 method for class 'Date'
hist(x, breaks, ...,
xlab = deparse1(substitute(x)),
plot = TRUE, freq = FALSE,
start.on.monday = TRUE, format, right = TRUE)

x 
an object inheriting from class 
breaks 
a vector of cut points or number giving the number of
intervals which 
... 
graphical parameters, or arguments to

xlab 
a character string giving the label for the x axis, if plotted. 
plot 
logical. If 
freq 
logical; if 
start.on.monday 
logical. If 
format 
for the xaxis labels. See 
right 
logical; if 
Note that unlike the default method, breaks
is a required argument.
Using breaks = "quarters"
will create intervals of 3 calendar
months, with the intervals beginning on January 1, April 1,
July 1 or October 1, based upon min(x)
as appropriate.
With the default right = TRUE
, breaks will be set
on the last day of the previous period when breaks
is
"months"
, "quarters"
or "years"
. Use
right = FALSE
to set them to the first day of the
interval shown in each bar.
An object of class "histogram"
: see hist
.
seq.POSIXt
, axis.POSIXct
, hist
1 2 3 4 5 6 7 8  hist(.leap.seconds, "years", freq = TRUE)
hist(.leap.seconds,
seq(ISOdate(1970, 1, 1), ISOdate(2020, 1, 1), "5 years"))
rug(.leap.seconds, lwd=2)
## 100 random dates in a 10week period
random.dates < as.Date("2001/1/1") + 70*stats::runif(100)
hist(random.dates, "weeks", format = "%d %b")

Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.