draw_partylabels: Draw labels for political parties and seats per party

In ggparliament: Parliament Plots

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()

Example output

ggparliament documentation built on May 2, 2019, 3:35 p.m.