r - Gather 将我的日期变成 R 中无法识别的格式

Question

我正在尝试收集几列日期，以便更容易选择闪亮的。但是，当我收集日期时，它会变成例如 2020/12/14 到 128284 格式。我试过 as.Date，as.character，我试过 lubridating 但它不起作用。（除了闪亮之外，我一直在收集一个单独的脚本）。收集时请看我的代码。

这是我的数据

聚集前

df<-df%>%gather(key="date.type", value="dates",
                     date.1, date.2, date.3, date.4)

这使它变成这样的东西； 聚集后

当我试图在 Shiny 中找到两个日期之间的差异时，这成为一个问题（我一直在使用 difftime）。

我在闪亮时遇到的错误是：

x character string is not in a standard unambiguous format

我也在考虑根本不收集，而是允许用户在 UI 中选择从日期列和到日期列，但我不知道如何找到服务器中从日期和到日期之间的天数差异.

mutate(theduration=difftime(input$to,input$from,units="days")

这行不通。

感谢任何帮助。