如何让合适的工作日出现？

Question

我输入了以下代码：

exdata1$DateTime <- strptime(paste(exdata1$Date, exdata1$Time), format="%d/%m/%Y %H:%M:%S") 

library(lubridate)
summary(wday(exdata1$DateTime, label=TRUE))

它给了我

 Sun  Mon  Tue  Wed  Thu  Fri  Sat NA's 
   0    0    0    0    0    0    0 2880

但周四和周五应该给我 1440。

如何改进？

Answer 1

你的格式有误。在基础 R 中，您可以尝试：

exdata1$DateTime <- strptime(paste(exdata1$Date, exdata1$Time), 
                             format="%Y-%m-%d %H:%M:%S")

也可以用as.POSIXct代替strptime然后用weekdays函数

weekdays(exdata1$DateTime)

有了lubridate，你可以做到

library(lubridate)

exdata1$DateTime <- ymd_hms(paste(exdata1$Date, exdata1$Time))
wday(exdata1$DateTime, label = TRUE)

如何让合适的工作日出现？

How to get the appropriate weekdays to show up?

r

date

strptime