#'Release dates of R
#'
#'@export
R.release.dates <- local({
# Generation:
# df <- rversions::r_versions()
# R.release.dates.src <- deparse(
# sapply(target.versions, function(version) {
# as.Date(df[df$version == version,]$date) + 1
# })
# )
# cat(gsub(x = R.release.dates.src, ", ", ",\n", fixed = TRUE))
x <- c(
"3.0.0" = 15799,
"3.0.1" = 15842,
"3.0.2" = 15974,
"3.0.3" = 16136,
"3.1.0" = 16171,
"3.1.1" = 16262,
"3.1.2" = 16375,
"3.1.3" = 16504,
"3.2.0" = 16542,
"3.2.1" = 16605,
"3.2.2" = 16662,
"3.2.3" = 16780,
"3.2.4" = 16871,
"3.2.5" = 16906,
"3.3.0" = 16925,
"3.3.1" = 16974,
"3.3.2" = 17106,
"3.3.3" = 17232,
"3.4.0" = 17278,
"3.4.1" = 17348,
"3.4.2" = 17438,
"3.4.3" = 17501,
"3.4.4" = 17606,
"3.5.0" = 17645,
"3.5.1" = 17715,
"3.5.2" = 17886,
"3.5.3" = 17967,
"3.6.0" = 18013,
"3.6.1" = 18083,
"3.6.2" = 18243,
"3.6.3" = 18322,
"4.0.0" = 18377,
"4.0.1" = 18420,
"4.0.2" = 18436,
"4.0.3" = 18546,
"4.0.4" = 18674,
"4.0.5" = 18718,
"4.1.0" = 18766,
"4.1.1" = 18850,
"4.1.2" = 18933,
"4.1.3" = 19062,
"4.2.0" = 19105,
"4.2.1" = 19167
)
class(x) <- "Date"
x
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.