Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/date/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
要使用R将日期和时间合并到列中吗_R_Date_Dataframe_Time Series_Arima - Fatal编程技术网

要使用R将日期和时间合并到列中吗

要使用R将日期和时间合并到列中吗,r,date,dataframe,time-series,arima,R,Date,Dataframe,Time Series,Arima,我有以下数据帧 Date Time 10/03/2014 12.00.00 11/03/2014 13.00.00 12/03/2014 14.00.00 我想创建一个列,如下所示 DT 10/03/2014 12.00.00 11/03/2014 13.00.00 12/03/2014 14.00.00 当我跑的时候 data$DT <- as.POSIXct(paste(x$Date, x$Time), format="

我有以下数据帧

 Date             Time
10/03/2014       12.00.00
11/03/2014       13.00.00
12/03/2014       14.00.00
我想创建一个列,如下所示

DT
10/03/2014 12.00.00
11/03/2014 13.00.00
12/03/2014 14.00.00
当我跑的时候

data$DT <- as.POSIXct(paste(x$Date, x$Time), format="%d-%m-%Y %H:%M:%S")

data$DT
data$DT使用包装
lubridate

data$DT <- with(data, ymd(Date) + hms(Time))

这应该是一个非常常见的问题,因此有助于使用dplyr获得可复制的答案:

##可复制示例
图书馆(dplyr)
图书馆(magrittr)
DF%
变异(跨('DateTime',~as.POSIXct(.x,format=“%d/%m/%Y%H.%m.%S”))

将格式从“%d-%m-%Y%H:%m:%S”更改为“%d/%m/%Y%H.%m.%S”,谢谢。它起作用了
data$Time <- gsub('\\.',':',data$Time)
data$Date <- gsub('/','-',data$Date)

data$DT <- as.POSIXct(as.character(paste(data$Date, data$Time)), format="%d-%m-%Y %H:%M:%S")
data$DT <- with(data, ymd(Date) + hms(Time))
data$DT <- as.POSIXct(data$DT)
## reproducible example
library(dplyr)
library(magrittr)
DF <- data.frame(Date = c("10/03/2014", "11/03/2014", "12/03/2014"),
                 Time = c("12.00.00", "13.00.00", "14.00.00"))

DF_DT <- DF %>% 
  mutate(DateTime = paste(Date, Time)) %>% 
  mutate(across('DateTime', ~ as.POSIXct(.x, format = "%d/%m/%Y %H.%M.%S")))