R 将整数数据转换为年和月

我有这样的整数数据示例

201901, 201912, 202004

如何使用R编程将我的数据转换为年和月。我需要这样的输出：

2019-01, 2019-12, 2020-04

或

---

提前谢谢。

您可以转换为日期，然后使用

格式

：

x <- c(201901, 201912, 202004)

format(as.Date(paste(x, '01'), '%Y%m%d'), '%b-%Y')
#[1] "Jan-2019" "Dec-2019" "Apr-2020"
format(as.Date(paste(x, '01'), '%Y%m%d'), '%Y-%m')
#[1] "2019-01" "2019-12" "2020-04"

zoo::as.yearmon(as.character(x), '%Y%m')

---

使用正则表达式，我们可以捕获4到2个字符，并在它们之间插入一个“-”

sub('(.{4})(.{2})', '\\1-\\2', x)

sub('(.{4})(.{2})', '\\1-\\2', x)