Вы можете сделать это с strsplit
.
Y <- do.call(rbind, strsplit(X$Datime, " "))
Y <- as.data.frame(Y, stringsAsFactors = FALSE)
names(Y) <- c("Date", "time")
Обратите внимание, что столбец Datime
должен иметь класс character
, чтобы вышеуказанный код работал.Часто символьные векторы имеют класс factor
, когда они являются столбцом data.frame.Если дело обстоит с вашими данными, используйте вместо этого
strsplit(as.character(X$Datime), " ")
Данные.
Datime <- scan(what = character(), text = "
11/7/2016 11:51
11/7/2016 17:57
12/7/2016 9:17
12/7/2016 21:08
13-07-2016 08:33:16
13-07-2016 21:57:28
14-07-2016 06:15:32
15-07-2016 05:11:52
15-07-2016 17:57:27
11/7/2016 6:46
12/7/2016 5:08
12/7/2016 12:30
13-07-2016 04:49:20
", sep = "\n")
X <- data.frame(Datime, stringsAsFactors = FALSE)