# NOT RUN {
## vector of screen names
sns <- c("kearneymw", "geoffjentry", "p_barbera",
"tidyversetweets", "rstatsbot1234", "RStatsStExBot")
## get and view bot probability estimates
twb <- tweetbotornot(sns)
twb
## ask for the fast (user-level data only) version
twbf <- tweetbotornot(sns, fast = TRUE)
twbf
# }
Run the code above in your browser using DataLab