我在字符下面有日期列（來自 ENTSO-E 平臺）。我想轉換為日期并提取此間隔的結束部分（[1]“01.01.2021 00:00 - 01.01.2021 01:00 ”）。我收到錯誤“明確格式的字串”。任何建議如何將字符格式的間隔的第二部分提取到 R 中的 Date 變數中？
head(date)
- “01.01.2021 00:00 - 01.01.2021 01:00”
- “01.01.2021 01:00 - 01.01.2021 02:00”
- “01.01.2021 02:00 - 01.01.2021 03:00”
- “01.01.2021 03:00 - 01.01.2021 04:00”
- “01.01.2021 04:00 - 01.01.2021 05:00”
- “01.01.2021 05:00 - 01.01.2021 06:00”
Error in as.POSIXlt.character(x, tz, ...) : character string is not in a standard unambiguous format
uj5u.com熱心網友回復：
as.POSIXct(gsub("^.* - (.*)", "\\1", x), format = "%d.%m.%Y %H:%M")
# [1] "2021-01-01 01:00:00 CET" "2021-01-01 02:00:00 CET" "2021-01-01 03:00:00 CET" "2021-01-01 04:00:00 CET"
# [5] "2021-01-01 05:00:00 CET"
樣本資料
x <- c("01.01.2021 00:00 - 01.01.2021 01:00",
"01.01.2021 01:00 - 01.01.2021 02:00",
"01.01.2021 02:00 - 01.01.2021 03:00",
"01.01.2021 03:00 - 01.01.2021 04:00",
"01.01.2021 04:00 - 01.01.2021 05:00")
uj5u.com熱心網友回復：
這里tidyverse結合lubridatesdmy_hm函式：
library(lubridate)
library(dplyr)
library(tidyr)
df %>%
separate(date, c("a", "date"), " - ") %>%
mutate(date = dmy_hm(date), .keep="used")
date
<dttm>
1 2021-01-01 01:00:00
2 2021-01-01 02:00:00
3 2021-01-01 03:00:00
4 2021-01-01 04:00:00
5 2021-01-01 05:00:00
6 2021-01-01 06:00:00
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/461655.html