ggpol
Visualizing Social Science Data with 'ggplot2'
A 'ggplot2' extension for implementing parliament charts and several other useful visualizations.
ggpol adds parliament diagrams and various other visualizations and convenience functions to ggplot2.
Installation
ggpol can be installed via GitHub:
if (!require(devtools)) { install.packages('devtools')}devtools::install_github('erocoar/ggpol')Selected Features
Below are two functions added by ggpol. For a full overview with applications, please refer to the vignette.
geom_parliament draws a parliament diagram, clustering points along an arc by parties with each point representing a single member of parliament.
bt <- data.frame( parties = factor(c("CDU", "CSU", "AfD", "FDP", "SPD", "Linke", "Gruene", "Fraktionslos"), levels = c("CDU", "CSU", "AfD", "FDP", "SPD", "Linke", "Gruene", "Fraktionslos")), seats = c(200, 46, 92, 80, 153, 69, 67, 2), colors = c("black", "blue", "lightblue", "yellow", "red","purple", "green", "grey"), stringsAsFactors = FALSE) ggplot(bt) + geom_parliament(aes(seats = seats, fill = parties), color = "black") + scale_fill_manual(values = bt$colors, labels = bt$parties) + coord_fixed() + theme_void()
geom_boxjitter produces a hybrid of box- and scatterplot.
df <- data.frame(score = rgamma(150, 4, 1), gender = sample(c("M", "F"), 150, replace = TRUE), genotype = factor(sample(1:3, 150, replace = TRUE))) ggplot(df) + geom_boxjitter(aes(x = genotype, y = score, fill = gender), jitter.shape = 21, jitter.color = NA, jitter.height = 0, jitter.width = 0.04, outlier.color = NA, errorbar.draw = TRUE) + scale_fill_manual(values = c("#ecb21e", "#812e91")) + theme_minimal()
Roadmap
If you would like to see a certain feature, please file an issue with a detailed description.
News
ggpol 0.0.4
Minor changes
StatBoxJitternow inherits fromStatBoxplotrather thanStat, making for slimmer bars.geom_boxjitter()does not requirexargument anymore.- Added import of
ggplot2::resolution(),ggplot2::alpha(),ggplot2::position_dodge2()andggplot2:PositionJittertogeom_boxjitter(). (#2) - Added import of
ggplot2::.pttogeom_bartext(). - Added import of ``grid::unit()
,ggplot2::zeroGrob()andggplot2::render_axes()tofacet_share()`.
ggpol 0.0.3
Minor changes
facet_sharefixed forggplotversion3.0.0.
ggpol 0.0.2
New features
geom_bartextfor otherwise overlapping bar chart labels
Minor changes
facet_shareaxis spacing has been fixed for vertical direction
ggpol 0.0.1
Major changes
- First commit
New features
facet_sharefor two plots sharing an axisgeom_arcbarfor arc bar diagrams with optional spacinggeom_boxjitterfor hybrid boxplots with optional errorbarsgeom_circlefor circles with given radiusgeom_parliamentfor parliament diagramsgeom_tshighlightfor timeseries highlighting