dateFormat в функции as.xts

Question

Я хочу преобразовать набор данных "co2", который входит в R, в CSV. Мой код следующий:

require(xts)
require(zoo)
co2_xts <- as.xts(co2)
write.zoo(co2_xts, file="demo.csv",sep=",")

Это отлично работает. Но временной индекс показывает, например, как «ен. 1959» (на испанском). Я бы хотел, чтобы индекс принимал формат "% B% Y", если это возможно. Если я использую:

co2_xts <- as.xts(co2,dateFormat="%B %Y")

Это выдает ошибку:

Error in `as.%B %Y`(c(1959, 1959.08333333334, 1959.16666666668, 1959.25000000002,  : 
could not find function "as.%B %Y"

Так как я могу достичь того, что я хочу?

Answer 1

Задумывались ли вы о пакете timetk и сохранении тиббла?

require(timetk)
co2_tbl <- tk_tbl(co2, start = start(co2), freq = 12)

Затем используйте более общий метод write.csv или один из более быстрых методов, например, fread :: write_csv, если длинный файл:

write.csv(co2_tbl, file="demo.csv", row.names=FALSE)

Answer 2

Вы можете настроить формат индекса после создания xts с помощью функции indexFormat.

В этом случае:

indexFormat(co2_xts) <- "%B %Y" 

Обратите внимание, что это только меняет формат отображения.