如何在 R 中将"year.month"格式更改为"Year-Month"格式

Question

我有一个数据帧，看起来像这样:

Month           GSI
1993.01     -0.57567056
1993.02     -1.15549239
1993.03     -1.00353071
1993.04     -0.10698880
1993.05     -0.31903591
1993.06      0.30361638
1993.07      1.24528915
1993.08      0.85104370
1993.09      1.24680092
1993.10      1.42521406

可以看到，"Month"列的格式为"年。月"。我想将此列重新格式化为传统的"%Y-% "格式，使数据帧看起来更像这样:

Date          GSI
1993-01     -0.57567056
1993-02     -1.15549239
1993-03     -1.00353071
1993-04     -0.10698880
1993-05     -0.31903591
1993-06      0.30361638
1993-07      1.24528915
1993-08      0.85104370
1993-09      1.24680092
1993-10      1.42521406

如何更改此列的格式以使其可识别为日期列?目前，班的"月"班;

Answer 1

您可以使用sub，在正则表达式中捕获组:

df$Month <- sub("^(\d{4})\.(\d{2})$", "\1-\2", format(df$Month, 2))
df
#>      Month        GSI
#> 1  1993-01 -0.5756706
#> 2  1993-02 -1.1554924
#> 3  1993-03 -1.0035307
#> 4  1993-04 -0.1069888
#> 5  1993-05 -0.3190359
#> 6  1993-06  0.3036164
#> 7  1993-07  1.2452892
#> 8  1993-08  0.8510437
#> 9  1993-09  1.2468009
#> 10 1993-10  1.4252141

---

输入数据

df <- structure(list(Month = c(1993.01, 1993.02, 1993.03, 1993.04, 
1993.05, 1993.06, 1993.07, 1993.08, 1993.09, 1993.1), GSI = c(-0.57567056, 
-1.15549239, -1.00353071, -0.1069888, -0.31903591, 0.30361638, 
1.24528915, 0.8510437, 1.24680092, 1.42521406)), class = "data.frame", row.names = c(NA, 
-10L))
df
#>      Month        GSI
#> 1  1993.01 -0.5756706
#> 2  1993.02 -1.1554924
#> 3  1993.03 -1.0035307
#> 4  1993.04 -0.1069888
#> 5  1993.05 -0.3190359
#> 6  1993.06  0.3036164
#> 7  1993.07  1.2452892
#> 8  1993.08  0.8510437
#> 9  1993.09  1.2468009
#> 10 1993.10  1.4252141

Answer 2

使用lubridate包

library(dplyr)
library(lubridate)
df <- mutate(df, date = ym(Month))
# if you don't know dplyr, use:
df$date <- ym(df$Month)

注意，此解决方案还将结果强制转换为POSIXct(日期)格式的变量。Transmute修改和删除月份变量。

lubridate是在r中处理日期(和时间)数据的黄金标准包。