r - 如何正确拆分字符值

Question

我有一个包含一些复合信息的数据框。我想将向量 a 拆分为向量“a”和“d”，其中“a”仅对应于数字 ID 898、3467、234、222，而向量“d”包含相应的字符值。

数据:

a<-c("898_Me","3467_You or ", "234_Hi-hi", "222_what")
b<-c(1,8,3,8)
c<-c(2,4,6,2)
df<-data.frame(a,b,c)

到目前为止我尝试了什么:

a<-str(df$a)

a<-strsplit(df$a, split)

但这对我的正则表达式技能来说是行不通的。

所需的输出表可能具有以下形式:

                       a    d        b   c
                      898   Me       1   2
                      3467  You or   8   3
                      234   Hi-hi    3   6
                      222   what     8   2   

Answer 1

library(tidyr)

a<-c("898_Me","3467_You or ", "234_Hi-hi", "222_what")

b<-c(1,8,3,8)

c<-c(2,4,6,2)

df <-data.frame(a,b,c)

final_df <- separate(df , a , c("a" , "d") , sep = "_")

#    a       d b c
#1  898      Me 1 2
#2 3467 You or  8 4
#3  234   Hi-hi 3 6
#4  222    what 8 2

final_df$d

# [1] "Me"      "You or " "Hi-hi"   "what"