Get tweet status ID from CrossRef Event Data with crevents

tts · April 12, 2019, 7:52am

Package or resource used

URL or code snippet for your use case

tts/aaltoced/blob/b617ec401473cfe7928723e8f2d68be8fa4945ea/getdata.R#L36-L45


dois <- as.vector(unlist(as.list(withdois[, "doi"])))

tweeted <- function(doi, from, to){
  print(paste0("Querying ", doi))
  x <- crev_query(obj_id = doi, source = "twitter",
                  from_occurred_date = from, until_occurred_date = to)
  return(x$message$events)
}

res <- map_dfr(dois, ~ tweeted(.x, "2017-01-01", "2019-04-08"))

Sector

Academic

Field(s) of application

Bibliometrics, altmetrics

Twitter handle

@ttso

What did you do?

I built a Shiny web app on those recent publications of our university that have been tweeted by their DOI. For this, I first queried CrossRef Event Data with crevents, extracted the tweet status id’s from the result, and then fetched the tweet text and other info with rtweet. For the whole story, see my blog post.

Topic		Replies	Views
Shiny apps to search #rstudioglobal or #rstats tweets with rtweet UseCases rtweet	1	1293	February 1, 2021
Using rtweet to obtain quotes, mentions and replies of data pulled from full archive search (v2) Package Use Questions rtweet	2	358	July 8, 2022
Using look_upsers doesn't get me account_created_at? What should I use? Package Use Questions rtweet	4	406	March 1, 2022
Easily analyzing tweets using rtweet UseCases package , rtweet	0	1102	May 12, 2021
Search_tweets doesn't include user_id? Github v 0.7.0.9024 Package Use Questions rtweet	1	388	May 7, 2022