Save link tweet in new column in R

library(stringr)

url_pattern <- "http[s]?://(?:[a-zA-Z]|[0-9]|[$-_@.&+]|[!*\\(\\),]|(?:%[0-9a-fA-F][0-9a-fA-F]))+"

data$ContentURL <- str_extract(data$Content, url_pattern)

data

##                                            Content       date              ContentURL
## 1               a house a home https://www.foo.com 12/31/2013     https://www.foo.com
## 2 cabin ideas https://www.example.com in the woods   5/4/2013 https://www.example.com
## 3                                 motel is a hotel   1/4/2013                    <NA>

Source: stackoverflow.com

Similar codes

0 vote348 views1 answer
Attr(* label )= chr in r
R
2 votes379 views1 answer
Drop columns by index r
R
2 votes416 views3 answers
How to use recursion in r
R
0 vote396 views1 answer
Generate pair in r
R
1 vote357 views1 answer
R pipe
R
0 vote368 views1 answer
How to read multiple csv files from a directory in r
R
0 vote387 views1 answer
R remove insignificant coefficient in output
R
1 vote415 views1 answer
Glyph in r
R
0 vote367 views1 answer
Get matrix row name r
R
0 vote380 views1 answer
Order barplot ggplot2 by value
R