| geom_arcbar {ggpol} | R Documentation | 
Create an Arc-Barchart
Description
An arc bar diagram that allows for spacing between the individual arc components and spans 180 degrees.
Usage
geom_arcbar(
  mapping = NULL,
  data = NULL,
  stat = "arcbar",
  position = "identity",
  n = 360,
  sep = 0.05,
  na.rm = FALSE,
  show.legend = NA,
  inherit.aes = TRUE,
  ...
)
stat_arcbar(
  mapping = NULL,
  data = NULL,
  geom = "arcbar",
  position = "identity",
  n = 360,
  sep = 0.05,
  na.rm = FALSE,
  show.legend = NA,
  inherit.aes = TRUE,
  ...
)
Arguments
mapping | 
 Set of aesthetic mappings created by   | 
data | 
 The data to be displayed in this layer. There are three options: If  A  A   | 
stat | 
 The statistical transformation to use on the data for this layer, as a string.  | 
position | 
 Position adjustment, either as a string, or the result of a call to a position adjustment function.  | 
n | 
 The number of  | 
sep | 
 Separation between the different shares, as a total proportion of pi.  | 
na.rm | 
 If   | 
show.legend | 
 logical. Should this layer be included in the legends?
  | 
inherit.aes | 
 If   | 
... | 
 Other arguments passed on to   | 
geom | 
 The geometric object to use display the data  | 
Aesthetics
geom_arcbar understands the following aesthetics (required aesthetics are in bold):
- **shares** - **r0** - inner radius - **r1** - outer radius - color - fill - linetype - alpha
Examples
bt <- data.frame(
  parties = factor(c("CDU", "CSU", "AfD", "FDP", "SPD", 
                     "Linke", "Gruene", "Fraktionslos"),
                   levels = c("CDU", "CSU", "AfD", "FDP", "SPD", 
                              "Linke", "Gruene", "Fraktionslos")),
  seats   = c(200, 46, 92, 80, 153, 69, 67, 2),
  colors  = c("black", "blue", "lightblue", "yellow", "red",
              "purple", "green", "grey"),
  stringsAsFactors = FALSE)
ggplot(bt) + 
  geom_arcbar(aes(shares = seats, r0 = 5, r1 = 10, fill = parties)) + 
  scale_fill_manual(values = bt$colors) +
  coord_fixed() +
  theme_void()