小编TDo*_*Dog的帖子

我有一个数据集:

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

我正在使用tidyr:单独拆分与"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

欢迎任何建议.

我有一个R数据框df,带有列名V1, V2, V3...V1000.我需要df通过选择每个第20列,即V1, V21, V41, V61通过列的结尾来进行子集化.

我认为这可以使用dplyr来完成select(df, num_range("V", val)),但我很难说如何通过1000列迭代val,步进20.

有什么建议？