try({
## extract substrings based on regular expressions
string_01 <- "I can't wait to watch the Late Night Show with"
string_01 <- paste(string_01, "Seth Meyers tonight at 11:30pm CT!")
print(string_01)
custom_grep(xml_data = string_01, tag = "strong", format = "char")
custom_grep(xml_data = string_01, tag = "strong", format = "list")
}, silent = TRUE)
Run the code above in your browser using DataLab