R блестящий стол с датами

Я делаю приложение для анализа некоторых данных с помощью Shiny.

Когда я напрямую отправляю запрос в базу данных, я вижу хорошие результаты:

enter image description here

Но когда я пытаюсь привести результаты от этого запроса к блестящему, столбец "not_outlier_date" выглядит иначе:

enter image description here

Я хочу иметь тот же формат даты, что и на первом рисунке.

Я пытался, на столе, получить из базы данных, добавить:

  not_outlier_dates[,2]<-as.Date(as.numeric(as.vector(unlist(not_outlier_dates[,2]))))

Но он не вносит никаких изменений и работает с предупреждением:

 Warning in formatC(x = c(16065, 16137, 16064, 15707, 16063, 15775, 15782 :
 class of 'x' was discarded

Как я могу решить эту проблему формата даты?

Ответ 1

Попробуйте использовать это:

not_outlier_dates[,2] <- as.character(not_outlier_dates[,2])

Проблема заключается в библиотеке xtable, которую Shiny использует для отображения таблиц. Кажется, есть ошибки, связанные с date columns, как указано в этом вопросе fooobar.com/info/286952/..., и это (закрыто) Блестящая проблема. Не уверен, что это применимо или если оно относится к вашей версии xtable.