Преобразование даты в год.десятичная форма в R
у меня есть столбец ts, который сохраняет годы в десятичном формате ie
1988.0
1988.25
1988.5
1988.75
и так далее. Мне нужно экспортировать его в .csv-файл с датой в .
Как мне это сделать?
2 ответов
на lubridate
пакет имеет функцию, date_decimal
что можно использовать для этого.
x <- c(1988.0, 1988.25, 1988.5, 1988.75)
library(lubridate)
(f <- format(date_decimal(x), "%d-%m-%Y"))
# [1] "01-01-1988" "01-04-1988" "02-07-1988" "01-10-1988"
тогда вы можете написать его в csv с
write.csv(f, "afilename.csv") ## or write.table()
вы, вероятно, захотите сначала проверить вывод и настроить некоторые аргументы в любом формате, который вы хотите.
бороться с теми, год дроби,
> date_string <- '1988.99'
> date_num <- as.numeric(date_string)
> year <- floor(date_num)
> year_beginning <- as.POSIXct(paste0(year, '-01-01'))
> year_end <- as.POSIXct(paste0(year+1, '-01-01'))
> date <- year_beginning + (date_num %% 1) * (year_end - year_beginning)
> format(date, format='%Y-%m-%d')
[1] "1988-12-28"
для написания csv, попробуйте help(write.table)