ggwaffle - GitLite

KO | EN

gitlite — search

#python #react #typescript #go #golang #machine-learning #rust #deep-learning #linux #docker #nodejs #cli #awesome-list #ios

ggwaffle

(★ 72)

Creating waffle charts in a ggplot friendly way

File Explorer

Download Latest Version (.zip)

- - pkgdown.yaml
  - test-coverage.yaml
- .gitignore
- - logo.png
  - README-example2.png
  - README-example3.png
  - README-unnamed-chunk-2-1.png
  - README-unnamed-chunk-3-1.png
  - README-unnamed-chunk-4-1.png
  - README-unnamed-chunk-5-1.png
- aes_d.Rd
- aes_d_.Rd
- aes_d_rename.Rd
- aes_d_validate.Rd
- geom_waffle.Rd
- GeomWaffleCircle.Rd
- GeomWaffleSquare.Rd
- ggwaffle-package.Rd
- theme_waffle.Rd
- waffle_iron.Rd
- waffle_scales.Rd
- - apple-touch-icon-120x120.png
  - apple-touch-icon-152x152.png
  - apple-touch-icon-180x180.png
  - apple-touch-icon-60x60.png
  - apple-touch-icon-76x76.png
  - apple-touch-icon.png
  - favicon-16x16.png
  - favicon-32x32.png
  - favicon.ico
- aes_d.R
- geom_waffle.R
- ggwaffle.R
- iron.R
- theme_waffle.R
- waffle_flavours.R
- - test-aes_d.R
  - test-iron.R
- testthat.R
.gitignore
.Rbuildignore
.travis.yml
_pkgdown.yml
codecov.yml
DESCRIPTION
ggwaffle.Rproj
LICENSE
LICENSE.md
NAMESPACE
NEWS.md
README.md
README.Rmd

// repository documentation

Was this content helpful?

★ 0 (0 ratings)

# ggwaffle <img src="man/figures/logo.png" align="right" width=250/>

[![Travis Build
Status](https://travis-ci.org/liamgilbey/ggwaffle.svg?branch=master)](https://travis-ci.org/liamgilbey/ggwaffle)
[![Codecov test
coverage](https://codecov.io/gh/liamgilbey/ggwaffle/branch/master/graph/badge.svg)](https://app.codecov.io/gh/liamgilbey/ggwaffle?branch=master)

Create waffle charts in R in a ggplot2-friendly way.

## Acknowledgements

Really all credit to [Bob Rudis](https://github.com/hrbrmstr) for the
work done on the original [waffle
package](https://github.com/hrbrmstr/waffle).

## Description

ggwaffle is designed to work in a very similar way to the original
[waffle package](https://github.com/hrbrmstr/waffle), while being
slightly closer to the workflow of a standard ggplot graphic.
Consequently, it is a little more verbose.

## Installation

Currently only available through github:

``` r
# install.packages("devtools")
devtools::install_github("liamgilbey/ggwaffle")
```

## Usage

ggwaffle heavily relies on the usage of
[ggplot2](https://github.com/tidyverse/ggplot2). Much like standard
ggplot graphs, waffle charts are created by adding layers to a base
graphic. Because of the inner mechanisms of ggplot2, some of the
necessary data transformations have to be completed outside of a
standard plot creation. The function `waffle_iron` has been added to
help with issue.

ggwaffle also introduces a column mapping function, `aes_d`. At this
stage I have no idea of how useful this is outside the context of the
package, but it seemed a nice way to specify dynamic column renaming.
`aes_d` is obviously coined from ggplot’s `aes` function and has a very
similar idea. Here we are mapping column names to feed into a function
so they can be renamed for used appropriately.

``` r
library(ggwaffle)
#> Loading required package: ggplot2
waffle_data <- waffle_iron(mpg, aes_d(group = class))

ggplot(waffle_data, aes(x, y, fill = group)) + 
  geom_waffle()
```

![](https://raw.githubusercontent.com/liamgilbey/ggwaffle/master/man/figures/README-unnamed-chunk-2-1.png)

Functions have also been included to make the default graphics more
waffle-like. `theme_waffle` is a ggplot theme that strips back a lot of
the elements of the waffle to create a cleaner look. `scale_fill_waffle`
returns a discrete scale to make your charts look a lot like waffles.
Using `coord_equal` is recommended to make the size of the blocks even
in all dimensions.

``` r
waffle_data <- waffle_iron(iris, aes_d(group = Species))

ggplot(waffle_data, aes(x, y, fill = group)) + 
  geom_waffle() + 
  coord_equal() + 
  scale_fill_waffle() + 
  theme_waffle()
```

![](https://raw.githubusercontent.com/liamgilbey/ggwaffle/master/man/figures/README-unnamed-chunk-3-1.png)

The shape of the waffle tile can also be controlled, choosing from
either a regular square, or a circle tile shape.

``` r
waffle_data <- waffle_iron(iris, aes_d(group = Species))

ggplot(waffle_data, aes(x, y, colour = group)) + 
  geom_waffle(tile_shape = 'circle', size = 12) + 
  coord_equal() + 
  scale_colour_waffle() + 
  theme_waffle()
```

![](https://raw.githubusercontent.com/liamgilbey/ggwaffle/master/man/figures/README-unnamed-chunk-4-1.png)

# Icons

The best way to implement icons into waffle charts is to use Guangchuang
YU’s
[emojifont](https://cran.r-project.org/web/packages/emojifont/vignettes/emojifont.html)
package.

``` r
library(emojifont)

waffle_data <- waffle_iron(iris, aes_d(group = Species)) 
waffle_data$label = fontawesome('fa-twitter')

ggplot(waffle_data, aes(x, y, colour = group)) + 
  geom_text(aes(label=label), family='fontawesome-webfont', size=12) +
  coord_equal() + 
  scale_colour_waffle() + 
  theme_waffle()  
```

![](https://raw.githubusercontent.com/liamgilbey/ggwaffle/master/man/figures/README-unnamed-chunk-5-1.png)