R - Блестящий не позволит мне конвертировать серийные даты

Question

У меня есть фрейм данных в Shiny, который имеет отдельные столбцы для месяца и года. Я пытался превратить это в объект даты.

yearData=2013
monthData=1
dateData = ymd(paste(yearData, monthData, "01", sep="-")

Возвращает правильный объект даты, если я запускаю его в консоли R (01-01-2013), но когда я запускаю тот же код в Shiny, он по какой-то причине преобразует его в серийную дату (15706). Я пытался решить эту проблему:

#This converts the serial date to a character string in the date format, 
#"2013/01/01"
dateData2 = format(as.Date(dateData, origin = "1970-01-01"), "%Y/%m/%d") 

#This then converts it back to a proper date object
dateData3 = as.Date(dateData2)

Опять же, если я попробую это в консоли R, у меня не возникнет проблем с преобразованием серийной даты в объект даты. Однако когда я запускаю его в Shiny, он снова преобразует dateData3 обратно в последовательную дату.

Вот скриншот того, что возвращает Shiny, когда я запускаю тот же код

Есть ли у кого-нибудь какие-либо предложения по поводу других методов, которые я мог бы попытаться преобразовать в Shiny в последовательную дату?

Answer 1

Звучит так, как будто объект даты конвертируется при визуализации таблицы.

dateData4 <- as.character(dateData3)

Это то, что я делаю, прежде чем рендерить таблицу или записать ее в CSV.