Report

Suicide numbers by year and sex

suicideYearSex <- read_csv("data/CSO_suicide_YearSex.csv")

Rows: 32 Columns: 6
── Column specification ────────────────────────────────────────────────────────
Delimiter: ","
chr (4): STATISTIC Label, Area of Residence, Sex, UNIT
dbl (2): Year, VALUE

ℹ Use `spec()` to retrieve the full column specification for this data.
ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

suicideYearSex %>% 
    ggplot(aes(x = Year, y = VALUE, color = Sex, group = Sex)) +
  geom_line(size = 1) +
  geom_point(size = 5, alpha = 0.3) +
  scale_color_manual(values = c("Male" = "#1f78b4", "Female" = "#e31a1c")) +
  labs(
    title = "Suicides by Year and Gender in Ireland",
    x = "Year",
    y = "Number of Suicides",
    color = "Gender"
  ) +
  theme_minimal()

Warning: Using `size` aesthetic for lines was deprecated in ggplot2 3.4.0.
ℹ Please use `linewidth` instead.