R中使用if条件的日期格式错误？

如何解决R中使用if条件的日期格式错误？

我的dt1看起来像

pateint_id  NAME    col1    col2    col3
 1001        aa       33    41       51
 1002        bb       34    42       52
 1003        cc       35    43       53
 1004        dd       36    44       54
 1005        ee       37    45       55
 1006        gg       38    46       56
 1007        ff       39    47       57
 1008        hh       40    48       58
 1009        kk       41    49       59
 1010        ll       42    50       60

我的dt2有record_date

pateint_id       NAME   Record_date
1001              aa    10-02-2004
1002              bb    25-09-2008
1005              ee    13-06-2005
1006              gg    15-07-2006

class(dt2$Record_date) POSIXct" "POSIXt

我想同时匹配患者ID和从dt2数据集中获取记录日期

为此，我使用if条件但导致日期格式错误

dt1$fdate <- ifelse(dt1$patient_id %in% dt2$patient_id,dt2$Record_date,NA)

输出：

pateint_id      NAME    Record_date
1001             aa     38027
1002             bb     39716
1005             ee     38516
1006             gg     38913

预期输出：

pateint_id  NAME    Record_date
1001         aa     10-02-2004
1002         bb     25-09-2008
1005         ee     13-06-2005
1006         gg     15-07-2006

提前谢谢...