Change the time zone, and restore it afterwards.
Usage
with_timezone(tz, code)
local_timezone(tz, .local_envir = parent.frame())
Arguments
- tz
[character(1)]
a valid time zone specification, note that time zone names might be platform dependent.- code
[any]
Code to execute in the temporary environment- .local_envir
The environment to apply the change to.
Details
with_timezone()
runs the code with the specified time zone and
resets it afterwards.
local_timezone()
changes the time zone for the caller
execution environment.
See also
withr
for examples
Examples
Sys.time()
#> [1] "2024-01-16 14:48:42 UTC"
with_timezone("Europe/Paris", print(Sys.time()))
#> [1] "2024-01-16 15:48:42 CET"
with_timezone("America/Los_Angeles", print(Sys.time()))
#> [1] "2024-01-16 06:48:42 PST"
fun1 <- function() {
local_timezone("CET")
print(Sys.time())
}
fun2 <- function() {
local_timezone("America/Los_Angeles")
print(Sys.time())
}
Sys.time()
#> [1] "2024-01-16 14:48:42 UTC"
fun1()
#> [1] "2024-01-16 15:48:42 CET"
fun2()
#> [1] "2024-01-16 06:48:43 PST"
Sys.time()
#> [1] "2024-01-16 14:48:43 UTC"