[英]how to obtain days between two dates in R
我有如下數據集:
money date1 date2
"300" "10/30 " " 11/1"
"400" "10/28 " " 10/31"
"360" "10/28 " " 10/30"
"440" "10/25 " " 10/28"
"620" "10/21 " " 10/28"
我想提取第一行的兩個日期之間的日期,例如10 / 30、10 / 31和11/1。 另外,我的代碼應為每個提取日分配一個數字。 此數字應為貨幣/(天數)。 作為示例,我想分別獲得10 / 30、10 / 31、11 / 1和300/3(即= 100),300 / 3,300 / 3。 有人對此有任何想法嗎?
這將給出該時段內每天的總計
data$date1<-as.Date(paste(data$date1,"/2012"), "%m/%d/%Y")
data$date2<-as.Date(paste(data$date2,"/2012"), "%m/%d/%Y")
data$perday<-with(data, money/(date2-date1))
period <- as.Date(min(data$date1):max(data$date2), origin = "1970-01-01")
sum <- sapply(period, function(x) sum(data[x >= data$date1 & x <= data$date2, 'perday']))
sumperday<-as.data.frame(period, sum)
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.