i_geom_tile_prop_over_time_text: Percentage labels the are filled according to proportion...

In EvaMaeRey/ggextend: What the Package Does (One Line, Title Case)

Description

Percentage labels the are filled according to proportion where total in x is denominator

Usage

i_geom_tile_prop_over_time_text(
  mapping = NULL,
  data = NULL,
  position = "identity",
  na.rm = FALSE,
  show.legend = NA,
  inherit.aes = TRUE,
  ...
)

Arguments

...

Examples

library(ggplot2)
library(magrittr)
gapminder::gapminder %>%
dplyr::mutate(gdp = gdpPercap * pop) %>%
ggplot() +
  aes(x = year) +
  aes(y = continent) +
  geom_tile_prop_over_time() +
  aes(fill = gdp) +
  scale_fill_viridis_c() +
  aes(label = gdp) +
  geom_tile_prop_over_time_text()

gapminder::gapminder %>%
dplyr::mutate(gdp = gdpPercap * pop) %>%
ggplot() +
  aes(x = year) +
  aes(y = continent) +
  geom_tile_prop_over_time() +
  aes(fill = gdp) +
  scale_fill_viridis_c() +
  aes(label = gdp) +
  geom_tile_prop_over_time_text(size = 2, angle = -90,
                                color = "snow") +
  facet_wrap(facets = vars(pop > 1000000))

gapminder::gapminder %>%
ggplot() +
  aes(x = year) +
  aes(y = continent) +
  aes(fill = 1, label = 1) + # use 1 to count times continent is observed
  geom_tile_prop_over_time(color = "oldlace") +
  labs(fill = "proportion\nof countries\nin each time\nperiod") +
  i_geom_tile_prop_over_time_text(size = 3) +
  facet_wrap(facets = vars(ifelse(gdpPercap > 10000,
  "gdp per cap > 10000", "gdp per cap < 10000")),
  ncol = 1) +
  scale_fill_viridis_c()

EvaMaeRey/ggextend documentation built on Dec. 17, 2021, 7:24 p.m.