'；x'；在R中使用cut（）函数将时间间隔转换为字符串标签时，必须是数字错误

我有一列'Incident_Time'，表示R中数据帧中的时间

当我在列上调用str（）函数时，它会这样说

str（犯罪数据$事件时间）

系数w/1439等级“00:01:00”、“00:02:00”、..：840 945 1140 981 1260 969 1020 840 980 765

我想将此列转换为字符串类型，这样，如果时间小于12:00:00，则应将其修改为字符串“morning”，如果时间介于12:00:00和6:00:00之间，则为“daylight”，以此类推

我键入了以下命令：

    time.tag <- chron(times=c("00:00:00", "06:00:00", "12:00:00", "18:00:00", "23:59:59"))

    labels <- c("Early Morning", "Morning", "Evening", "Night")

    crime_data$Incident_Time_Range <- cut(crime_data$Incident_Time, breaks = time.tag, labels, include.lowest = TRUE )

---

time.tag未经验证，因为没有样本数据，但不应将事件时间作为因素。转换为时间：

crime_data$Incident_Time <- chron(times=as.character(crime_data$Incident_Time))

crime\u data$Incident\u Time提供完整的示例

示例数据

sampletime<-chron(times=as.character(as.ITime(Sys.time()+sample(86400,100))))

你能给我们一个数据集的样本吗？<代码> dPUTE（）/代码>这里是摘要：这里是所有脚本：它是来自旧金山犯罪>代码> Database.Database>表> <代码> AS。
cut(sampletime, breaks = time.tag, labels, include.lowest = TRUE )

[1] Early Morning Evening       Evening       Evening      
  [5] Morning       Night         Evening       Night        
  [9] Night         Morning       Early Morning Early Morning
 [13] Evening       Early Morning Morning       Early Morning
 [17] Evening       Morning       Early Morning Evening      
....