如何在一列中拆分日期

Question

我想从DATE_H_REAL 中拆分日期，并且我的列中只有日期

DATE_H_REAL             DATE_H_REAL
02/02/2016 16:17        02/02/2016

我试过了，但没有用：

dataset1$DATE_H_REAL <- strptime(dataset1$DATE_H_REAL, format="%d/%m/%Y")
dataset1$DATE_H_REAL <- as.POSIXct(dataset1$DATE_H_REAL)

Answer 1

如果您想转换为Date 类，您可以使用as.Date() 并精确输入格式：

dataset1$DATE_H_REAL=as.Date(dataset1$DATE_H_REAL,format="%d/%m/%Y")

这会返回一个日期：

[1] "2016-02-02"

如果您的输入列没有固定格式，您可以先提取日期，然后再将其转换为Date 类：

dataset1$DATE_H_REAL=gsub(".*(\\d{2}/\\d{2}/\\d{4}).*","\\1",dataset1$DATE_H_REAL)
dataset1$DATE_H_REAL=as.Date(dataset1$DATE_H_REAL,format="%d/%m/%Y");