I hereby claim:
- I am holnburger on github.
- I am holnburger (https://keybase.io/holnburger) on keybase.
- I have a public key whose fingerprint is D89D 7700 7650 B6D0 3D44 7DB8 AAA4 04B0 3235 2658
To claim this, I am signing this object:
[ | |
{ | |
"id": "f77de3f3f717c5c3", | |
"type": "ha-button", | |
"z": "98f3bced.07a83", | |
"name": "Friday", | |
"version": 0, | |
"debugenabled": false, | |
"outputs": 1, | |
"entityConfig": "9d435f6632fb9b75", |
[ | |
{ | |
"id": "12370a346f7d923d", | |
"type": "ha-button", | |
"z": "98f3bced.07a83", | |
"name": "Friday", | |
"version": 0, | |
"debugenabled": false, | |
"outputs": 1, | |
"entityConfig": "9d435f6632fb9b75", |
[ | |
{ | |
"id": "c2ccbafbeb0f79d3", | |
"type": "inject", | |
"z": "98f3bced.07a83", | |
"name": "", | |
"props": [ | |
{ | |
"p": "payload" | |
}, |
library(rtweet) | |
library(tidyverse) | |
library(ggraph) | |
library(tidygraph) | |
library(ggrepel) | |
# get all the members from the bundestag from each faction, use lists provided by @pollytix_gmbh | |
mdb_list <- lists_members("973527951173193728") %>% mutate(party = "AfD") %>% | |
bind_rows(lists_members("973614171886686209") %>% mutate(party = "CDU")) %>% | |
bind_rows(lists_members("973520347634028545") %>% mutate(party = "CSU")) %>% |
library(tidyverse) | |
library(slider) | |
final <- tibble::tribble( | |
~ccode, ~year, ~publicdept, ~lifeexpec, ~gdp_pc, ~cpia, ~xm_gdp, ~polity, | |
"AFG", 2006L, 23, 58.8, 0.264, 3.33, 103L, -66L, | |
"AFG", 2007L, 20.1, 59.4, 0.36, 3.17, 102L, -66L, | |
"AFG", 2008L, 23, 58.8, 0.264, 3.33, 103L, -66L, | |
"AFG", 2009L, 20.1, 59.4, 0.36, 3.17, 102L, -66L, | |
"AFG", 2010L, 28, 60, 0.36, 3.33, 103L, -66L, |
# R-Script zum Tracking von Tweets und Reaktionen auf Tweets der MdBs | |
#---------# | |
# Setup # | |
#---------# | |
# Damit das Script funktioniert, müssen folgende Packete erst installiert werden | |
# Hier mit Rauten auskommentiert, sie müssen nur einmalig installiert werden | |
# install.packages("rtweet") |
# falls das Packet devtools und gganimate (die neue Version von github) noch nicht installiert sind | |
# install.packages('devtools') | |
# devtools::install_github('thomasp85/gganimate') | |
# Da wir die Werte in Prozent darstellen, wird auch das Packet scales benötigt. | |
# !Warnung! Sollte tidyverse oder gganimate noch nicht installiert worden sein, benötigt die Installation sehr lange. | |
library(gganimate) | |
library(tidyverse) | |
# Von der Seite: https://www.bundeswahlleiter.de/bundestagswahlen/2017/ergebnisse/repraesentative-wahlstatistik.html |
I hereby claim:
To claim this, I am signing this object: