r - 将日期时间列拆分为日期和时间变量

Question

我有一个格式为“Y-m-d H:M:S”的“日期时间列”“开始”。我想将此列拆分为“日期”和“时间”列。
我尝试了以下方法:

df$Date <- sapply(strsplit(as.character(df$Start), " "), "[", 1)
df$Time <- sapply(strsplit(as.character(df$Start), " "), "[", 2)

但是，如果我使用函数 str(df)，这是有效的

# 'data.frame':   18363 obs. of  19 variables:<br>
#  $ Start    : Factor w/ 67 levels "2013-09-01 08:07:41.000",..: 1 1 1 1 1 1 1 1 1 1 ...
# [snip]

所以现在我只需要知道如何从 factor 转换时间和日期。到“时间”和“日期”。

Answer 1

怎么样

df$Date <- as.Date(df$Start)

df$Time <- format(df$Start,"%H:%M:%S")