Зареждане на необходимите библиотеки

library(tidyverse)

Зареждане на данните

votes<-read_csv("votes.csv", col_types = "ffffff")

Сравнение на изборните резултати по брой гласове (включени са само парламентарно представените партии) за цялата страна

Сравнение на изборните резултати в проценти за цялата страна

10 примера за секции със съмнение за купен вот