Как перевести юлианскую дату в стандартную дату для разных лет?

Question

У меня есть юлианские даты в течение нескольких лет, я хочу преобразовать их в стандартный формат даты (год-месяц-день). Я пытался с помощью следующего кода

library(epitools)
library(dplyr)

df$new_date <- df %>% 
    group_by(year) %>% 
    mutate(new_date = julian2date(julian_date))

но он получает следующее сообщение:

Error: do not know how to convert 'attributes(x)[[1]]' to class “Date”

Answer 1

Функция julian2date() не нужна. Следующий код преобразует переменную julian_date в стандартный формат даты.

as.Date(julian_date, origin="1970-01-01")