## Not run:
# ## connect to the Mongo database
# mongo <- mongo.create("SMAPP_HOST:PORT", db="DATABASE")
# mongo.authenticate(mongo, username="USERNAME", password="PASSWORD", db="DATABASE")
# set <- "DATABASE.COLLECTION"
#
# ## extract all hashtags in a collection of tweets
# ht <- extract.hashtags(set)
#
# ## show top 10 hashtags
# summary(ht, n=10)
#
# ## extract all hashtags that are used in tweets that mention "occupygezi"
# ht <- extract.hashtags(set, string="occupygezi")
#
# ## show top 10 hashtags in tweets mentioning "occupygezi"
# summary(ht, n=10)
# ## End(Not run)
Run the code above in your browser using DataLab