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 vote311 views1 answer
Print string without quotes and escape sequence r
R
0 vote268 views1 answer
Convert all numeric columns to percentages R
R
0 vote339 views1 answer
Reorder columns in r
R
2 votes287 views2 answers
R remove row names
R
0 vote275 views1 answer
Unset par mar
R
0 vote303 views1 answer
Change the font of the title in a plot in r
R
1 vote287 views1 answer
R type of all columns
R
2 votes278 views1 answer
Remove rownumbers r
R
0 vote249 views1 answer
R save dataframe as txt
R
0 vote291 views1 answer
Next element in a loop if error in r
R