library("devtools")
install_github("geomdöner", "tlevine")
Windows users also must first install Rtools.
library(geomdoner)
mpg$truck <- mpg$class
levels(mpg$truck) <- c(TRUE,FALSE,FALSE,FALSE,TRUE,FALSE,TRUE)
mpg$y2008 <- mpg$year == 2008 # Alternative is 1999
mpg$id <- row.names(mpg)
set.seed(693)
ggplot(mpg[sample.int(nrow(mpg), 8),]) +
aes(label = paste0('Make #', id, ' (', manufacturer, ' ', model, ')'),
border = drv,
knoblauch = truck,
scharf = grepl('auto', trans),
zwiebeln = y2008,
tomaten = TRUE, salat = TRUE,
x = hwy, y = cty) +
xlab('Highway miles per gallon') +
ylab('City miles per gallon') +
ggtitle('Milage of eight automobile makes.\n(Each döner is a make.)') +
geom_text() + geom_doner()
Make #142 (nissan altima): döner box ohne knoblauch ohne kräuter ohne scharf ohne zwiebeln mit tomaten mit salat
Make #13 (audi a4 quattro): döner ohne knoblauch ohne kräuter ohne scharf ohne zwiebeln mit tomaten mit salat
Make #107 (honda civic): döner box ohne knoblauch ohne kräuter mit scharf mit zwiebeln mit tomaten mit salat
Make #86 (ford f150 pickup 4wd): döner mit knoblauch ohne kräuter ohne scharf ohne zwiebeln mit tomaten mit salat
Make #42 (dodge caravan 2wd): döner box ohne knoblauch ohne kräuter mit scharf mit zwiebeln mit tomaten mit salat
Make #98 (ford mustang): döner ohne knoblauch ohne kräuter mit scharf mit zwiebeln mit tomaten mit salat
Make #175 (toyota 4runner 4wd): döner mit knoblauch ohne kräuter mit scharf ohne zwiebeln mit tomaten mit salat
Make #118 (hyundai tiburon): döner box ohne knoblauch ohne kräuter ohne scharf mit zwiebeln mit tomaten mit salat
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.