## Not run:
# # stream tweets mentioning Hillary Clinton for 60 seconds
# hrc <- stream_tweets(stream = "hillaryclinton", timeout = 60)
# hrc
#
# # stream tweets mentioning Donald Trump for 60 seconds
# djt <- search_tweets(q = "realdonaldtrump", timeout = 60)
# djt
# ## End(Not run)
Run the code above in your browser using DataLab