在R中拆分数字向量

Question

我的数据集中的日期是以月日格式编写的。例如：5月12日写为512.我想将其拆分为月份日期。

x <- 512

我想：

x <- 5-12

Answer 1

对于它仍然值得的东西，可以使用gsub

ss <- c(512, 503, 121, 1212);
gsub("^(\\d+)(\\d{2})$", "\\1-\\2", as.character(ss))
#[1] "5-12"  "5-03"  "1-21"  "12-12"

或转换为Date

as.Date(gsub("^(\\d+)(\\d{2})$", "\\1-\\2", as.character(ss)), format = "%m-%d")
#[1] "2018-05-12" "2018-05-03" "2018-01-21" "2018-12-12"

Answer 2

以下是equipment.type的另一个不使用捕获组的变体：

sub

Demo