# NOT RUN {
string <- c("abc1abc2abc3abc4abc5abc6abc7abc8abc9",
"abc1def2ghi3abc4def5ghi6abc7def8ghi9")
nth_number_after_mth(string, "abc", 1, 3)
nth_number_after_mth(string, "abc", 2, 3)
nth_number_after_first(string, "abc", 2)
nth_number_after_last(string, "abc", -1)
first_number_after_mth(string, "abc", 2)
last_number_after_mth(string, "abc", 1)
first_number_after_first(string, "abc")
first_number_after_last(string, "abc")
last_number_after_first(string, "abc")
last_number_after_last(string, "abc")
# }
Run the code above in your browser using DataLab