r - 如何在 R 中使用 tidyr::separate 拆分字符串并保留分隔符字符串的值？

Question

我有一个数据集:

crimes<-data.frame(x=c("Smith", "Jones"), charges=c("murder, first degree-G, manslaughter-NG", "assault-NG, larceny, second degree-G"))

我正在使用 tidyr:separate 拆分与“G”匹配的费用列，

crimes<-separate(crimes, charges, into=c("v1","v2"), sep="G,")

这会拆分我的列，但会删除分隔符“G,”。我想在结果列拆分中保留“G”。

我想要的输出是:

 x         v1                       v2
 Smith     murder, first degree-G   manslaughter-NG
 Jones     assault-NG               larceny, second degree-G

欢迎任何建议。

Answer 1

更新

这就是你所要求的。请记住，您的数据并不整洁(V1 和 V2 的每一列内都有多个变量)

A<-separate(crimes,charges,into=c("V1","V2"),sep = "(?<=G,)")
A
      x                      V1                        V2
1 Smith murder, first degree-G,           manslaughter-NG
2 Jones             assault-NG,  larceny, second degree-G

保留“G”或“NG”的更简单方法是使用 sep=", "正如阿利斯泰尔所说。

A<-separate(crimes, charges, into=c("v1","v2"), sep = ', ')

这给

      x         v1              v2
1 Smith   murder-G manslaughter-NG
2 Jones assault-NG       larceny-G

如果您想继续分离 data.frame(使用 -)

separate(A, v1, into = c("v3","v4"), sep = "-")

那给

      x      v3 v4              v2
1 Smith  murder  G manslaughter-NG
2 Jones assault NG       larceny-G

您需要为 v2 列再次执行此操作。我不知道您是否想继续分开，请发布您的预期输出以使我的回答更具体。