【发布时间】:2020-07-30 06:06:54
【问题描述】:
我正在尝试拆分包含日期和时间的列以分隔时间、日、月、年、星期几、小时和分钟列。我可以拆分列,但唯一的问题是 AM 和 PM 时间没有分开,并且唯一显示的时间是 1 - 12,而不是拆分 AM 和 PM 小时,即使原始数据集使用 24 小时时间。我想知道是否有人知道这样做的方法?
我用来拆分列的代码是:
taxijuly$Trip.Start.Timestamp <- as.POSIXct(taxijuly$Trip.Start.Timestamp, format = "%m/%d/%Y %H:%M:%S")
taxijuly$Time <- format(as.POSIXct(taxijuly$Trip.Start.Timestamp, format = "%m/%d/%Y %H:%M:%S"), format="%H:%M:%S")
taxijuly$Trip.Start.Timestamp <- ymd_hms(taxijuly$Trip.Start.Timestamp)
taxijuly$day <- factor(day(taxijuly$Trip.Start.Timestamp))
taxijuly$month <- factor(month(taxijuly$Trip.Start.Timestamp, label = TRUE))
taxijuly$year <- factor(year(taxijuly$Trip.Start.Timestamp))
taxijuly$dayofweek <- factor(wday(taxijuly$Trip.Start.Timestamp, label = TRUE))
taxijuly$hour <- factor(hour(hms(taxijuly$Time)))
taxijuly$minute <- factor(minute(hms(taxijuly$Time)))
taxijuly$second <- factor(second(hms(taxijuly$Time)))
我尝试拆分的列中的数据如下所示:
Trip Start Timestamp
09/03/2019 00:00
09/03/2019 00:00
09/03/2019 00:00
09/03/2019 00:00
任何帮助将不胜感激。
【问题讨论】: