These are year-week-day methods for the setter generics.
set_year()
sets the year.set_week()
sets the week of the year. Valid values are in the range of[1, 53]
.set_day()
sets the day of the week. Valid values are in the range of[1, 7]
.There are sub-daily setters for setting more precise components.
Usage
# S3 method for class 'clock_year_week_day'
set_year(x, value, ...)
# S3 method for class 'clock_year_week_day'
set_week(x, value, ...)
# S3 method for class 'clock_year_week_day'
set_day(x, value, ...)
# S3 method for class 'clock_year_week_day'
set_hour(x, value, ...)
# S3 method for class 'clock_year_week_day'
set_minute(x, value, ...)
# S3 method for class 'clock_year_week_day'
set_second(x, value, ...)
# S3 method for class 'clock_year_week_day'
set_millisecond(x, value, ...)
# S3 method for class 'clock_year_week_day'
set_microsecond(x, value, ...)
# S3 method for class 'clock_year_week_day'
set_nanosecond(x, value, ...)
Arguments
- x
[clock_year_week_day]
A year-week-day vector.
- value
[integer / "last"]
The value to set the component to.
For
set_week()
, this can also be"last"
to adjust to the last week of the current year.- ...
These dots are for future extensions and must be empty.
Examples
# Year precision vector
x <- year_week_day(2019:2023)
# Promote to week precision by setting the week
# (Note that some weeks have 52 weeks, and others have 53)
x <- set_week(x, "last")
x
#> <year_week_day<Sunday><week>[5]>
#> [1] "2019-W52" "2020-W53" "2021-W52" "2022-W52" "2023-W52"
# Set to an invalid week
invalid <- set_week(x, 53)
invalid
#> <year_week_day<Sunday><week>[5]>
#> [1] "2019-W53" "2020-W53" "2021-W53" "2022-W53" "2023-W53"
# Here are the invalid ones (they only have 52 weeks)
invalid[invalid_detect(invalid)]
#> <year_week_day<Sunday><week>[4]>
#> [1] "2019-W53" "2021-W53" "2022-W53" "2023-W53"
# Resolve the invalid dates by choosing the previous/next valid moment
invalid_resolve(invalid, invalid = "previous")
#> <year_week_day<Sunday><week>[5]>
#> [1] "2019-W52" "2020-W53" "2021-W52" "2022-W52" "2023-W52"
invalid_resolve(invalid, invalid = "next")
#> <year_week_day<Sunday><week>[5]>
#> [1] "2020-W01" "2020-W53" "2022-W01" "2023-W01" "2024-W01"