# NOT RUN {
bearer_token <- "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"
tweets <- get_bbox_tweets("happy", bbox= c(-0.222473,51.442453,0.072784,51.568534),
"2021-01-01T00:00:00Z", "2021-02-01T10:00:00Z",
bearer_token, data_path = "data/")
# }
Run the code above in your browser using DataLab