## To get start, end and sequence of this year
thisyear <- this_year()
## To get vector of date sequences
this_year(part = "sequence")
this_year()$sequence
seq(thisyear)
## Get number of days of this year
day_nums <- this_year(part = "length")
this_year()$length
length(thisyear)
Run the code above in your browser using DataLab