将r中的单个列拆分为4个单独的列

Question

我需要将单个数据框列（ID）分为五个单独的列（A，B，C，D，E）。 这些列需要按以下方式拆分：

• A-第一个字母
• B-所有数字，直到第二个字母
• C-所有字母，直到最后一个字母
• D-最后一个号码
• E-最后一个字母

这里是一个例子：

之前

ID Conc
1 A01HGF1a  132
2 D02SDV2b  453

后

A B C D E Conc
1 A 01 HGF 1 a  132
2 D 02 SDV 2 b  453

我尝试使用tidyr的split（），但无法弄清楚如何正确使用正则表达式。 任何帮助深表感谢！

到目前为止，这是我尝试过的

`separate(df, ID, into = c("A", "B", "C", "D","E"), sep = "(^.)(\\d+)(\\S+)(\\d+)(\\S+)")`

Answer 1

您可以在此处将sub用于基本R选项：

df$A <- sub("^(\\w).*", "\\1", df$ID)
df$B <- sub("^\\w(\\d+).*", "\\1", df$ID)
df$C <- sub("^\\w\\d+(\\D+).*", "\\1", df$ID)
df$D <- sub(".*?(\\d+)\\D+$", "\\1", df$ID)
df$E <- sub(".*?(\\D+)$", "\\1", df$ID)
df

        ID Conc A  B   C D E
1 A01HGF1a  132 A 01 HGF 1 a
2 D02SDV2b  453 D 02 SDV 2 b

演示版