由于现在百度上还不能够搜到相关的算法及包，所以开发了一个函数如下，欢迎直接拿去用，当然如果有更好的算法也欢迎和我交流。workdays<-function(start,end){Author<-"ash_zhang if (start i<-start; j<-0; while (i if (weekdays(i) %in% c("星期六"," // 计算 某个 日期 往后增加n个 工作日 的 日期 public static Date getDate(Date currentDate, int days){ Calendar calendar= Calendar.getInstance(); calendar.setTime(cur... public static void main(String[] args) { int differentDays1 = differentDays2(strToDateLong("2020-1-1"), strToDateLong("2019-12-25")); System.out.print date1 <- as.Date("2021-01-01") date2 <- as.Date("2021-02-01") diff_days <- as.numeric(difftime(date2, date1, units = "days")) 其中，as.Date函数将字符型 日期 转换为 日期 型，difftime函数 计算 两个 日期 之间 的时间差，as.numeric函数将时间差转换为数值型。