不使用分隔符分隔列

Question

我有一个数据集，其中有一列由一个代码和一个数字组成，我试图将该列分开以获取代码。

df <- data.frame(code=rep(c('2d01', '2m04', '3C06', 'CrD05'), each=10),
                 pos=rep(c(3, 7,2,4), times=20))
df<-extract(df,code,into = c("code","number"),
            "(.{2})(.{2})")

我试过了，但我的代码字符数 (CrD05) 不同，所以它不起作用。有没有办法将最后两个数字分开并保留其余数字？

Answer 1

使用 gsub 提取最后两个字符

df$code2 = gsub("\d{2}$", "", df$code)

不使用分隔符分隔列

Separate a column without separators

r

columnsorting