The goal of hungryr is build a model for new restauraunt suggestions.
Not yet!
You can install the released version of randomFood from CRAN with:
# Install development
remotes::install_github('bill-ash/hungryr')
install.packages("hungryr")library(hungryr)
library(ggplot2)
library(forcats)
# Login - get orders -----------------------------------------------------
me <- gh_auth()
orders <- get_orders(me, pageNum = 1, pageSize = 1000)
orders %>%
tidyr::unnest(results.restaurants) %>%
dplyr::count(name) %>%
dplyr::mutate(name = fct_reorder(name, n)) %>%
ggplot(aes(n, name)) +
geom_col() +
labs(title = "Bill's favorite places to eat.",
x = 'count', y = '')