draw_majoritythreshold: Draw majority threshold

View source: R/draw_majoritythreshold.R

draw_majoritythresholdR Documentation

Draw majority threshold

Description

Draw majority threshold

Usage

draw_majoritythreshold(n = NULL, label = TRUE, type = c("horseshoe",
  "semicircle", "opposing_benches"), linecolour = "black", linesize = 1,
  linetype = 2, linealpha = 1)

Arguments

n

The number of seats required for a majority

label

A logical variable for labelling majority threshold. Defaults to TRUE.

type

Type of parliament (horseshoe, semicircle,opposing benches)

linecolour

The colour of the majority line. Defaults to gray.

linesize

The size of the line. Defaults to 1.

linetype

The style of the line. Defaults to 2, or a dashed line.

linealpha

Set the transparency of the line. Defaults to 1.

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_majoritythreshold(
    n = 218,
    label = TRUE,
    type = "semicircle"
  ) +
  theme_ggparliament()

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