# NOT RUN {
string <- "ab..cd..de..fg..h"
str_after_nth(string, "\\.\\.", 3)
str_before_nth(string, "e", 1)
str_before_nth(string, "\\.", -3)
str_before_nth(string, ".", -3)
str_before_nth(rep(string, 2), fixed("."), -3)
# }
Run the code above in your browser using DataCamp Workspace