The hardware and bandwidth for this mirror is donated by METANET, the Webhosting and Full Service-Cloud Provider.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]metanet.ch.
ymd
Convert ‘YMD’ format number or string to Date efficiently, e.g.,
211225
to as.Date("2021-12-25")
, using Rust’s
standard library. It also provides helper functions to handle Date,
e.g., quick finding the beginning or end of the given period, adding
months to Date, etc.
It’s similar to the lubridate
package but is much
lighter and focuses only on Date objects.
Installation
CRAN provides the binary package. So, if you are on Windows or macOS,
the package can be installed via:
If you are on Linux, you can try to use the RSPM (RStudio Package Manager)
repo provided by RStudio PBC, via (remember to choose the correct
binary repo URL for your platform):
install.packages("ymd", repos = "{RSPM-Repo-URL}")
If you want to build the dev version from source, you’ll need the
Rust toolchain, which can be installed following the
instructions from the Rust book.
After that, you can build the package via:
remotes::install_github("ymd")
Use Cases and Benchmarks
print_bmk <- function(x) {
x[[1]] <- format(x[[1]])
x[[5]] <- format(x[[5]])
rnd <- \(v) if (is.numeric(v)) round(v, 1) else v
x[, 1:8] |>
lapply(rnd) |>
as.data.frame() |>
knitr::kable() |>
print()
}
run_bmk <- function(..., time_unit = "us") {
bench::mark(..., time_unit = time_unit) |> print_bmk()
}
ymd
x <- c("210101", "21/02/03", "89-1-03", "1989.03.05", "01 02 03")
x <- rep(x, 100)
run_bmk(
ymd::ymd(x),
lubridate::ymd(x)
)
ymd::ymd(x) |
39.8 |
40.6 |
24357.7 |
810.1KB |
0.0 |
10000 |
0 |
lubridate::ymd(x) |
1390.4 |
1546.6 |
642.9 |
9.01MB |
10.9 |
295 |
5 |
x <- c(210101, 210224, 211231, 19890103)
x <- rep(x, 100)
run_bmk(
ymd::ymd(x),
lubridate::ymd(x)
)
ymd::ymd(x) |
12.4 |
13.4 |
71767.6 |
3.17KB |
0.0 |
10000 |
0 |
lubridate::ymd(x) |
1724.9 |
1897.4 |
511.3 |
365.38KB |
15.2 |
235 |
7 |
x <- c("2021-01-01", "2022-12-31", "1995-03-22")
x <- rep(x, 100)
run_bmk(
ymd::ymd(x),
lubridate::ymd(x),
as.Date(x)
)
ymd::ymd(x) |
29.1 |
30.7 |
31806.3 |
2.39KB |
3.2 |
9999 |
1 |
lubridate::ymd(x) |
796.1 |
891.8 |
1074.0 |
193.52KB |
15.1 |
499 |
7 |
as.Date(x) |
790.5 |
829.7 |
1194.6 |
85.44KB |
0.0 |
598 |
0 |
x <- ymd::ymd(210515) + 1:100
run_bmk(
ymd::eop$tm(x),
lubridate::ceiling_date(x, "month") - 1
)
ymd::eop$tm(x) |
5.7 |
6.4 |
149613.5 |
19.3KB |
0.0 |
10000 |
0 |
lubridate::ceiling_date(x, “month”) -
1 |
34.2 |
37.8 |
25043.7 |
155.5KB |
27.6 |
9989 |
11 |
edate
`%m+%` <- lubridate::`%m+%`
x <- ymd::ymd(c(200115, 200131, 200229, 200331, 200401))
x <- rep(x, 100)
run_bmk(
ymd::edate(x, 2),
x %m+% months(2)
)
ymd::edate(x, 2) |
12.4 |
13.4 |
70780.5 |
6.2KB |
0.0 |
10000 |
0 |
x %m+% months(2) |
1140.7 |
1219.1 |
801.4 |
496.8KB |
6.1 |
391 |
3 |
run_bmk(
ymd::edate(x, -12),
x %m+% months(-12)
)
ymd::edate(x, -12) |
12.5 |
13.5 |
69090.5 |
3.95KB |
0.0 |
10000 |
0 |
x %m+% months(-12) |
1510.1 |
1674.2 |
589.7 |
310.64KB |
12.7 |
278 |
6 |
# tweak from https://github.com/Rdatatable/data.table/pull/5300
set.seed(373L)
x <- as.Date(data.table::as.IDate(sample(seq(-25000, 45000), 1e6, TRUE)))
run_bmk(
data.table::year(x),
lubridate::year(x),
funchir::quick_year(x),
ymd::year(x)
)
#> Warning: Some expressions had a GC in every iteration; so filtering is
#> disabled.
data.table::year(x) |
4528.2 |
4988.7 |
172.0 |
7.64MB |
40.0 |
86 |
20 |
lubridate::year(x) |
281901.9 |
282685.4 |
3.5 |
57.23MB |
7.1 |
2 |
4 |
funchir::quick_year(x) |
30036.8 |
30385.8 |
27.7 |
26.76MB |
7.9 |
14 |
4 |
ymd::year(x) |
7976.5 |
8543.1 |
113.7 |
3.82MB |
6.0 |
57 |
3 |
run_bmk(
data.table::month(x),
lubridate::month(x),
ymd::month(x)
)
#> Warning: Some expressions had a GC in every iteration; so filtering is
#> disabled.
data.table::month(x) |
21728.8 |
21979.7 |
44.8 |
7.63MB |
3.9 |
23 |
2 |
lubridate::month(x) |
265033.9 |
267228.5 |
3.7 |
95.37MB |
3.7 |
2 |
2 |
ymd::month(x) |
7696.7 |
8770.6 |
111.0 |
3.82MB |
9.9 |
56 |
5 |
run_bmk(
data.table::quarter(x),
lubridate::quarter(x),
ymd::quarter(x)
)
#> Warning: Some expressions had a GC in every iteration; so filtering is
#> disabled.
data.table::quarter(x) |
17607.5 |
17977.1 |
51.1 |
7.63MB |
7.9 |
26 |
4 |
lubridate::quarter(x) |
285546.4 |
289119.8 |
3.5 |
110.66MB |
3.5 |
2 |
2 |
ymd::quarter(x) |
14518.9 |
15361.2 |
64.0 |
3.82MB |
4.0 |
32 |
2 |
run_bmk(
data.table::yday(x),
lubridate::yday(x),
funchir::quick_yday(x),
ymd::yday(x)
)
#> Warning: Some expressions had a GC in every iteration; so filtering is
#> disabled.
data.table::yday(x) |
8542.5 |
8857.7 |
109.3 |
7.63MB |
8.0 |
55 |
4 |
lubridate::yday(x) |
240595.5 |
244088.8 |
3.9 |
57.23MB |
6.5 |
3 |
5 |
funchir::quick_yday(x) |
23482.6 |
24758.5 |
39.7 |
19.08MB |
13.9 |
20 |
7 |
ymd::yday(x) |
8091.3 |
8580.1 |
105.7 |
3.82MB |
8.0 |
53 |
4 |
run_bmk(
data.table::mday(x),
lubridate::mday(x),
funchir::quick_mday(x),
ymd::mday(x)
)
data.table::mday(x) |
21263.0 |
21479.8 |
46.5 |
7.63MB |
4.4 |
21 |
2 |
lubridate::mday(x) |
243894.2 |
243894.2 |
4.1 |
49.59MB |
8.2 |
1 |
2 |
funchir::quick_mday(x) |
9031.9 |
9400.6 |
106.0 |
15.28MB |
16.7 |
38 |
6 |
ymd::mday(x) |
8168.1 |
8903.7 |
112.3 |
3.82MB |
4.2 |
54 |
2 |
run_bmk(
data.table::wday(x),
lubridate::wday(x),
ymd::wday(x)
)
data.table::wday(x) |
2781.9 |
3030.6 |
328.9 |
7.63MB |
29.0 |
136 |
12 |
lubridate::wday(x) |
243859.8 |
243859.8 |
4.1 |
57.22MB |
12.3 |
1 |
3 |
ymd::wday(x) |
9403.2 |
10239.4 |
97.9 |
3.82MB |
6.5 |
45 |
3 |
run_bmk(
data.table::isoweek(x),
lubridate::isoweek(x),
ymd::isoweek(x)
)
#> Warning: Some expressions had a GC in every iteration; so filtering is
#> disabled.
data.table::isoweek(x) |
3606869.8 |
3606869.8 |
0.3 |
259.48MB |
1.1 |
1 |
4 |
lubridate::isoweek(x) |
614492.8 |
614492.8 |
1.6 |
270.87MB |
6.5 |
1 |
4 |
ymd::isoweek(x) |
10148.3 |
11139.3 |
87.7 |
3.82MB |
4.0 |
44 |
2 |
Session Info
xfun::session_info()
#> R version 4.4.1 (2024-06-14)
#> Platform: aarch64-apple-darwin20
#> Running under: macOS Sonoma 14.6
#>
#> Locale: en_US.UTF-8 / en_US.UTF-8 / en_US.UTF-8 / C / en_US.UTF-8 / en_US.UTF-8
#>
#> Package version:
#> base64enc_0.1.3 bench_1.1.3 bslib_0.8.0 cachem_1.1.0
#> cli_3.6.3 compiler_4.4.1 cpp11_0.4.7 data.table_1.15.4
#> digest_0.6.36 evaluate_0.24.0 fansi_1.0.6 fastmap_1.2.0
#> fontawesome_0.5.2 fs_1.6.4 funchir_0.2.2 generics_0.1.3
#> glue_1.7.0 graphics_4.4.1 grDevices_4.4.1 highr_0.11
#> htmltools_0.5.8.1 jquerylib_0.1.4 jsonlite_1.8.8 knitr_1.48
#> lifecycle_1.0.4 lubridate_1.9.3 magrittr_2.0.3 memoise_2.0.1
#> methods_4.4.1 mime_0.12 pillar_1.9.0 pkgconfig_2.0.3
#> profmem_0.6.0 R6_2.5.1 rappdirs_0.3.3 rlang_1.1.4
#> rmarkdown_2.27 sass_0.4.9 stats_4.4.1 tibble_3.2.1
#> timechange_0.3.0 tinytex_0.52 tools_4.4.1 utf8_1.2.4
#> utils_4.4.1 vctrs_0.6.5 xfun_0.46 yaml_2.3.10
#> ymd_0.1.1
These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.