如何根据连续的天数重复天数1:7以对应周数
How to repeat sequence of days 1:7 based on continuous days to correspond with weeks
我想每周向我的数据集添加一列天数，其中包含大型数据集的连续天数和连续周数
我已经尝试使用 floor 函数和 rep 函数
编辑 我正在尝试自动执行最终输出 mydata$day_of_week
time_in_hrs<-c(0,2,12,24,25,29,30,32,38,43,57,82,93,105,199,205,245,263)
mydata<-as.data.frame(time_in_hrs)
mydata$time_in_days<-floor(mydata$time_in_hrs/24)+1
mydata$time_in_weeks<-floor(mydata$time_in_days/8)+1
mydata$day_of_week<-c(1,1,1,2,2,2,2,2,2,2,3,4,4,5,2,2,4,4)
使用 rep-command 您可以尝试以下操作：
mydata$days <- rep(c("Monday", "Tuesday", "Wednesday", Thursday",
"Friday", "Saturday", "Sunday"), times = 5)
mydata$days <- rep(1:7, times = 5)
希望这对您有所帮助。
最好的，维罗妮卡
假设您正在尝试将您现在手动执行的列 mydata$day_of_week 自动化，您可以按如下方式执行此操作：
mydata$day_of_week_auto <- mydata$time_in_days - (mydata$time_in_weeks - 1) * 7
我想每周向我的数据集添加一列天数，其中包含大型数据集的连续天数和连续周数
我已经尝试使用 floor 函数和 rep 函数
编辑 我正在尝试自动执行最终输出 mydata$day_of_week
time_in_hrs<-c(0,2,12,24,25,29,30,32,38,43,57,82,93,105,199,205,245,263)
mydata<-as.data.frame(time_in_hrs)
mydata$time_in_days<-floor(mydata$time_in_hrs/24)+1
mydata$time_in_weeks<-floor(mydata$time_in_days/8)+1
mydata$day_of_week<-c(1,1,1,2,2,2,2,2,2,2,3,4,4,5,2,2,4,4)
使用 rep-command 您可以尝试以下操作：
mydata$days <- rep(c("Monday", "Tuesday", "Wednesday", Thursday",
"Friday", "Saturday", "Sunday"), times = 5)
mydata$days <- rep(1:7, times = 5)
希望这对您有所帮助。
最好的，维罗妮卡
假设您正在尝试将您现在手动执行的列 mydata$day_of_week 自动化，您可以按如下方式执行此操作：
mydata$day_of_week_auto <- mydata$time_in_days - (mydata$time_in_weeks - 1) * 7