Условно меняющийся формат даты списка в R

Question

Я работаю со списком длиной 20. И у меня есть листы (список) с различными форматами, например:

List.1 # В данном случае с правильным форматом

Id  DATE
1   2019/02/01
2   2019/02/04
3   2019/02/04

List.2 # с неправильным форматом

Id  DATE
4   42586
5   42587
6   45590

Я хотел бы исправить формат list.2 как формат list.1

Я пробовал это:

for(i in 1:20) {
DF[[i]]$DATA=as.Date.numeric(as.numeric(as.character(DF[[i]]$DATA)),origin = "1899-12-30")
}

Итак, не сработало, моя функция не выбирала листы с проблемой, но все они.

Answer 1

(с использованием lubridate) Если вы точно знаете исходную контрольную дату, я бы:

• Определил, является ли значение числовым
• Если это так, уменьшите количество дней с 1899От -12-30 до 1970-01-01 (lubridate по умолчанию для запуска)
• Используйте функцию lubridate as_date, чтобы прочитать вывод выше