# NOT RUN {
path <- "this/is/my/fileofinterest.csv"
str_start(path, "/")
path <- "this//is//my//fileofinterest.csv"
str_start(path, "//")
str_end(path, "//")
x <- c("my_friend_likes me", "your_friend likes_you")
str_start(x, "_")
# }
Run the code above in your browser using DataLab