if (auth_has_default()) {
statuses <- c(
"567053242429734913",
"266031293945503744",
"440322224407314432"
)
## lookup tweets data for given statuses
tw <- lookup_tweets(statuses)
entity(tw, "urls")
}
Run the code above in your browser using DataLab