A Shiny app to discover cocktails.
-- Steven E. Pav, shabbychef@gmail.com
This package can be installed from CRAN, via drat, or from github via devtools:
# via CRAN:
install.packages("cocktailApp")
# via drat:
if (require(drat)) {
drat:::add("shabbychef")
install.packages("cocktailApp")
}
# get snapshot from github (may be buggy)
if (require(devtools)) {
# latest greatest
install_github("shabbychef/cocktailApp", ref = "master")
}
The app can be run in a few ways:
app.R
in the main directory,
either via shiny::runApp()
or by moving this directory to a location that
Shiny Server serves.cocktailApp()
function.
The underlying data to power the shiny app is also available from this package.
It is called, simply, cocktails
. This data frame has rows for each
ingredient, with amounts, and units, and is joined to information about the
cocktail, which is identified by name, an upstream ID, URL, rating, number of
votes, and more.
library(cocktailApp)
library(dplyr)
library(knitr)
utils::data("cocktails", package = "cocktailApp")
cocktails %>% arrange(desc(rating)) %>% head(n = 10) %>%
select(cocktail, ingredient, amt, unit, rating) %>%
knitr::kable()
|cocktail |ingredient | amt|unit | rating| |:--------------------|:--------------------------------|-----:|:-------|------:| |Jersey Sour |Berneroy Fine Calvados | 2.00|fl oz | 5| |Jersey Sour |Freshly squeezed lemon juice | 1.00|fl oz | 5| |Jersey Sour |Sugar syrup (2 sugar to 1 water) | 0.50|fl oz | 5| |Jersey Sour |Pasteurised egg white | 0.50|fl oz | 5| |Jersey Sour |Lemon zest twist | 1.00|garnish | 5| |Julep (Generic Name) |Mint leaves | 12.00|fresh | 5| |Julep (Generic Name) |Brandy, whisk(e)y, gin, rum etc. | 2.50|fl oz | 5| |Julep (Generic Name) |Sugar syrup (2 sugar to 1 water) | 0.75|fl oz | 5| |Julep (Generic Name) |Angostura Aromatic Bitters | 3.00|dash | 5| |Julep (Generic Name) |Mint sprig | 1.00|garnish | 5|
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.