Description Usage Arguments Examples
View source: R/geom-isotype-bar.R
geom_isotype_bar() and geom_isotype_col() are equivalent to
geom_bar() and geom_col() but draw columns with unit images.
These two geoms are essentially identical to geom_textured_bar() and
geom_textured_col(), they just have slightly different default settings.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35  | geom_isotype_bar(
  mapping = NULL,
  data = NULL,
  stat = "count",
  position = "stack",
  ...,
  img_height = grid::unit(1, "native"),
  img_width = NULL,
  ncol = 1,
  nrow = NA,
  interpolate = TRUE,
  legend_key_params = NULL,
  width = NULL,
  na.rm = FALSE,
  show.legend = NA,
  inherit.aes = TRUE
)
geom_isotype_col(
  mapping = NULL,
  data = NULL,
  stat = "identity",
  position = "stack",
  ...,
  img_height = grid::unit(1, "native"),
  img_width = NULL,
  ncol = 1,
  nrow = NA,
  interpolate = TRUE,
  legend_key_params = NULL,
  width = NULL,
  na.rm = FALSE,
  show.legend = NA,
  inherit.aes = TRUE
)
 | 
mapping | 
 Set of aesthetic mappings created by   | 
data | 
 The data to be displayed in this layer. There are three options: If  A  A   | 
stat | 
 Override the default connection between   | 
position | 
 Position adjustment, either as a string, or the result of a call to a position adjustment function.  | 
... | 
 Other arguments passed on to   | 
img_height | 
 Height of the isotype image, in grid units. Should
be provided in   | 
img_width | 
 Width of the isotype image, in grid units. Should
be provided in   | 
ncol | 
 Number of image columns. If   | 
nrow | 
 Number of image rows. If   | 
interpolate | 
 A logical value indicating whether to linearly interpolate the image (the alternative is to use nearest-neighbour interpolation, which gives a more blocky result).  | 
legend_key_params | 
 A list holding additional parameters to be handed off
to   | 
width | 
 Bar width. By default, set to 90% of the resolution of the data.  | 
na.rm | 
 If   | 
show.legend | 
 logical. Should this layer be included in the legends?
  | 
inherit.aes | 
 If   | 
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25  | library(ggplot2)
library(tibble)
library(magick)
data <- tibble(
  count = c(5, 3, 6),
  animal = c("giraffe", "elephant", "horse"),
  image = list(
    image_read_svg("http://steveharoz.com/research/isotype/icons/giraffe.svg"),
    image_read_svg("http://steveharoz.com/research/isotype/icons/elephant.svg"),
    image_read_svg("http://steveharoz.com/research/isotype/icons/horse.svg")
  )
)
ggplot(data, aes(animal, count, image = image)) +
  geom_isotype_col() +
  theme_minimal()
ggplot(data, aes(animal, count, image = image)) +
  geom_isotype_col(
    img_width = grid::unit(1, "native"), img_height = NULL,
    ncol = NA, nrow = 1, hjust = 0, vjust = 0.5, fill = "#80808040"
  ) +
  coord_flip() +
  theme_minimal()
 | 
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.