Преобразовать Sys.time () в символ без потери часового пояса?

Question

Как мы можем преобразовать вывод Sys.time() в класс символов без потери информации о часовом поясе (в данном случае AEDT)?

Sys.time()
# [1] "2019-10-17 21:54:07 AEDT"

Sys.time() %>% as.character()
# [1] "2019-10-17 21:54:07"

# Desired output
"2019-10-17 21:54:07 AEDT"

Обратите внимание, что я хочу избегать использования каких-либо внешних библиотек (только база R)

Answer 1

Это дает вам символ

x <- format(Sys.time(), usetz = TRUE)
str(x)
# chr "2019-10-17 22:13:45 AEDT"

usetz - это FALSE по умолчанию, установите его на TRUE, чтобы он сохранялся во время преобразования.