如何为子字符串的开头指定动态位置？

Question

如示例中所示,我正在尝试substring使用data.frame(video_data_2)中的Video_full列.我希望在这段时间之后保留所有角色.期间始终存在,只有一个期间,并且该列的每个值处于不同的位置.

     Date                     Video_full      Instances   
1 Apr 1, 2010  installs/AA.intro_video_1      546         
2 Apr 1, 2010  installs/ABAC.intro_video_2    548      

我有子串工作:

video_data_2$Video_full <- substring(video_data_2$Video_full,11)

而且strsplit:

strsplit("installs/AA.intro_video_1 ",'[.]')

我只是无法弄清楚如何substring在动态位置启动或仅保留返回的第二个值strsplit.

感谢您为简单问题提供的任何帮助.

Answer 1

你可以使用sub()

video_data_2$Video_full <- sub("^.*\\.","", video_data_2$Video_full)

Answer 2

另一种使用方式 strsplit

sapply(strsplit(video_data_2$Video_full, "\\."), "[", 2)

这是简写

sapply(strsplit(video_data_2$Video_full, "\\."), function(x) x[2])

Answer 3

尝试 stringr

library(stringr)
str_split_fixed(video_data_2$Video_full, "\\.", n = 2)[, 2]