用于查找有异常的日期差异的R函数？

我想知道是否有一个函数用于查找和发行日期与到期日期之间的差异，但到期日期为2。例如，我想对到期日来源1中的日期进行优先级排序，并从发行日期中减去它以找出差异。然后，如果我的数据集缺少来自到期日源1的日期，例如在第5行和第6行中，我希望使用来自到期日源2的日期来填充其余的数据。我尝试了下面的代码，但不确定如何在不改变其他一切的情况下合并来自成熟日期源2的数据。我附上一张照片供参考。先谢谢你

    df$Maturity_Date_source_1 <- as.Date(c(df$Maturity_Date_source_1))
df$Issue_Date <- as.Date(c(df$Issue_Date))
df$difference <- (df$Maturity_Date_source_1 - df$Issue_Date) / 365.25
df$difference <- as.numeric(c(df$difference))

---

df$Maturity\u Date\u source\u 1一个选项是
合并列，然后进行差异处理

library(dplyr)
df %>%
   mutate(difference = as.numeric((coalesce(Maturity_Date_source_1, 
                    Maturity_Date_source_2) - Issue_Date)/365.25))