draw_partylabels: Draw labels for political parties and seats per party

In leeper/ggparliament: Parliament Plots

Draw labels for political parties and seats per party

Description

Draw labels for political parties and seats per party

Usage

draw_partylabels(type = c("semicircle", "horseshoe"), names = TRUE,
  seats = TRUE, party_names = party_names, party_colours = party_colours,
  party_seats = party_seats)

Arguments

type	Define type. Currently only supports semicircle and horseshoe style parliaments.
names	If TRUE, finds party names from data. Defaults to TRUE.
seats	If TRUE, finds party seats from data. Defaults to TRUE.
party_names	A column containing party names.
party_colours	A column containing party colours.
party_seats	A column containing party seats.

Author(s)

Zoe Meers

Examples

data <- election_data[
  election_data$country == "USA" &
    election_data$house == "Representatives" &
    election_data$year == "2016",
]
usa_data <- parliament_data(
  election_data = data,
  type = "semicircle",
  party_seats = data$seats,
  parl_rows = 8
)
ggplot2::ggplot(usa_data, ggplot2::aes(x, y, colour = party_long)) +
  geom_parliament_seats() +
  draw_partylabels(
    type = "semicircle",
    party_names = party_long,
    party_seats = seats,
    party_colours = colour
  ) +
  ggplot2::scale_colour_manual(
    values = usa_data$colour,
    limits = usa_data$party_long
  ) +
  theme_ggparliament()

leeper/ggparliament documentation built on March 27, 2022, 1:05 p.m.