update groupschemes lecture

.gitignore

@@ -12,3 +12,10 @@
 *.dat
 *.autosave.xopp
 *.xopp~
+*.nav
+*.out
+*.snm
+*.bbl
+*.blg
+*.table
+*.gnuplot

.gitmodules

@@ -10,3 +10,12 @@
 [submodule "ws2020/wtheo/uebungen"]
 	path = ws2020/wtheo/uebungen
 	url = https://git.flavigny.de/christian/wtheo-zettel
+[submodule "ws2022/rav/lecture"]
+	path = ws2022/rav/lecture
+	url = git@git.mathi.uni-heidelberg.de:cmerten/ravlecture
+[submodule "ws2023/groupschemes"]
+	path = ws2023/groupschemes 
+	url = https://git.flavigny.de/christian/groupschemes-lecture
+[submodule "ws2023/groupschemes-lecture"]
+	path = ws2023/groupschemes-lecture
+	url = https://git.flavigny.de/christian/groupschemes-lecture

lecture.cls

@@ -63,7 +63,7 @@
 \theoremstyle{definition}
 \newmdtheoremenv{satz}{Satz}[section]
 \newmdtheoremenv{lemma}[satz]{Lemma}
-\newmdtheoremenv{korrolar}[satz]{Korrolar}
+\newmdtheoremenv{korollar}[satz]{Korollar}
 \newmdtheoremenv{definition}[satz]{Definition}
 
 \newtheorem{bsp}[satz]{Beispiel}

notes.cls

@@ -0,0 +1,249 @@
+\ProvidesClass{notes}
+\LoadClass[a4paper]{amsart}
+
+\RequirePackage[utf8]{inputenc}
+\RequirePackage[T1]{fontenc}
+\RequirePackage{textcomp}
+\RequirePackage[german, english]{babel}
+\RequirePackage{amsmath, amssymb, amsthm}
+\RequirePackage{mdframed}
+\RequirePackage{tikz-cd}
+\RequirePackage{fancyhdr}
+\RequirePackage{geometry}
+\RequirePackage{import}
+\RequirePackage{pdfpages}
+%\RequirePackage{transparent}
+\RequirePackage{xcolor}
+\RequirePackage{array}
+\RequirePackage[shortlabels]{enumitem}
+\RequirePackage{tikz}
+\RequirePackage{pgfplots}
+\RequirePackage{listings}
+\RequirePackage{mathtools}
+\RequirePackage{forloop}
+\RequirePackage{totcount}
+\RequirePackage{calc}
+\RequirePackage{wasysym}
+\RequirePackage{environ}
+\RequirePackage{hyperref}
+\RequirePackage{graphicx}
+
+\usetikzlibrary{quotes, angles}
+\pgfplotsset{
+    compat=1.15,
+    default 2d plot/.style={%
+        grid=both,
+        minor tick num=4,
+        grid style={line width=.1pt, draw=gray!10},
+        major grid style={line width=.2pt,draw=gray!50},
+        axis lines=middle,
+        enlargelimits={abs=0.2}
+    },
+}
+
+\usetikzlibrary{quotes, angles, math}
+\pgfplotsset{
+    compat=1.15,
+    axis lines = middle,
+    ticks = none,
+    %default 2d plot/.style={%
+    %    ticks=none,
+    %    axis lines = middle,
+    %    grid=both,
+    %    minor tick num=4,
+    %    grid style={line width=.1pt, draw=gray!10},
+    %    major grid style={line width=.2pt,draw=gray!50},
+    %    axis lines=middle,
+    %    enlargelimits={abs=0.2}
+}
+
+\newcounter{curve}
+
+\NewDocumentCommand{\algebraiccurve}{ O{} O{$#5 = 0$} O{-4:4} O{-4:4} m }{
+    \addplot[id=curve\arabic{curve}, raw gnuplot, smooth, #1] function{%
+        f(x,y) = #5;
+        set xrange [#3];
+        set yrange [#4];
+        set view 0,0;
+        set isosample 1000,1000;
+        set size square;
+        set cont base;
+        set cntrparam levels incre 0,0.1,0;
+        unset surface;
+        splot f(x,y)
+    };
+    \addlegendentry{#2}
+    \stepcounter{curve}
+}%
+
+% PAGE GEOMETRY
+\geometry{
+    top=1.2in,bottom=1.4in,left=1.3in,right=1.3in,
+    bottom=35mm
+}
+
+% PARAGRAPH no indent but skip
+%\setlength{\parskip}{3mm}
+%\setlength{\parindent}{0mm}
+
+\newtheorem{satz}{Proposition}[section]
+\newtheorem{theorem}[satz]{Theorem}
+\newtheorem{lemma}[satz]{Lemma}
+\newtheorem{korollar}[satz]{Corollary}
+\theoremstyle{definition}
+\newtheorem{definition}[satz]{Definition}
+\newtheorem*{definition*}{Definition}
+
+%\theoremstyle{definition}
+%\newmdtheoremenv{satz}{Satz}[section]
+%\newmdtheoremenv{lemma}[satz]{Lemma}
+%\newmdtheoremenv{korollar}[satz]{Korollar}
+%\newmdtheoremenv{definition}[satz]{Definition}
+
+\newtheorem{bsp}[satz]{Example}
+\newtheorem{bem}[satz]{Remark}
+\newtheorem{aufgabe}{Exercise}
+
+% enable aufgaben counting
+\regtotcounter{aufgabe}
+
+% temporary calculation counter
+\newcounter{var}
+
+\newcommand{\N}{\mathbb{N}}
+\newcommand{\R}{\mathbb{R}}
+\newcommand{\Z}{\mathbb{Z}}
+\newcommand{\Q}{\mathbb{Q}}
+\newcommand{\C}{\mathbb{C}}
+
+% HEADERS
+
+\pagestyle{headings}
+
+\newcommand{\incfig}[1]{%
+    \def\svgwidth{\columnwidth}
+    \import{./figures/}{#1.pdf_tex}
+}
+\pdfsuppresswarningpagegroup=1
+
+% code listings, define style
+\lstdefinestyle{mystyle}{
+    commentstyle=\color{gray},
+    keywordstyle=\color{blue},
+    numberstyle=\tiny\color{gray},
+    stringstyle=\color{black},
+    basicstyle=\ttfamily\footnotesize,
+    breakatwhitespace=false,         
+    breaklines=true,                 
+    captionpos=b,                    
+    keepspaces=true,                 
+    numbers=left,                    
+    numbersep=5pt,                  
+    showspaces=false,                
+    showstringspaces=false,
+    showtabs=false,                  
+    tabsize=2
+}
+
+% activate my colour style
+\lstset{style=mystyle}
+
+% better stackrel
+\let\oldstackrel\stackrel
+\renewcommand{\stackrel}[2]{%
+    \oldstackrel{\mathclap{#1}}{#2}
+}%
+
+% integral d sign
+\makeatletter \renewcommand\d[2][]{\ensuremath{%
+		\,\mathrm{d}^{#1}#2\@ifnextchar^{}{\@ifnextchar\d{}{\,}}}}
+\makeatother
+
+% contradiction
+\newcommand{\contr}{\text{\Large\lightning}}
+
+% disjoint unions: provides cupdot and bigcupdot
+\makeatletter
+\def\moverlay{\mathpalette\mov@rlay}
+\def\mov@rlay#1#2{\leavevmode\vtop{%
+   \baselineskip\z@skip \lineskiplimit-\maxdimen
+   \ialign{\hfil$\m@th#1##$\hfil\cr#2\crcr}}}
+\newcommand{\charfusion}[3][\mathord]{
+    #1{\ifx#1\mathop\vphantom{#2}\fi
+        \mathpalette\mov@rlay{#2\cr#3}
+      }
+    \ifx#1\mathop\expandafter\displaylimits\fi}
+\makeatother
+
+\newcommand{\cupdot}{\charfusion[\mathbin]{\cup}{\cdot}}
+\newcommand{\bigcupdot}{\charfusion[\mathop]{\bigcup}{\cdot}}
+
+\ExplSyntaxOn
+
+% S-tackrelcompatible ALIGN environment
+% some might also call it the S-uper ALIGN environment
+% uses regular expressions to calculate the widest stackrel
+% to put additional padding on both sides of relation symbols
+\NewEnviron{salign}
+{
+    \begin{align}
+        \lec_insert_padding:V \BODY
+    \end{align}
+}
+% starred version that does no equation numbering
+\NewEnviron{salign*}
+{
+    \begin{align*}
+        \lec_insert_padding:V \BODY
+    \end{align*}
+}
+
+% some helper variables
+\tl_new:N \l__lec_text_tl
+\seq_new:N \l_lec_stackrels_seq
+\int_new:N \l_stackrel_count_int
+\int_new:N \l_idx_int
+\box_new:N \l_tmp_box
+\dim_new:N \l_tmp_dim_a
+\dim_new:N \l_tmp_dim_b
+\dim_new:N \l_tmp_dim_needed
+
+% function to insert padding according to widest stackrel
+\cs_new_protected:Nn \lec_insert_padding:n
+ {
+  \tl_set:Nn \l__lec_text_tl { #1 }
+  % get all stackrels in this align environment
+  \regex_extract_all:nnN { \c{stackrel}{(.*?)}{(.*?)} } { #1 } \l_lec_stackrels_seq
+  % get number of stackrels
+  \int_set:Nn \l_stackrel_count_int { \seq_count:N \l_lec_stackrels_seq }
+  \int_set:Nn \l_idx_int { 1 }
+  \dim_set:Nn \l_tmp_dim_needed { 0pt }
+  % iterate over stackrels
+  \int_while_do:nn { \l_idx_int <= \l_stackrel_count_int }
+  {
+      % calculate width of text
+      \hbox_set:Nn \l_tmp_box {$\seq_item:Nn \l_lec_stackrels_seq { \l_idx_int + 1 }$}
+      \dim_set:Nn \l_tmp_dim_a {\box_wd:N \l_tmp_box}
+      % calculate width of relation symbol
+      \hbox_set:Nn \l_tmp_box {$\seq_item:Nn \l_lec_stackrels_seq { \l_idx_int + 2 }$}
+      \dim_set:Nn \l_tmp_dim_b {\box_wd:N \l_tmp_box}
+      % check if 0.5*(a-b) > minimum padding, if yes updated minimum padding
+      \dim_compare:nNnTF
+        { 1pt * \dim_ratio:nn { \l_tmp_dim_a - \l_tmp_dim_b } { 2pt } } > { \l_tmp_dim_needed }
+        { \dim_set:Nn \l_tmp_dim_needed { 1pt * \dim_ratio:nn { \l_tmp_dim_a - \l_tmp_dim_b } { 2pt } } }
+        { }
+      \quad
+      % increment list index by three, as every stackrel produces three list entries
+      \int_incr:N \l_idx_int
+      \int_incr:N \l_idx_int
+      \int_incr:N \l_idx_int
+  }
+  % replace all relations with align characters (&) and add the needed padding
+  \regex_replace_all:nnN
+  { (<&|&<|\c{iff}&|&\c{iff}|\c{impliedby}&|&\c{impliedby}|\c{implies}&|&\c{implies}|\c{approx}&|&\c{approx}|\c{equiv}&|&\c{equiv}|=&|&=|\c{le}&|&\c{le}|\c{ge}&|&\c{ge}|&\c{stackrel}{.*?}{.*?}|\c{stackrel}{.*?}{.*?}&|&\c{neq}|\c{neq}&|\c{simeq}&|&\c{simeq}) }
+      { \c{kern} \u{l_tmp_dim_needed} \1 \c{kern} \u{l_tmp_dim_needed} }
+      \l__lec_text_tl
+  \l__lec_text_tl
+ }
+\cs_generate_variant:Nn \lec_insert_padding:n { V }
+\ExplSyntaxOff

presentation.cls

@@ -0,0 +1,265 @@
+\ProvidesClass{presentation}
+\LoadClass[notheorems]{beamer}
+
+\RequirePackage[utf8]{inputenc}
+\RequirePackage[T1]{fontenc}
+\RequirePackage{textcomp}
+\RequirePackage[german]{babel}
+\RequirePackage{amsmath, amssymb, amsthm}
+\RequirePackage{mdframed}
+\RequirePackage{fancyhdr}
+\RequirePackage{geometry}
+\RequirePackage{import}
+\RequirePackage{pdfpages}
+\RequirePackage{transparent}
+\RequirePackage{xcolor}
+\RequirePackage{array}
+\RequirePackage{tikz}
+\RequirePackage{pgfplots}
+%\RequirePackage[nobottomtitles]{titlesec}
+\RequirePackage{listings}
+\RequirePackage{mathtools}
+\RequirePackage{forloop}
+\RequirePackage{totcount}
+\RequirePackage{calc}
+\RequirePackage{wasysym}
+\RequirePackage{environ}
+
+\usetikzlibrary{quotes, angles}
+\pgfplotsset{
+    compat=1.15,
+    default 2d plot/.style={%
+        grid=both,
+        minor tick num=4,
+        grid style={line width=.1pt, draw=gray!10},
+        major grid style={line width=.2pt,draw=gray!50},
+        axis lines=middle,
+        enlargelimits={abs=0.2}
+    },
+}
+
+% beamer specific proof envs without title or qed symbol
+
+% proof beginning (suppressing qed symbol)
+\NewEnviron{proofb}
+{
+    \begin{proof}
+        \renewcommand{\qedsymbol}{}
+        \BODY
+    \end{proof}
+}
+
+% proof intermediate (suppressing both)
+\NewEnviron{proofi}
+{
+    \renewcommand{\proofname}{\hskip-\labelsep\spacefactor3000 }
+    \begin{proof}
+        \renewcommand{\qedsymbol}{}
+        \BODY
+    \end{proof}
+}
+
+% proof end (suppressing title)
+\NewEnviron{proofe}
+{
+    \renewcommand{\proofname}{\hskip-\labelsep\spacefactor3000 }
+    \begin{proof}
+        \BODY
+    \end{proof}
+}
+
+
+% PARAGRAPH no indent but skip
+\setlength{\parskip}{3mm}
+\setlength{\parindent}{0mm}
+
+\theoremstyle{plain}
+\newtheorem{satz}{Satz}[section]
+\newtheorem{lemma}[satz]{Lemma}
+\newtheorem{korollar}[satz]{Korollar}
+
+\theoremstyle{definition}
+\newtheorem{definition}[satz]{Definition}
+
+\theoremstyle{remark}
+\newtheorem{bsp}[satz]{Beispiel}
+\newtheorem{bem}[satz]{Bemerkung}
+\newtheorem{aufgabe}{Aufgabe}
+
+% enable aufgaben counting
+%\regtotcounter{aufgabe}
+
+% temporary calculation counter
+\newcounter{var}
+
+\newcommand{\N}{\mathbb{N}}
+\newcommand{\R}{\mathbb{R}}
+\newcommand{\Z}{\mathbb{Z}}
+\newcommand{\Q}{\mathbb{Q}}
+\newcommand{\C}{\mathbb{C}}
+
+% HEADERS
+
+%\pagestyle{fancy}
+
+\newcommand{\incfig}[1]{%
+    \def\svgwidth{\columnwidth}
+    \import{./figures/}{#1.pdf_tex}
+}
+\pdfsuppresswarningpagegroup=1
+
+% horizontal rule
+\newcommand\hr{
+    \noindent\rule[0.5ex]{\linewidth}{0.5pt}
+}
+
+% punkte tabelle
+%\newcommand{\punkte}[1][1]{
+%    \newcounter{k}
+%    \setcounter{k}{#1}
+%    \@punkten{\value{k}}{\totvalue{aufgabe}}
+%    \setcounter{k}{#1-1}
+%    \setcounter{aufgabe}{\value{k}}
+%    \vspace{5mm}
+%}
+%
+%\def\@punkten#1#2{
+%    \newcounter{n}
+%    % create a temporary calculation counter
+%    \setcounter{var}{#2-#1+1}
+%    \begin{tabular}{|c|*{\value{var}}{m{1cm}|}m{1cm}|@{}m{0cm}@{}}
+%        \hline
+%        Aufgabe
+%        \forloop{n}{#1}{\not{\value{n} > #2}}{
+%            & \centering A\then
+%        }
+%        & \centering $\sum$ & \\[5mm] \hline
+%        Punkte
+%        \forloop{n}{#1}{\not{\value{n} > #2}}{
+%            &
+%        }
+%        & & \\[5mm] \hline
+%    \end{tabular}
+%}
+
+% code listings, define style
+\lstdefinestyle{mystyle}{
+    commentstyle=\color{gray},
+    keywordstyle=\color{blue},
+    numberstyle=\tiny\color{gray},
+    stringstyle=\color{black},
+    basicstyle=\ttfamily\footnotesize,
+    breakatwhitespace=false,         
+    breaklines=true,                 
+    captionpos=b,                    
+    keepspaces=true,                 
+    numbers=left,                    
+    numbersep=5pt,                  
+    showspaces=false,                
+    showstringspaces=false,
+    showtabs=false,                  
+    tabsize=2
+}
+
+% activate my colour style
+\lstset{style=mystyle}
+
+% better stackrel
+\let\oldstackrel\stackrel
+\renewcommand{\stackrel}[2]{%
+    \oldstackrel{\mathclap{#1}}{#2}
+}%
+
+% integral d sign
+\makeatletter \renewcommand\d[2][]{\ensuremath{%
+		\,\mathrm{d}^{#1}#2\@ifnextchar^{}{\@ifnextchar\d{}{\,}}}}
+\makeatother
+
+% contradiction
+\newcommand{\contr}{\text{\Large\lightning}}
+
+% disjoint unions: provides cupdot and bigcupdot
+\makeatletter
+\def\moverlay{\mathpalette\mov@rlay}
+\def\mov@rlay#1#2{\leavevmode\vtop{%
+   \baselineskip\z@skip \lineskiplimit-\maxdimen
+   \ialign{\hfil$\m@th#1##$\hfil\cr#2\crcr}}}
+\newcommand{\charfusion}[3][\mathord]{
+    #1{\ifx#1\mathop\vphantom{#2}\fi
+        \mathpalette\mov@rlay{#2\cr#3}
+      }
+    \ifx#1\mathop\expandafter\displaylimits\fi}
+\makeatother
+
+\newcommand{\cupdot}{\charfusion[\mathbin]{\cup}{\cdot}}
+\newcommand{\bigcupdot}{\charfusion[\mathop]{\bigcup}{\cdot}}
+
+\ExplSyntaxOn
+
+% S-tackrelcompatible ALIGN environment
+% some might also call it the S-uper ALIGN environment
+% uses regular expressions to calculate the widest stackrel
+% to put additional padding on both sides of relation symbols
+\NewEnviron{salign}
+{
+    \begin{align}
+        \lec_insert_padding:V \BODY
+    \end{align}
+}
+% starred version that does no equation numbering
+\NewEnviron{salign*}
+{
+    \begin{align*}
+        \lec_insert_padding:V \BODY
+    \end{align*}
+}
+
+% some helper variables
+\tl_new:N \l__lec_text_tl
+\seq_new:N \l_lec_stackrels_seq
+\int_new:N \l_stackrel_count_int
+\int_new:N \l_idx_int
+\box_new:N \l_tmp_box
+\dim_new:N \l_tmp_dim_a
+\dim_new:N \l_tmp_dim_b
+\dim_new:N \l_tmp_dim_needed
+
+% function to insert padding according to widest stackrel
+\cs_new_protected:Nn \lec_insert_padding:n
+ {
+  \tl_set:Nn \l__lec_text_tl { #1 }
+  % get all stackrels in this align environment
+  \regex_extract_all:nnN { \c{stackrel}{(.*?)}{(.*?)} } { #1 } \l_lec_stackrels_seq
+  % get number of stackrels
+  \int_set:Nn \l_stackrel_count_int { \seq_count:N \l_lec_stackrels_seq }
+  \int_set:Nn \l_idx_int { 1 }
+  \dim_set:Nn \l_tmp_dim_needed { 0pt }
+  % iterate over stackrels
+  \int_while_do:nn { \l_idx_int <= \l_stackrel_count_int }
+  {
+      % calculate width of text
+      \hbox_set:Nn \l_tmp_box {$\seq_item:Nn \l_lec_stackrels_seq { \l_idx_int + 1 }$}
+      \dim_set:Nn \l_tmp_dim_a {\box_wd:N \l_tmp_box}
+      % calculate width of relation symbol
+      \hbox_set:Nn \l_tmp_box {$\seq_item:Nn \l_lec_stackrels_seq { \l_idx_int + 2 }$}
+      \dim_set:Nn \l_tmp_dim_b {\box_wd:N \l_tmp_box}
+      % check if 0.5*(a-b) > minimum padding, if yes updated minimum padding
+      \dim_compare:nNnTF
+        { 1pt * \dim_ratio:nn { \l_tmp_dim_a - \l_tmp_dim_b } { 2pt } } > { \l_tmp_dim_needed }
+        { \dim_set:Nn \l_tmp_dim_needed { 1pt * \dim_ratio:nn { \l_tmp_dim_a - \l_tmp_dim_b } { 2pt } } }
+        { }
+      \quad
+      % increment list index by three, as every stackrel produces three list entries
+      \int_incr:N \l_idx_int
+      \int_incr:N \l_idx_int
+      \int_incr:N \l_idx_int
+  }
+  % replace all relations with align characters (&) and add the needed padding
+  \regex_replace_all:nnN
+      { (<&|&<|\c{iff}&|&\c{iff}|\c{impliedby}&|&\c{impliedby}|\c{implies}&|&\c{implies}|\c{approx}&|&\c{approx}|\c{equiv}&|&\c{equiv}|=&|&=|\c{le}&|&\c{le}|\c{ge}&|&\c{ge}|&\c{stackrel}{.*?}{.*?}|\c{stackrel}{.*?}{.*?}&|&\c{neq}|\c{neq}&) }
+      { \c{kern} \u{l_tmp_dim_needed} \1 \c{kern} \u{l_tmp_dim_needed} }
+      \l__lec_text_tl
+  \l__lec_text_tl
+ }
+\cs_generate_variant:Nn \lec_insert_padding:n { V }
+\ExplSyntaxOff

sose2021/r/abschlussbericht.tex

@@ -0,0 +1,42 @@
+\documentclass{article}
+\usepackage[ngerman]{babel}
+\usepackage[top=2.5cm, bottom=2.5cm]{geometry}
+\title{Abschlussbericht}
+\author{Leon Burgard, Josua Kugler, Christian Merten}
+\begin{document}
+    \maketitle
+    \section*{Projektbeschreibung}
+    Unser Projekt \glqq Plenarprotokolle \grqq stellt mittels dem Paket \verb|hateimparlament| Funktionen zur Analyse der Plenarprotokolle der 19. Wahlperiode des deutschen Bundestages zur Verfügung. Diese Funktionen können in vier Bereiche unterteilt werden:
+    \begin{enumerate}
+        \item Herunterladen der Protokolle
+        \item Konvertierung der XML-Dateien in Tibbles
+        \item Reparieren von Fehlern
+        \item Analyse
+    \end{enumerate}
+    Das Herunterladen der Protokolle gelingt über die Funktion 
+    \verb|fetch_all()|, welche auf die Website des deutschen Bundestages zugreift und die XML-Dateien einzeln herunterlädt. Hierzu haben wir das Paket rvest verwendet, welches wir bereits in der Vorlesung kennengelernt haben.
+    Durch \verb|read_all()| werden diese heruntergeladenen XML-Dateien in eine benannte Liste mit fünf Tibbles (speaker, speeches, talks, comments und applause) geschrieben. Allerdings benötigt man diese Tibbles immer wieder und es ist ziemlich zeitaufwändig die XML-Dateien immer wieder neu in Tibbles einzulesen, deshalb haben wir zusätzlich eine Funkion \verb|write_to_csv()| geschrieben, die die fertigen Tibbles als CSV-Dateien speichert. Diese können dann sehr schnell durch \verb|read_from_csv()| eingelesen werden, wodurch viel Zeit gesparrt wird.
+    Da diese Protokolle kleine Fehler enthalten, müssen diese noch im nächsten Schritt bereinigt werden, was mit \verb|repair()| funktioniert. Hierbei wird das Paket tidyverse viel benutzt, welches insgesamt sehr viel in unserem Projekt beansprucht wird, da wir uns mit der Datenanalyse beschäftigen.
+    In \verb|analyse.R| stellen wir noch einige Hilfsfunktionen bereit, die es dem Nutzer vereinfachen die Daten auszuwerten. Beispielsweise steht schon eine Funktion zur Verfügung, die ein Balkendiagramm erstellt, bei dem jede Partei des Bundestages sperat ausgewertet wird. Hierbei wird das Paket \verb|ggplot2| verwendet.
+    Im letzten Schritt unseres Projekts haben wir Fragestellungen festgelegt, die wir mithilfe von unserem Paket beantworten wollten. Die Daten und unsere Ergebnisse visualisierten wir mithilfe von \verb|ggplot2| und \verb|tidyverse| in Vignetten. 
+    \section*{Organisation des Teams}
+    Während der ersten Projektphase wurden hauptsächlich die Funktionen zum Herunterladen der Dateien und Konvertieren und Reparieren der Tibbles geschrieben. Dies geschah größtenteils in Einzelarbeit, wobei hierbei die gegenseitige Kontrolle und Nachfragen die Funktionen optimiert haben. Zwischendurch wurde immer mal wieder zu einer HeiConf-Konferenz einberufen, um sich selbst den Zwischenstand klar zu machen und die Herausforderungen für die nächsten Wochen zu besprechen.
+    In der zweiten Hälfte des Projekts kümmerten wir uns dann um die Analyse der Daten und stellten unsere Ergebnisse in Vignetten da und erzeugten Dokumentationen für alle Funktionen, die für den Nutzer wichtig sind.
+    \newpage
+
+\section*{Meine Beteiligung (Christian Merten)}
+
+Meine Aufgaben und Beteiligung war hauptsächlich auf zwei Teile konzentriert: Organisation des Teams
+und Implementierung der Grundfunktionalitäten. Zur Organisation habe ich regelmäßig versucht
+die noch ausstehenden Aufgaben zusammenzufassen, zu priorisieren und dem Team zu kommunizieren.
+
+Auf Umsetzungsseite habe ich mich v.a. um die grundlegenden Aufgaben Protokolle herunterladen,
+auslesen und reparieren gekümmert. Auch die grundlegenden Paketstrukturen in \verb|R| anzulegen und
+die erste Vignette zum Laufen zu bringen, waren meine Aufgaben. Im späteren Verlauf habe ich noch
+einige Analysehilfsfunktionen entwickelt.
+
+Ich habe die Teamarbeit als herausfordernd empfunden, denn ich hatte zumeist hohe Ansprüche und klare
+Vorstellungen. Deshalb ist es mir nicht immer leicht gefallen, Verantwortung für Projektteile
+abzugeben. Insgesamt bin ich jedoch zufrieden mit der letztendlichen Teamarbeit.
+
+\end{document}

sose2021/r/w02/L02-1-exerc.R

@@ -0,0 +1,11 @@
+approx_p <- function(n0, a, b) {
+    x <- rnorm(n0)
+    sum(x >= a & x <= b) / n0
+}
+# berechne wahres p durch Integration
+p <- integrate(dnorm, lower=-1, upper=3)$value
+p
+# berechne Differenz zwischen Näherung und wahrem Wert für verschiedene n0
+abs(p - approx_p(1e1, -1, 3))
+abs(p - approx_p(1e3, -1, 3))
+abs(p - approx_p(1e5, -1, 3))

sose2021/r/w02/L02-2-exerc.R

@@ -0,0 +1,13 @@
+# linear congruential generator (lcg)
+lcg_prng <- function(n, y1, m, a, b) {
+    if (n == 1) return(y1)
+    y <- (a*y1 + b) %% m
+    c(y1, lcg_prng(n-1, y, m, a, b))
+}
+par(mfrow=c(1,2))
+m <- 2^11
+x <- lcg_prng(500, y1=1, m=m, a=1017, b=1)
+plot(x[1:499]/m, x[2:500]/m, pch=".", cex=4, xlab="u1, ..., u499", ylab="u2, ..., u500", main="lcg_prng()")
+# Vergleich mit R-Funktion sample.int(), siehe ?sample
+x <- sample.int(m, 500)
+plot(x[1:499]/m, x[2:500]/m, pch=".", cex=4, xlab="u1, ..., u499", ylab="u2, ..., u500", main="sample.int()")

sose2021/r/w02/L02-3-exerc.R

@@ -0,0 +1,37 @@
+w <- 256L
+h <- 256L
+set.seed(0)
+
+lcg_prng <- function(n, y1, m, a, b) {
+    if (n == 1) return(y1)
+    res <- integer(n)
+    res[1] <- y1
+    for (i in 2:n) {
+        y1 <- (a*y1 + b) %% m
+        res[i] <- y1
+    }
+    res
+}
+
+m <- 2^11
+z <- sample(1:m, w*h, replace=T)
+img_sample <- matrix(z %% 2, nrow=w)
+
+y <- lcg_prng(w*h, y1=1, m=m, a=1017, b=1)
+img_lcg <- matrix(y %% 2, nrow=w)
+
+par(mfrow=c(1,2), mar=c(1,1,1,1))
+image(
+  img_sample,
+  col = c("black", "white"), 
+  axes = FALSE,
+  useRaster = TRUE, 
+  asp=1, # fixes aspect ratio
+  main="sample()") 
+image(
+  img_lcg,
+  col = c("black", "white"), 
+  axes = FALSE,
+  useRaster = TRUE, 
+  asp=1,
+  main="lcg_prng()") 

sose2021/r/w02/L02-4-exerc.R

@@ -0,0 +1,10 @@
+n <- 300
+u <- runif(n)
+x <- qnorm(u)
+y <- rnorm(n)
+
+par(mfrow=c(1,2), mar=c(2,2,1,1))
+qqplot(u, y, main="uniform vs normal")
+abline(0, 1, col="gray")
+qqplot(x, y, main="normal (inversion) vs normal")
+abline(0, 1, col="gray")

sose2021/r/w02/L02-5-exerc.R

@@ -0,0 +1,83 @@
+# Welche der beiden Sequenzen entstammt einem fairen Münzwurf (mit unabhängigen Würfe)?
+x <- c(1,1,1,0,1,0,0,1,1,1,0,1,0,0,1,1,0,1,1,1,
+       0,0,0,0,0,0,1,1,1,1,1,1,0,0,1,0,0,1,0,0,
+       1,1,1,1,1,0,1,0,1,1,1,0,1,1,1,0,1,1,0,0,
+       1,0,1,0,0,1,1,0,1,1,0,1,0,0,0,0,0,0,0,0,
+       1,0,1,0,1,0,0,0,1,0,1,0,1,1,1,1,0,0,1,1)
+y <- c(1,0,1,0,1,1,0,1,0,0,1,1,0,0,0,1,0,1,1,1,
+       0,0,1,1,0,0,1,0,1,1,0,1,0,1,0,1,1,0,1,0,
+       0,1,0,1,0,0,1,0,0,1,1,1,0,1,0,1,0,1,0,1,
+       0,1,0,1,1,0,1,0,1,0,0,1,0,0,0,1,0,0,1,1,
+       0,1,0,0,0,1,1,0,0,1,0,1,0,0,1,0,1,0,1,1)
+
+c(length(x), length(y)) # gleiche Länge
+table(x) # zähle Anzahl der 1en und 0en
+table(y)
+
+
+
+
+
+get_runs_statistic <- function(v) {
+  r <- rle(v)
+  c(number_of_runs = length(r$lengths),
+    longest_run = max(r$lengths),
+    number_of_ones = sum(v == 1))
+}
+
+
+
+
+get_confidence_region <- function(v, alpha) {
+  stopifnot(length(alpha)==1)
+  q <- 1 - alpha
+  stopifnot(q > 0 && q <= 1)
+  i <- 0
+  m <- mean(v)
+  while(
+    sum(m-i <= v & v <= m+i) / length(v) < q
+  ) i <- i+0.5
+  return(list(left=ceiling(m-i)-0.5, right=floor(m+i)+0.5))
+}
+
+n <- length(x)
+
+rx <- get_runs_statistic(x)
+ry <- get_runs_statistic(y)
+
+
+# simulate fair coin tosses
+
+library(tibble)
+set.seed(0)
+
+simu <- replicate(1e5, # execute following function call 1e5 times
+  get_runs_statistic(sample(0:1, n, replace=TRUE)))
+data <- as_tibble(t(simu))
+
+
+# Plot results
+
+layout(
+  rbind(
+    c(1, 2),
+    c(3, 3) 
+  ),
+  heights=c(1, 1),
+)
+clrs <- list(x = "red", y = "blue", conf = "#00FF0040")
+mark_lwd <- 3
+invisible(lapply(names(data), function (nm) {
+  v <- data[[nm]]
+  hist(v, breaks=(min(v)-0.5):(max(v)+0.5), main=nm, xlab=NULL)
+  y_axis_max <- par("yaxp")[2]
+  segments(rx[nm], 0, y1=y_axis_max, col=clrs$x, lwd=mark_lwd)
+  segments(ry[nm], 0, y1=y_axis_max, col=clrs$y, lwd=mark_lwd)
+  conf <- get_confidence_region(v, 0.05)
+  rect(conf$left, 0, conf$right, y_axis_max, col=clrs$conf, border=NA)
+}))
+legend(
+  "topright", 
+  c("x", "y", "95% confidence"), 
+  col=c(clrs$x, clrs$y, clrs$conf), 
+  lwd=mark_lwd)

sose2021/r/w02/L03-2-exerc.R

@@ -0,0 +1,15 @@
+library(ggplot2)
+library(tibble)
+
+x_plt <- seq(0, 1, len=7)
+tb <- tibble(
+  x_val = rep(x_plt, times=3), 
+  y_val = c(sin(2*pi*x_plt)/2+0.5, x_plt^2, sqrt(x_plt)),
+  fun = rep(c("sin", "sqr", "sqrt"), each=length(x_plt)))
+tb$z_val = abs(0.5-tb$x_val)+0.1
+
+plt <- ggplot(data = tb, mapping = aes(x = x_val, y = y_val, color=fun)) +
+    geom_line(mapping = aes(linetype=fun), size = 1.2) +
+    geom_point(color = "black", mapping = aes(size = z_val))
+
+print(plt)

sose2021/r/w02/L03-3-exerc.R

@@ -0,0 +1,20 @@
+library(ggplot2)
+library(tibble)
+
+x_plt <- seq(0, pi/2, len=100)
+tb <- tibble(
+  x_val = rep(x_plt, 2), 
+  y_val = c(sin(x_plt), sin(2*x_plt)), 
+  fun = rep(c("sin(x)", "sin(2x)"), each=length(x_plt)))
+
+plt <- ggplot(tb, aes(x_val, y_val, color=fun)) + 
+    xlab("x") +
+    ylab("y") +
+    labs(color = "function") +
+    scale_x_continuous(breaks = pi/c(Inf, 6, 4, 3, 2),
+                       labels = c("0", "pi/6", "pi/4", "pi/3", "pi/2")) +
+    scale_y_continuous(breaks = sqrt(0:4/4),
+                       labels = c("0", "1/2", "sqrt(2)/2", "sqrt(3)/2", "1")) +
+    geom_line()
+
+print(plt)

sose2021/r/w02/L03-4-exerc.R

@@ -0,0 +1,27 @@
+library(ggplot2)
+library(tibble)
+library(gridExtra)
+
+# Bundeswahlleiter, Wiesbaden 2017
+# Endgültig gewählte Bewerberinnen und Bewerber bei der Wahl zum 19. Deutschen Bundestag (24. September 2017)
+data_raw <- readr::read_delim("mdb.csv", delim=";")
+mdb <- data_raw[,c("Name", "Vorname", "Geschlecht", "Geburtsjahr", "Partei_KurzBez")]
+names(mdb) <- c("last_name", "first_name", "gender", "birth_year", "party")
+party_colors <- c(
+  SPD="#DF0B25",
+  CSU="#87bbe6",
+  CDU="#000000", 
+  AfD="#1A9FDD",
+  "DIE LINKE"="#BC3475",
+  "GRÜNE"="#4A932B",
+  FDP="#FEEB34"
+)
+
+plt1 <- ggplot(data = mdb, aes(x = party, fill=gender)) +
+    geom_bar(position = "dodge2")
+
+plt2 <- ggplot(data = mdb, aes(x = birth_year, fill = party)) +
+    geom_histogram(binwidth=10, position=position_dodge2(preserve="single")) +
+    scale_fill_manual(values=party_colors)
+
+grid.arrange(plt1, plt2, nrow=1)

sose2021/r/w02/P02-1-exerc.R

@@ -0,0 +1,31 @@
+NUMERIC_TYPES <- c("double", "integer")
+
+lsq <- function(X, y) {
+    # TODO
+    stopifnot("X may not be empty" = length(X) > 0)
+    stopifnot("y may not be empty" = length(y) > 0)
+    stopifnot("X must be numeric" = typeof(X) %in% NUMERIC_TYPES)
+    stopifnot("y must be numeric" = typeof(y) %in% NUMERIC_TYPES)
+    stopifnot("X must be matrix" = is.matrix(X))
+    stopifnot("y must be vector or matrix with one column" = is.vector(y) || (is.matrix(y) && ncol(y) == 1))
+    stopifnot("dimensions of X and y do not fit" = (is.vector(y) && nrow(X) == length(y)) || (is.matrix(y) && nrow(y) == nrow(X)))
+    stopifnot("y may not contain NA" = all(!is.na(y)))
+    stopifnot("X may not contain NA" = all(!is.na(X)))
+    A <- t(X) %*% X
+    stopifnot("det(t(X) %*% X) must not be zero" = det(A) != 0)
+    solve(A, t(X) %*% y) 
+}
+
+lsq(matrix(1:6, nrow=3), 1:3)
+lsq(matrix(runif(6), nrow=3), matrix(runif(3), ncol=1))
+lsq(matrix(letters[1:6] , nrow=2), 1:3)
+lsq(matrix(1:6, nrow=3), list(1,2,3))
+lsq(1:6, 1:3)
+lsq(matrix(1:6, nrow=3), array(1:3, dim=c(1,1,3)))
+lsq(matrix(1:6, nrow=3), 1:4)
+lsq(matrix(1:6, nrow=3), matrix(1:3, nrow=1))
+lsq(matrix(1:6, nrow=3), matrix(1:6, nrow=3))
+lsq(matrix(double(0), nrow=0, ncol=0), matrix(double(0), nrow=0, ncol=0))
+lsq(matrix(1:6, nrow=3), c(1,NA,3))
+lsq(matrix(c(1:5, NA), nrow=3), 1:3)
+lsq(matrix(c(1,1,2,1,1,2), nrow=3), 1:3)

sose2021/r/w02/P02-2-exerc.R

@@ -0,0 +1,35 @@
+my_matrix <- function(vec, nrow=NULL, ncol=NULL, colnames=NULL, rownames=NULL) {
+    stopifnot("at least one of nrow or ncol has to be specified" = !is.null(nrow) || !is.null(ncol))
+    if (is.null(nrow)) {
+        stopifnot("incompatible length" = length(vec) %% ncol == 0)
+        nrow <- length(vec) / ncol
+    } else if (is.null(ncol)) {
+        stopifnot("incompatible length" = length(vec) %% nrow == 0)
+        ncol <- length(vec) / nrow
+    } else if (length(vec) == 1) {
+        vec <- rep(vec, nrow * ncol)
+    } else stopifnot("incompatible length" = length(vec) == nrow * ncol)
+
+    dim(vec) <- c(nrow, ncol)
+    stopifnot("lenght of colnames must be ncol" = is.null(colnames) || length(colnames) == ncol)
+    stopifnot("lenght of rownames must be nrow" = is.null(rownames) || length(rownames) == nrow)
+    dimnames(vec) <- list(rownames, colnames)
+    return(vec)
+}
+
+my_matrix(1:6)
+my_matrix(1:6, ncol=1)
+my_matrix(1:6, ncol=2)
+my_matrix(1:6, ncol=3)
+my_matrix(1:6, ncol=6)
+my_matrix(1:6, ncol=4)
+my_matrix(1:6, nrow=2)
+my_matrix(1:6, nrow=7)
+my_matrix(1:6, ncol=2, nrow=2)
+my_matrix(1:6, ncol=2, nrow=3)
+my_matrix(1:6, ncol=2, nrow=1)
+my_matrix(0, ncol=3, nrow=2)
+my_matrix(1:6, ncol=3, colnames=LETTERS[1:3])
+my_matrix(1:6, ncol=3, colnames=LETTERS[1:2])
+my_matrix(1:6, ncol=3, rownames=letters[24 + 1:2])
+my_matrix(1:6, ncol=3, colnames=LETTERS[1:3], rownames=letters[24 + 1:2])

sose2021/r/w02/P02-3-exerc.R

@@ -0,0 +1,22 @@
+my_tibble <- function(data) {
+    attr(data, "row.names") <- (1:lengths(data)[1])
+    attr(data, "class") <- c("tbl_df", "tbl", "data.frame")
+    return(data)
+}
+
+library(tibble)
+my_tb <- my_tibble(list(x=1:3, y=letters[1:3]))
+tb <- tibble(x=1:3 , y=letters[1:3])
+identical(tb, my_tb)
+
+my_factor <- function(data) {
+    lvls <- unique(data)
+    vec <- sapply(data, function(x) match(x, lvls), USE.NAMES=FALSE)
+    attr(vec, "levels") <- lvls
+    attr(vec, "class") <- "factor"
+    return(vec)
+}
+
+my_fac <- my_factor (c("a", "b", "a", "a", "c", "c"))
+fac <- factor(c("a", "b", "a", "a", "c", "c"))
+identical(fac, my_fac)

sose2021/r/w02/P02-4-exerc.R

@@ -0,0 +1,56 @@
+collatz <- function(raw_x, max_iter) {
+    stopifnot("Length of x must be 1" = length(raw_x) == 1)
+    x <- as.integer(raw_x)
+    stopifnot("Cannot interprete x as integer" = !is.na(x))
+    sequ <- c(x)
+    len <- NA
+    for (n in (1:(max_iter-1))) {
+        if (x == 1) {
+            len <- n
+            break
+        } else if (x %% 2 == 0) {
+            x <- x / 2
+        } else {
+            x <- 3*x+1
+        }
+        sequ <- c(sequ, x)
+    }
+    return(list(seq=sequ, len=len))
+}
+
+str(collatz(1, 1e4))
+## List of 2
+##  $ seq: int 1
+##  $ len: int 1
+str(collatz(2, 1e4))
+## List of 2
+##  $ seq: int [1:2] 2 1
+##  $ len: int 2
+str(collatz(3, 1e4))
+## List of 2
+##  $ seq: int [1:8] 3 10 5 16 8 4 2 1
+##  $ len: int 8
+str(collatz(3, 5))
+## List of 2
+##  $ seq: int [1:5] 3 10 5 16 8
+str(collatz("4", 1e4))
+## List of 2
+##  $ seq: int [1:3] 4 2 1
+##  $ len: int 3
+str(collatz("four", 1e4))
+## Warning in collatz("four", 10000): NAs introduced by coercion
+## Error in collatz("four", 10000): Cannot interprete x as integer
+str(collatz(1:5, 1e4))
+## Error in collatz(1:5, 10000): Length of x must be 1
+str(collatz(5.0, 1e4))
+## List of 2
+##  $ seq: int [1:6] 5 16 8 4 2 1
+##  $ len: int 6
+str(collatz(5.1, 1e4))
+## List of 2
+##  $ seq: int [1:6] 5 16 8 4 2 1
+##  $ len: int 6
+str(collatz(5.9, 1e4))
+## List of 2
+##  $ seq: int [1:6] 5 16 8 4 2 1
+##  $ len: int 6

sose2021/r/w02/mdb.csv

@@ -0,0 +1,710 @@
+Titel;Namenszusatz;Name;Vorname;Geschlecht;Geburtsjahr;Beruf;Partei_KurzBez;Partei_Bez;Gewählt_Stimmenart;Gewählt_Land;Gewählt_Wahlkreis_Nr;Gewählt_Wahlkreis_Bez;Gewählt_Erststimmenanteil;Gewählt_Liste_Platz;Kandidierte-auch_Land;Kandidierte-auch_Wahlkreis_Nr;Kandidierte-auch_Liste_Platz;Wiedergewählt
+Dr.;von;Abercron;Michael;m;1952;Dipl.-Agraringenieur / Angestellter ö. D. / Unternehmer;CDU;Christlich Demokratische Union Deutschlands;E;SH;7;Pinneberg;39,7;;SH;;10;
+;;Achelwilm;Doris Maria;w;1976;Angestellte;DIE LINKE;DIE LINKE;Z;HB;;;;1;;;;
+;;Aggelidis;Grigorios;m;1965;Vermögensverwalter;FDP;Freie Demokratische Partei;Z;NI;;;;3;NI;43;;
+;;Akbulut;Gökay;w;1982;Sozialwissenschaftlerin;DIE LINKE;DIE LINKE;Z;BW;;;;3;BW;275;;
+;;Albani;Stephan;m;1968;MdB / Geschäftsführer;CDU;Christlich Demokratische Union Deutschlands;Z;NI;;;;6;NI;27;;X
+;;Alt;Renata;w;1965;Chemieingenieurin;FDP;Freie Demokratische Partei;Z;BW;;;;7;BW;262;;
+;;Altenkamp;Norbert Maria;m;1972;Bürgermeister;CDU;Christlich Demokratische Union Deutschlands;E;HE;181;Main-Taunus;41,9;;HE;;21;
+;;Altmaier;Peter;m;1958;Jurist;CDU;Christlich Demokratische Union Deutschlands;E;SL;297;Saarlouis;38;;SL;;1;X
+;;Amthor;Philipp;m;1992;Jurist;CDU;Christlich Demokratische Union Deutschlands;E;MV;16;Mecklenburgische Seenplatte I – Vorpommern-Greifswald II;31,2;;MV;;6;
+;;Amtsberg;Luise;w;1984;MdB / Islamwissenschaftlerin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;SH;;;;1;SH;5;;X
+;;Andreae;Kerstin;w;1968;Dipl.-Volkswirtin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;1;BW;281;;X
+;;Annen;Niels;m;1973;Historiker;SPD;Sozialdemokratische Partei Deutschlands;E;HH;20;Hamburg-Eimsbüttel;31,6;;HH;;4;X
+;;Arndt-Brauer;Ingrid;w;1961;MdB / Dipl.-Kauffrau / Dipl.-Soziologin;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;14;NW;124;;X
+;;Aschenberg-Dugnus;Christine;w;1959;Rechtsanwältin;FDP;Freie Demokratische Partei;Z;SH;;;;3;SH;4;;
+;;Auernhammer;Artur;m;1963;MdB / Landwirtschaftsmeister;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;241;Ansbach;44,3;;BY;;38;X
+;;Aumer;Peter;m;1976;Dipl.-Betriebswirt (FH);CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;233;Regensburg;40,1;;;;;
+;;Badum;Lisa Hildegard;w;1983;Politikwissenschaftlerin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;11;BY;236;;
+;;Baehrens;Heike;w;1955;MdB / Diakonin;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;13;BW;263;;X
+;;Baerbock;Annalena;w;1980;Völkerrechtlerin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BB;;;;1;BB;61;;X
+;;Bahr;Ulrike;w;1964;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;4;BY;252;;X
+;;Bär;Dorothee;w;1978;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;248;Bad Kissingen;51,1;;BY;;3;X
+;;Bareiß;Thomas;m;1975;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;295;Zollernalb – Sigmaringen;45;;;;;X
+Dr.;;Barley;Katarina;w;1968;MdB / Juristin;SPD;Sozialdemokratische Partei Deutschlands;Z;RP;;;;3;RP;203;;X
+;;Barnett;Doris;w;1953;MdB / Juristin;SPD;Sozialdemokratische Partei Deutschlands;Z;RP;;;;5;RP;207;;X
+;;Barrientos Krauss;Simone;w;1963;Verlegerin;DIE LINKE;DIE LINKE;Z;BY;;;;5;BY;251;;
+;;Barthle;Norbert;m;1952;MdB / parl. Staatssekretär;CDU;Christlich Demokratische Union Deutschlands;E;BW;269;Backnang – Schwäbisch Gmünd;41,2;;;;;X
+Dr.;;Bartke;Matthias;m;1959;Jurist;SPD;Sozialdemokratische Partei Deutschlands;E;HH;19;Hamburg-Altona;28,9;;HH;;6;X
+;;Bartol;Sören;m;1974;Dipl.-Politologe;SPD;Sozialdemokratische Partei Deutschlands;E;HE;171;Marburg;35,7;;HE;;5;X
+Dr.;;Bartsch;Dietmar Gerhard;m;1958;MdB;DIE LINKE;DIE LINKE;Z;MV;;;;1;MV;14;;X
+;;Bas;Bärbel;w;1968;MdB;SPD;Sozialdemokratische Partei Deutschlands;E;NW;115;Duisburg I;38,3;;NW;;32;X
+;;Bauer;Nicole;w;1987;Dipl.-Wirtschaftsingenieurin (FH);FDP;Freie Demokratische Partei;Z;BY;;;;11;BY;228;;
+Dr.;;Baumann;Bernd;m;1958;Kaufmann;AfD;Alternative für Deutschland;Z;HH;;;;1;HH;19;;
+;;Bause;Margarete;w;1959;MdL;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;9;BY;218;;
+Dr.;;Bayaz;Danyal;m;1983;Unternehmensberater;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;12;BW;278;;
+;;Bayram;Canan;w;1966;Rechtsanwältin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;E;BE;83;Berlin-Friedrichshain-Kreuzberg – Prenzlauer Berg Ost;26,3;;;;;
+;;Beeck;Jens;m;1969;Rechtsanwalt;FDP;Freie Demokratische Partei;Z;NI;;;;2;NI;31;;
+;in der;Beek;Olaf;m;1967;selbst. Unternehmer;FDP;Freie Demokratische Partei;Z;NW;;;;19;NW;140;;
+;;Beer;Nicola Gertrud Ruth;w;1970;Rechtsanwältin;FDP;Freie Demokratische Partei;Z;HE;;;;1;HE;182;;
+;;Beermann;Maik;m;1981;MdB / Sparkassenbetriebswirt;CDU;Christlich Demokratische Union Deutschlands;E;NI;40;Nienburg II – Schaumburg;40,6;;NI;;26;X
+;;Behrens;Manfred;m;1956;MdB;CDU;Christlich Demokratische Union Deutschlands;E;ST;67;Börde – Jerichower Land;37,8;;ST;;5;X
+;;Bellmann;Veronika;w;1960;MdB;CDU;Christlich Demokratische Union Deutschlands;E;SN;161;Mittelsachsen;32,4;;SN;;7;X
+;;Benning;Sybille;w;1961;Dipl.-Ing. Landschaftsplanung;CDU;Christlich Demokratische Union Deutschlands;E;NW;129;Münster;37,2;;NW;;28;X
+Dr.;;Berghegger;André;m;1972;MdB / Jurist;CDU;Christlich Demokratische Union Deutschlands;E;NI;38;Osnabrück-Land;45,6;;NI;;22;X
+;;Bernhard;Marc;m;1972;Rechtsanwalt / Geschäftsführer;AfD;Alternative für Deutschland;Z;BW;;;;9;BW;271;;
+;;Bernstein;Melanie;w;1976;Kulturwissenschaftlerin;CDU;Christlich Demokratische Union Deutschlands;E;SH;6;Plön – Neumünster;40,7;;SH;;8;
+;;Bernstiel;Christoph;m;1984;Kommunikationsberater;CDU;Christlich Demokratische Union Deutschlands;E;ST;72;Halle;27,1;;ST;;7;
+;;Beutin;Lorenz Gösta;m;1978;Historiker;DIE LINKE;DIE LINKE;Z;SH;;;;2;SH;6;;
+;;Beyer;Peter;m;1970;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NW;105;Mettmann II;39,3;;NW;;50;X
+;;Biadacz;Marc;m;1979;ltd. Angestellter in der Digitalbranche;CDU;Christlich Demokratische Union Deutschlands;E;BW;260;Böblingen;38,8;;;;;
+;Marschall von;Bieberstein;Matern;m;1962;MdB / Verleger;CDU;Christlich Demokratische Union Deutschlands;E;BW;281;Freiburg;28;;;;;X
+;;Bilger;Steffen;m;1979;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;BW;265;Ludwigsburg;38,3;;BW;;6;X
+;;Binding;Lothar;m;1950;MdB / Dipl.-Mathematiker;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;4;BW;274;;X
+;;Birkwald;Matthias W.;m;1961;Dipl.-Sozialwissenschaftler;DIE LINKE;DIE LINKE;Z;NW;;;;2;NW;94;;X
+;;Bleck;Andreas;m;1988;Student;AfD;Alternative für Deutschland;Z;RP;;;;3;RP;197;;
+;;Bleser;Peter;m;1952;MdB / Landwirtschaftsmeister;CDU;Christlich Demokratische Union Deutschlands;E;RP;200;Mosel/Rhein-Hunsrück;44,1;;RP;;2;X
+;;Bluhm;Heidrun;w;1958;MdB;DIE LINKE;DIE LINKE;Z;MV;;;;2;MV;17;;X
+;;Boehringer;Peter Christian Pascal;m;1969;Kaufmann / Wirtschaftspublizist;AfD;Alternative für Deutschland;Z;BY;;;;2;BY;232;;
+;;Brackmann;Norbert;m;1954;Jurist;CDU;Christlich Demokratische Union Deutschlands;E;SH;10;Herzogtum Lauenburg – Stormarn-Süd;39,5;;SH;;2;X
+;;Brand;Michael;m;1973;MdB;CDU;Christlich Demokratische Union Deutschlands;E;HE;174;Fulda;45,2;;HE;;11;X
+Dr.;;Brandenburg;Jens;m;1986;Unternehmensberater;FDP;Freie Demokratische Partei;Z;BW;;;;9;BW;277;;
+;;Brandenburg;Mario;m;1983;Wirtschaftsinformatiker;FDP;Freie Demokratische Partei;Z;RP;;;;3;RP;211;;
+Dr.;;Brandl;Reinhard;m;1977;MdB / Dipl.-Wirtschaftsingenieur;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;216;Ingolstadt;49,5;;;;;X
+;;Brandner;Stephan;m;1966;Rechtsanwalt;AfD;Alternative für Deutschland;Z;TH;;;;1;TH;193;;
+;;Brandt;Michel;m;1990;Schauspieler;DIE LINKE;DIE LINKE;Z;BW;;;;6;BW;271;;
+Dr.;;Brantner;Franziska;w;1979;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;9;BW;274;;X
+Dr.;;Brauksiepe;Ralf;m;1967;parl. Staatssekretär;CDU;Christlich Demokratische Union Deutschlands;Z;NW;;;;9;NW;139;;X
+Prof. Dr.;;Braun;Helge Reinhold;m;1972;Arzt;CDU;Christlich Demokratische Union Deutschlands;E;HE;173;Gießen;35,1;;HE;;1;X
+;;Braun;Jürgen;m;1961;Kommunikationsberater;AfD;Alternative für Deutschland;Z;BW;;;;6;BW;264;;
+;;Breher;Silvia;w;1973;Geschäftsführerin / Rechtsanwältin;CDU;Christlich Demokratische Union Deutschlands;E;NI;32;Cloppenburg – Vechta;57,7;;NI;;25;
+;;Brehm;Sebastian;m;1971;Steuerberater / Dipl.-Kaufmann;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;244;Nürnberg-Nord;31,3;;BY;;22;
+;;Brehmer;Heike;w;1962;MdB / Dipl.-Betriebswirtin (FH);CDU;Christlich Demokratische Union Deutschlands;E;ST;68;Harz;36,4;;ST;;1;X
+;;Breymaier;Leni;w;1960;Einzelhandelskauffrau;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;1;BW;270;;
+;;Brinkhaus;Ralph;m;1968;MdB / Steuerberater;CDU;Christlich Demokratische Union Deutschlands;E;NW;131;Gütersloh I;46,6;;NW;;7;X
+Dr.;;Brodesser;Carsten;m;1967;ltd. Angestellter / Dipl.-Volkswirt;CDU;Christlich Demokratische Union Deutschlands;E;NW;99;Oberbergischer Kreis;43,7;;NW;;36;
+;;Brugger;Agnes;w;1985;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;5;BW;294;;X
+Dr.;;Brunner;Karl Heinz;m;1953;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;15;BY;255;;X
+Dr.;;Buchholz;Bernd;m;1961;Rechtsanwalt;FDP;Freie Demokratische Partei;Z;SH;;;;2;SH;10;;
+;;Buchholz;Christine;w;1971;Erziehungswissenschaftlerin;DIE LINKE;DIE LINKE;Z;HE;;;;3;HE;185;;X
+;;Budde;Katrin;w;1965;MdL / Dipl.-Ing. für Arbeitsgestaltung;SPD;Sozialdemokratische Partei Deutschlands;Z;ST;;;;2;ST;74;;
+;;Bühl;Marcus;m;1977;Dipl.-Informatiker (M. Sc.) (FH);AfD;Alternative für Deutschland;Z;TH;;;;3;;;;
+;;Bull-Bischoff;Birke;w;1963;Erziehungswissenschaftlerin / Soziologin;DIE LINKE;DIE LINKE;Z;ST;;;;3;ST;73;;
+;;Bülow;Marco;m;1971;freier Journalist / Publizist;SPD;Sozialdemokratische Partei Deutschlands;E;NW;142;Dortmund I;38,8;;NW;;56;X
+;;Burkert;Martin;m;1964;MdB / Gewerkschaftssekretär;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;3;BY;245;;X
+Dr.;;Buschmann;Marco;m;1977;Rechtsanwalt;FDP;Freie Demokratische Partei;Z;NW;;;;4;NW;123;;
+;;Busen;Karlheinz;m;1951;Dipl.-Ingenieur;FDP;Freie Demokratische Partei;Z;NW;;;;10;NW;126;;
+;;Büttner;Matthias;m;1990;Informatiker;AfD;Alternative für Deutschland;Z;ST;;;;3;ST;66;;
+;;Bystron;Petr;m;1972;Unternehmer;AfD;Alternative für Deutschland;Z;BY;;;;4;BY;217;;
+Dr.;;Castellucci;Lars;m;1974;MdB / Hochschulprofessor;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;12;BW;277;;X
+;;Cezanne;Jörg;m;1958;Geschäftsführer;DIE LINKE;DIE LINKE;Z;HE;;;;4;HE;184;;
+Dr.;;Christmann;Anna;w;1983;wiss. Referentin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;11;BW;259;;
+;;Chrupalla;Tino;m;1975;selbst. Malermeister;AfD;Alternative für Deutschland;E;SN;157;Görlitz;32,4;;SN;;5;
+;;Connemann;Gitta;w;1964;MdB / Rechtsanwältin;CDU;Christlich Demokratische Union Deutschlands;E;NI;25;Unterems;50;;NI;;7;X
+;;Cotar;Joana Eleonora;w;1973;selbständig;AfD;Alternative für Deutschland;Z;HE;;;;2;;;;
+;;Cronenberg;Carl-Julius;m;1962;Unternehmer;FDP;Freie Demokratische Partei;Z;NW;;;;14;NW;147;;
+Dr.;;Curio;Gottfried;m;1960;MdAB;AfD;Alternative für Deutschland;Z;BE;;;;2;;;;
+;;Dağdelen;Sevim;w;1975;Journalistin;DIE LINKE;DIE LINKE;Z;NW;;;;3;NW;140;;X
+;;Daldrup;Bernhard;m;1956;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;7;NW;130;;X
+;;Damerow;Astrid;w;1958;geschäftsf. Gesellschafterin Coaching und Beratung;CDU;Christlich Demokratische Union Deutschlands;E;SH;2;Nordfriesland – Dithmarschen Nord;45,1;;SH;;5;
+;;Dassler;Britta Katharina;w;1964;Unternehmerin;FDP;Freie Demokratische Partei;Z;BY;;;;9;BY;242;;
+Dr.;;Dehm-Desoi;Jörg-Diether Wilhelm;m;1950;Liederautor / Medienunternehmer;DIE LINKE;DIE LINKE;Z;NI;;;;2;NI;43;;X
+;;Deligöz;Ekin;w;1971;MdB / Dipl.-Verwaltungswissenschaftlerin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;3;BY;255;;X
+Dr.;;Diaby;Karamba;m;1961;MdB / Dipl.-Chemiker;SPD;Sozialdemokratische Partei Deutschlands;Z;ST;;;;3;ST;72;;X
+;;Dilcher;Esther;w;1965;Rechtsanwältin / Notarin;SPD;Sozialdemokratische Partei Deutschlands;E;HE;167;Waldeck;35,1;;HE;;16;
+;;Dittmar;Sabine;w;1964;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;10;BY;248;;X
+;;Djir-Sarai;Bijan;m;1976;hauptamtl. Dezernent;FDP;Freie Demokratische Partei;Z;NW;;;;6;NW;108;;
+;;Dobrindt;Alexander;m;1970;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;226;Weilheim;47,9;;BY;;2;X
+;;Domscheit-Berg;Anke;w;1968;Publizistin;DIE LINKE;DIE LINKE;Z;BB;;;;3;BB;60;;
+;;Donth;Michael;m;1967;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;289;Reutlingen;40,8;;;;;X
+;;Dörner;Katja;w;1976;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;3;NW;96;;X
+;;Dött;Marie-Luise;w;1953;Kauffrau im Einzelhandel;CDU;Christlich Demokratische Union Deutschlands;Z;NW;;;;8;NW;117;;X
+;;Droese;Siegbert;m;1969;Hotelkaufmann;AfD;Alternative für Deutschland;Z;SN;;;;3;SN;153;;
+;;Dröge;Katharina;w;1984;Dipl.-Volkswirtin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;7;NW;95;;X
+;;Dürr;Christian;m;1977;MdL / Dipl.-Ökonom;FDP;Freie Demokratische Partei;Z;NI;;;;1;NI;28;;
+;;Durz;Hansjörg;m;1971;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;253;Augsburg-Land;47,8;;BY;;39;X
+;;Ebbing;Hartmut Heinrich Wilhelm;m;1956;Wirtschaftsprüfer / Steuerberater;FDP;Freie Demokratische Partei;Z;BE;;;;3;BE;79;;
+;;Ebner;Harald;m;1964;MdB / Dipl.-Agraringenieur;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;8;BW;268;;X
+;;Ehrhorn;Thomas;m;1959;Pilot;AfD;Alternative für Deutschland;Z;NI;;;;3;NI;44;;
+;;Elsner von Gronow;Gerhard Helmuth Berengar;m;1978;Vertriebsleiter;AfD;Alternative für Deutschland;Z;NW;;;;15;NW;146;;
+;;Erndl;Thomas;m;1974;Dipl.-Ing. Elektrotechnik (FH);CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;227;Deggendorf;44,1;;;;;
+;;Ernst;Klaus Friedrich;m;1954;MdB / Gewerkschaftssekretär;DIE LINKE;DIE LINKE;Z;BY;;;;1;BY;250;;X
+;;Esdar;Wiebke;w;1984;wiss. Mitarbeiterin;SPD;Sozialdemokratische Partei Deutschlands;E;NW;132;Bielefeld – Gütersloh II;33,2;;NW;;36;
+;;Esken;Saskia;w;1961;MdB / Informatikerin;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;15;BW;280;;X
+Dr.;;Espendiller;Michael;m;1989;prom. Mathematiker;AfD;Alternative für Deutschland;Z;NW;;;;10;NW;128;;
+Dr.;;Faber;Marcus;m;1984;Angestellter;FDP;Freie Demokratische Partei;Z;ST;;;;2;ST;66;;
+;;Fahimi;Yasmin;w;1967;Staatssekretärin / Dipl.-Chemikerin;SPD;Sozialdemokratische Partei Deutschlands;E;NI;42;Stadt Hannover II;33,7;;NI;;24;
+;;Färber;Hermann;m;1963;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;263;Göppingen;37,6;;;;;X
+Dr.;;Fechner;Johannes;m;1972;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;10;BW;283;;X
+;;Feiler;Uwe Wolfgang Werner;m;1965;Dipl.-Finanzwirt;CDU;Christlich Demokratische Union Deutschlands;E;BB;58;Oberhavel – Havelland II;29,9;;BB;;5;X
+Dr.;;Felgentreu;Fritz;m;1968;MdB / klassischer Philologe / Lehrer;SPD;Sozialdemokratische Partei Deutschlands;E;BE;82;Berlin-Neukölln;26,8;;;;;X
+;;Felser;Peter;m;1969;Unternehmer;AfD;Alternative für Deutschland;Z;BY;;;;7;BY;256;;
+;;Ferlemann;Enak;m;1963;parl. Staatssekretär;CDU;Christlich Demokratische Union Deutschlands;E;NI;29;Cuxhaven – Stade II;42,7;;NI;;3;X
+;;Ferschl;Susanne;w;1973;Betriebsratsvorsitzende;DIE LINKE;DIE LINKE;Z;BY;;;;3;BY;257;;
+;;Fischer;Axel;m;1966;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;272;Karlsruhe-Land;40,4;;;;;X
+Dr.;;Flachsbarth;Maria Franziska;w;1963;MdB / Tierärztin;CDU;Christlich Demokratische Union Deutschlands;Z;NI;;;;4;NI;47;;X
+;;Föst;Daniel;m;1976;selbständig;FDP;Freie Demokratische Partei;Z;BY;;;;1;BY;217;;
+Dr.;;Franke;Edgar Konrad Hartmut;m;1960;MdB;SPD;Sozialdemokratische Partei Deutschlands;E;HE;170;Schwalm-Eder;37,7;;HE;;11;X
+;;Freese;Ulrich Ronald;m;1951;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;BB;;;;2;BB;64;;X
+;;Frei;Thorsten;m;1973;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;286;Schwarzwald-Baar;47;;;;;X
+;;Freihold;Brigitte;w;1955;Lehrerin;DIE LINKE;DIE LINKE;Z;RP;;;;3;RP;210;;
+;;Freitag;Dagmar;w;1953;Lehrerin a. D.;SPD;Sozialdemokratische Partei Deutschlands;E;NW;150;Märkischer Kreis II;38,6;;NW;;6;X
+;;Fricke;Otto;m;1965;Rechtsanwalt;FDP;Freie Demokratische Partei;Z;NW;;;;7;NW;110;;
+;;Friedhoff;Dietmar;m;1966;Dipl.-Ingenieur / Vertriebstrainer;AfD;Alternative für Deutschland;Z;NI;;;;5;NI;43;;
+Dr.;;Friedrich;Hans-Peter;m;1957;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;239;Hof;47;;BY;;8;X
+Dr.;;Friesen;Anton;m;1985;wiss. Mitarbeiter;AfD;Alternative für Deutschland;Z;TH;;;;5;;;;
+;;Frieser;Michael;m;1964;MdB / Rechtsanwalt;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;245;Nürnberg-Süd;35,6;;BY;;21;X
+;;Frohnmaier;Markus;m;1991;Pressesprecher;AfD;Alternative für Deutschland;Z;BW;;;;4;BW;260;;
+Dr.;;Frömming;Götz;m;1968;Studiendirektor;AfD;Alternative für Deutschland;Z;BE;;;;3;;;;
+;;Fuchtel;Hans-Joachim;m;1952;MdB / parl. Staatssekretär;CDU;Christlich Demokratische Union Deutschlands;E;BW;280;Calw;43,3;;;;;X
+;;Gabelmann;Sylvia;w;1958;Apothekerin;DIE LINKE;DIE LINKE;Z;NW;;;;9;NW;148;;
+;;Gabriel;Sigmar Hartmut;m;1959;MdB / Bundesminister;SPD;Sozialdemokratische Partei Deutschlands;E;NI;49;Salzgitter – Wolfenbüttel;42,8;;NI;;25;X
+;;Gädechens;Ingo;m;1960;Berufssoldat;CDU;Christlich Demokratische Union Deutschlands;E;SH;9;Ostholstein – Stormarn-Nord;41,5;;SH;;3;X
+;;Gastel;Matthias;m;1970;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;10;BW;262;;X
+Dr.;;Gauland;Eberhardt Alexander;m;1941;MdL;AfD;Alternative für Deutschland;Z;BB;;;;1;BB;63;;
+Dr.;;Gebhart;Thomas;m;1971;MdB;CDU;Christlich Demokratische Union Deutschlands;E;RP;211;Südpfalz;40,3;;RP;;4;X
+;;Gehring;Kai Boris;m;1977;Dipl.-Sozialwissenschaftler;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;10;NW;120;;X
+Dr.;;Gehrke;Axel;m;1942;Arzt;AfD;Alternative für Deutschland;Z;SH;;;;2;SH;9;;
+;;Gelbhaar;Stefan;m;1976;MdAB / Rechtsanwalt;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BE;;;;2;BE;76;;
+;;Gerdes;Michael;m;1960;MdB / Elektrohauer;SPD;Sozialdemokratische Partei Deutschlands;E;NW;125;Bottrop – Recklinghausen III;36,8;;NW;;64;X
+;;Gerig;Alois;m;1956;MdB / Landwirtschaftsmeister;CDU;Christlich Demokratische Union Deutschlands;E;BW;276;Odenwald – Tauber;46,8;;;;;X
+;;Gerster;Martin;m;1971;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;8;BW;292;;X
+;;Gienger;Eberhard;m;1951;MdB / Kaufmann;CDU;Christlich Demokratische Union Deutschlands;E;BW;266;Neckar-Zaber;40;;;;;X
+;;Glaser;Albrecht Heinz Erhard;m;1942;Stadtkämmerer a. D.;AfD;Alternative für Deutschland;Z;HE;;;;5;HE;170;;
+;;Glöckner;Angelika;w;1962;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;RP;;;;9;RP;210;;X
+;;Gminder;Franziska;w;1945;Dipl.-Kauffrau;AfD;Alternative für Deutschland;Z;BW;;;;11;;;;
+;;Gnodtke;Eckhard;m;1958;Sozialdezernent / Volljurist;CDU;Christlich Demokratische Union Deutschlands;E;ST;66;Altmark;32,6;;ST;;9;
+;;Gohlke;Nicole Stephanie;w;1975;MdB / Kommunikationswissenschaftlerin;DIE LINKE;DIE LINKE;Z;BY;;;;2;BY;219;;X
+;;Göring-Eckardt;Katrin;w;1966;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;TH;;;;1;TH;193;;X
+;von;Gottberg;Wilhelm;m;1940;Beamter i. R.;AfD;Alternative für Deutschland;Z;NI;;;;4;;;;
+;;Gottschalk;Kay;m;1965;Angestellter;AfD;Alternative für Deutschland;Z;NW;;;;4;NW;111;;
+;;Gremmels;Timon;m;1976;MdL;SPD;Sozialdemokratische Partei Deutschlands;E;HE;168;Kassel;35,6;;HE;;21;
+;;Griese;Kerstin;w;1966;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;4;NW;105;;X
+;;Groden-Kranich;Ursula;w;1965;MdB / Bankkauffrau;CDU;Christlich Demokratische Union Deutschlands;E;RP;205;Mainz;35,7;;RP;;11;X
+;;Gröhe;Hermann;m;1961;MdB / Bundesminister / Jurist;CDU;Christlich Demokratische Union Deutschlands;E;NW;108;Neuss I;44;;NW;;1;X
+;;Gröhler;Klaus-Dieter;m;1966;MdB / Jurist;CDU;Christlich Demokratische Union Deutschlands;E;BE;80;Berlin-Charlottenburg-Wilmersdorf;30,2;;;;;X
+;;Groß;Michael Peter;m;1956;Geschäftsbereichsleiter;SPD;Sozialdemokratische Partei Deutschlands;E;NW;122;Recklinghausen II;41,1;;NW;;39;X
+;;Grosse-Brömer;Michael;m;1960;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NI;36;Harburg;40,6;;NI;;2;X
+;;Grotelüschen;Astrid Katharina Josefine;w;1964;MdB / Dipl.-Ökotrophologin;CDU;Christlich Demokratische Union Deutschlands;E;NI;28;Delmenhorst – Wesermarsch – Oldenburg-Land;34,1;;NI;;10;X
+;;Grötsch;Uli;m;1975;MdB / Polizeibeamter;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;11;BY;235;;X
+;;Grübel;Markus;m;1959;MdB / parl. Staatssekretär;CDU;Christlich Demokratische Union Deutschlands;E;BW;261;Esslingen;40;;;;;X
+;;Grund;Manfred;m;1955;Dipl.-Elektroingenieur;CDU;Christlich Demokratische Union Deutschlands;E;TH;189;Eichsfeld – Nordhausen – Kyffhäuserkreis;38;;TH;;1;X
+;;Grundl;Erhard;m;1963;Vertriebsmanager;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;8;BY;231;;
+;;Grundmann;Oliver Klaus;m;1971;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NI;30;Stade I – Rotenburg II;44,4;;NI;;21;X
+;;Grütters;Monika;w;1962;Staatsministerin für Kultur und Medien;CDU;Christlich Demokratische Union Deutschlands;Z;BE;;;;1;BE;85;;X
+;;Güntzler;Fritz;m;1966;MdB;CDU;Christlich Demokratische Union Deutschlands;Z;NI;;;;9;NI;53;;X
+;;Gutting;Olav;m;1970;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;BW;278;Bruchsal – Schwetzingen;41,5;;;;;X
+Dr.;;Gysi;Gregor;m;1948;Rechtsanwalt;DIE LINKE;DIE LINKE;E;BE;84;Berlin-Treptow-Köpenick;39,9;;;;;X
+;;Haase;Christian;m;1966;Dipl.-Verwaltungswirt;CDU;Christlich Demokratische Union Deutschlands;E;NW;136;Höxter – Lippe II;44,3;;;;;X
+;;Hacker;Thomas;m;1967;Dipl.-Kaufmann;FDP;Freie Demokratische Partei;Z;BY;;;;10;BY;237;;
+;;Hagedorn;Bettina;w;1955;MdB / Goldschmiedin;SPD;Sozialdemokratische Partei Deutschlands;Z;SH;;;;1;SH;9;;X
+;;Hagl-Kehl;Rita;w;1970;MdB / Studienrätin;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;16;BY;227;;X
+Dr.;;Hahn;André;m;1963;MdB;DIE LINKE;DIE LINKE;Z;SN;;;;2;SN;158;;X
+;;Hahn;Florian Peter;m;1974;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;221;München-Land;43,5;;BY;;37;X
+;;Hajduk;Anja Margarete Helene;w;1963;Dipl.-Psychologin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;HH;;;;1;HH;21;;X
+;;Hakverdi;Metin;m;1969;Volljurist;SPD;Sozialdemokratische Partei Deutschlands;E;HH;23;Hamburg-Bergedorf – Harburg;34,8;;HH;;8;X
+;;Hampel;Armin-Paulus;m;1957;Journalist;AfD;Alternative für Deutschland;Z;NI;;;;1;NI;46;;
+;;Hänsel;Heike;w;1966;MdB;DIE LINKE;DIE LINKE;Z;BW;;;;2;BW;290;;X
+Dr.;;Harbarth;Stephan;m;1971;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;BW;277;Rhein-Neckar;37,4;;;;;X
+;;Harder-Kühnel;Mariana Iris;w;1974;Rechtsanwältin;AfD;Alternative für Deutschland;Z;HE;;;;1;HE;175;;
+;;Hardt;Jürgen;m;1963;MdB / Dipl.-Volkswirt;CDU;Christlich Demokratische Union Deutschlands;E;NW;103;Solingen – Remscheid – Wuppertal II;38,2;;NW;;22;X
+;;Hartmann;Sebastian;m;1977;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;15;NW;97;;X
+;;Hartmann;Verena;w;1974;Dipl.-Kommunikationswirtin;AfD;Alternative für Deutschland;Z;SN;;;;9;;;;
+Dr.;;Hartwig;Roland;m;1954;Rechtsanwalt;AfD;Alternative für Deutschland;Z;NW;;;;14;NW;100;;
+;;Haßelmann;Britta;w;1961;Dipl.-Sozialarbeiterin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;1;NW;132;;X
+;;Hauer;Matthias;m;1977;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NW;120;Essen III;37,1;;NW;;13;X
+;;Haug;Jochen;m;1973;Rechtsanwalt;AfD;Alternative für Deutschland;Z;NW;;;;2;NW;94;;
+;;Hauptmann;Mark;m;1984;MdB / Politikwissenschaftler;CDU;Christlich Demokratische Union Deutschlands;E;TH;196;Suhl – Schmalkalden-Meiningen – Hildburghausen – Sonneberg;33,5;;;;;X
+;;Hebner;Martin;m;1959;IT-Unternehmensberater;AfD;Alternative für Deutschland;Z;BY;;;;1;BY;224;;
+;;Heidenblut;Dirk;m;1961;Geschäftsführer;SPD;Sozialdemokratische Partei Deutschlands;E;NW;119;Essen II;37,3;;NW;;57;X
+Dr.;;Heider;Matthias;m;1966;Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NW;149;Olpe – Märkischer Kreis I;47,9;;NW;;45;X
+;;Heil;Hubertus;m;1972;MdB / Politikwissenschaftler;SPD;Sozialdemokratische Partei Deutschlands;E;NI;45;Gifhorn – Peine;37,8;;NI;;5;X
+;;Heil;Mechthild;w;1961;MdB / Dipl.-Ing. Architektur;CDU;Christlich Demokratische Union Deutschlands;E;RP;198;Ahrweiler;42,8;;RP;;5;X
+;;Heilmann;Thomas;m;1964;Volljurist;CDU;Christlich Demokratische Union Deutschlands;E;BE;79;Berlin-Steglitz-Zehlendorf;35,4;;BE;;4;
+;;Heinrich;Frank;m;1964;Theologe;CDU;Christlich Demokratische Union Deutschlands;E;SN;162;Chemnitz;26,6;;SN;;9;X
+;;Heinrich;Gabriela;w;1963;MdB / Redakteurin;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;18;BY;244;;X
+;;Held;Marcus;m;1977;MdB / Volljurist;SPD;Sozialdemokratische Partei Deutschlands;Z;RP;;;;4;RP;206;;X
+;;Helfrich;Mark;m;1978;MdB / Betriebswirt;CDU;Christlich Demokratische Union Deutschlands;E;SH;3;Steinburg – Dithmarschen Süd;41,9;;SH;;7;X
+;;Helling-Plahr;Katrin;w;1986;Rechtsanwältin;FDP;Freie Demokratische Partei;Z;NW;;;;17;NW;138;;
+;;Hellmich;Wolfgang;m;1958;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;3;NW;146;;X
+;;Hemmelgarn;Udo Theodor;m;1959;selbst. Kaufmann;AfD;Alternative für Deutschland;Z;NW;;;;8;NW;131;;
+Dr.;;Hendricks;Barbara;w;1952;Bundesministerin;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;2;NW;112;;X
+;;Henke;Rudolf;m;1954;MdB / Arzt;CDU;Christlich Demokratische Union Deutschlands;E;NW;87;Aachen I;33,7;;NW;;30;X
+;;Hennrich;Michael;m;1965;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;262;Nürtingen;39,4;;;;;X
+;;Henrichmann;Marc;m;1976;Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NW;127;Coesfeld – Steinfurt II;51,6;;;;;
+;;Herbrand;Markus;m;1971;Steuerberater;FDP;Freie Demokratische Partei;Z;NW;;;;11;NW;92;;
+;;Herbst;Torsten;m;1973;Dipl.-Kaufmann (FH);FDP;Freie Demokratische Partei;Z;SN;;;;1;SN;156;;
+;;Herdt;Waldemar;m;1962;Unternehmer;AfD;Alternative für Deutschland;Z;NI;;;;7;NI;38;;
+;;Herrmann;Klaus Lars;m;1977;Polizeibeamter;AfD;Alternative für Deutschland;Z;SN;;;;10;SN;154;;
+;;Herzog;Gustav;m;1958;MdB / Chemielaborant;SPD;Sozialdemokratische Partei Deutschlands;E;RP;209;Kaiserslautern;33,9;;RP;;2;X
+;;Hess;Martin Alexander;m;1971;Polizeibeamter;AfD;Alternative für Deutschland;Z;BW;;;;7;BW;265;;
+;;Hessel;Katja;w;1972;Rechtsanwältin;FDP;Freie Demokratische Partei;Z;BY;;;;3;BY;244;;
+Prof. Dr.;;Heßenkemper;Heiko;m;1956;Physiker;AfD;Alternative für Deutschland;Z;SN;;;;6;SN;161;;
+;;Heveling;Ansgar;m;1972;MdB / Oberregierungsrat a. D.;CDU;Christlich Demokratische Union Deutschlands;E;NW;110;Krefeld I – Neuss II;42,4;;;;;X
+;;Hiller-Ohm;Gabriele;w;1953;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;SH;;;;5;SH;11;;X
+;;Hilse;Karsten;m;1964;Beamter;AfD;Alternative für Deutschland;E;SN;156;Bautzen I;33,2;;SN;;8;
+;;Hirte;Christian;m;1976;Rechtsanwalt / Fachanwalt für Steuerrecht;CDU;Christlich Demokratische Union Deutschlands;E;TH;190;Eisenach – Wartburgkreis – Unstrut-Hainich-Kreis;34,4;;TH;;4;X
+Prof. Dr.;;Hirte;Heribert;m;1958;Universitätsprofessor;CDU;Christlich Demokratische Union Deutschlands;E;NW;94;Köln II;34,9;;NW;;54;X
+;;Hitschler;Thomas;m;1982;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;RP;;;;6;RP;211;;X
+;;Höchst;Nicole;w;1970;Regierungsschuldirektorin;AfD;Alternative für Deutschland;Z;RP;;;;4;RP;201;;
+Dr.;;Hocker;Gero Clemens;m;1975;MdL / Dipl.-Ökonom;FDP;Freie Demokratische Partei;Z;NI;;;;4;NI;34;;
+;;Höferlin;Manuel;m;1973;selbst. Unternehmer;FDP;Freie Demokratische Partei;Z;RP;;;;1;RP;206;;
+;;Hoffmann;Alexander;m;1975;MdB / Oberrechtsrat;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;249;Main-Spessart;46,6;;;;;X
+Dr.;;Hoffmann;Bettina;w;1960;Dipl.-Biologin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;HE;;;;5;HE;170;;
+Dr.;;Hoffmann;Christoph;m;1957;Bürgermeister;FDP;Freie Demokratische Partei;Z;BW;;;;10;BW;282;;
+Dr.;;Hofreiter;Anton;m;1970;MdB / Dipl.-Biologe;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;2;BY;221;;X
+Dr.;;Högl;Eva;w;1969;MdB / Juristin;SPD;Sozialdemokratische Partei Deutschlands;E;BE;75;Berlin-Mitte;23,5;;BE;;1;X
+;;Hohmann;Martin;m;1948;Bürgermeister a. D.;AfD;Alternative für Deutschland;Z;HE;;;;6;HE;174;;
+;;Höhn;Matthias;m;1975;MdL;DIE LINKE;DIE LINKE;Z;ST;;;;4;ST;66;;
+Dr.;;Hollnagel;Bruno;m;1948;Wirtschaftswissenschaftler;AfD;Alternative für Deutschland;Z;SH;;;;1;SH;10;;
+;;Holm;Leif-Erik;m;1970;Ökonom (M. Sc.) / Journalist;AfD;Alternative für Deutschland;Z;MV;;;;1;MV;15;;
+;;Holmeier;Karl;m;1956;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;234;Schwandorf;48,5;;;;;X
+;von;Holtz;Ottmar;m;1961;MdL / Dipl.-Ökonom;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NI;;;;6;NI;48;;
+Dr.;;Hoppenstedt;Hendrik;m;1972;MdB / Bürgermeister a. D.;CDU;Christlich Demokratische Union Deutschlands;E;NI;43;Hannover-Land I;40,1;;NI;;12;X
+;;Houben;Reinhard;m;1960;Unternehmer;FDP;Freie Demokratische Partei;Z;NW;;;;8;NW;93;;
+;;Huber;Johannes;m;1987;Finanzbuchhalter;AfD;Alternative für Deutschland;Z;BY;;;;13;BY;214;;
+;;Hunko;Andrej;m;1963;Mediengestalter;DIE LINKE;DIE LINKE;Z;NW;;;;4;NW;87;;X
+;;Ihnen;Ulla;w;1956;Staatssekretärin a. D. / Juristin;FDP;Freie Demokratische Partei;Z;NI;;;;5;NI;42;;
+;;Irlstorfer;Erich;m;1970;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;214;Freising;43;;;;;X
+;;Irmer;Hans-Jürgen;m;1952;Oberstudienrat;CDU;Christlich Demokratische Union Deutschlands;E;HE;172;Lahn-Dill;38,3;;HE;;17;
+;;Jacobi;Fabian;m;1973;Rechtsanwalt;AfD;Alternative für Deutschland;Z;NW;;;;6;NW;93;;
+;;Janecek;Dieter;m;1976;MdB / Dipl.-Politologe;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;6;BY;220;;X
+;;Jarzombek;Thomas;m;1973;MdB / IT-Berater;CDU;Christlich Demokratische Union Deutschlands;E;NW;106;Düsseldorf I;40,4;;NW;;12;X
+;;Jelpke;Ursula (Ulla);w;1951;Journalistin;DIE LINKE;DIE LINKE;Z;NW;;;;5;NW;142;;X
+Dr.;;Jongen;Marc Stephan;m;1968;akadem. Mitarbeiter;AfD;Alternative für Deutschland;Z;BW;;;;3;BW;266;;
+;;Jung;Andreas;m;1975;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;287;Konstanz;44,8;;;;;X
+Dr.;;Jung;Christian;m;1977;Studiendirektor;FDP;Freie Demokratische Partei;Z;BW;;;;12;BW;272;;
+;;Jung;Ingmar Ludwig;m;1978;Staatssekretär;CDU;Christlich Demokratische Union Deutschlands;E;HE;179;Wiesbaden;34,3;;HE;;16;
+;;Junge;Frank Michael;m;1967;Dipl.-Sportlehrer;SPD;Sozialdemokratische Partei Deutschlands;Z;MV;;;;2;MV;13;;X
+;;Juratovic;Josip;m;1959;MdB / Kfz.-Mechaniker;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;16;BW;267;;X
+;;Jurk;Thomas Edmund;m;1962;MdB / Funkmechaniker;SPD;Sozialdemokratische Partei Deutschlands;Z;SN;;;;2;SN;157;;X
+;;Kaczmarek;Oliver;m;1970;Oberregierungsrat;SPD;Sozialdemokratische Partei Deutschlands;E;NW;144;Unna I;38,8;;NW;;50;X
+;;Kahrs;Johannes;m;1963;Angestellter;SPD;Sozialdemokratische Partei Deutschlands;E;HH;18;Hamburg-Mitte;30,9;;HH;;2;X
+;;Kaiser;Elisabeth;w;1987;Pressesprecherin;SPD;Sozialdemokratische Partei Deutschlands;Z;TH;;;;2;TH;194;;
+;;Kamann;Uwe;m;1958;Elektroniker / Kaufmann;AfD;Alternative für Deutschland;Z;NW;;;;9;NW;117;;
+Dr.;;Kappert-Gonther;Kirsten;w;1966;Ärztin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;HB;;;;1;HB;54;;
+;;Kapschack;Ralf;m;1954;Journalist;SPD;Sozialdemokratische Partei Deutschlands;E;NW;139;Ennepe-Ruhr-Kreis II;36,7;;NW;;41;X
+;;Karl;Alois;m;1950;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;232;Amberg;47,7;;;;;X
+;;Karliczek;Anja;w;1971;MdB / Geschäftsführerin Hotellerie;CDU;Christlich Demokratische Union Deutschlands;E;NW;128;Steinfurt III;44,8;;NW;;11;X
+;;Kartes;Jens Torbjörn;m;1979;Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;RP;207;Ludwigshafen/Frankenthal;32,1;;RP;;15;
+;;Kassner;Karin Kerstin;w;1958;Dipl.-Ökonomin;DIE LINKE;DIE LINKE;Z;MV;;;;3;MV;15;;X
+;;Katzmarek;Gabriele;w;1960;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;11;BW;273;;X
+;;Kauder;Volker;m;1949;MdB / Jurist;CDU;Christlich Demokratische Union Deutschlands;E;BW;285;Rottweil – Tuttlingen;43;;BW;;3;X
+Dr.;;Kaufmann;Stefan;m;1969;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;BW;258;Stuttgart I;32;;BW;;7;X
+;;Kekeritz;Uwe;m;1953;MdB / Dipl.-Volkswirt;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;4;BY;243;;X
+;;Kelber;Ulrich;m;1968;MdB / Dipl.-Informatiker;SPD;Sozialdemokratische Partei Deutschlands;E;NW;96;Bonn;34,9;;;;;X
+;;Kemmer;Ronja;w;1989;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;291;Ulm;42,7;;;;;X
+;;Kemmerich;Thomas L.;m;1965;Unternehmer;FDP;Freie Demokratische Partei;Z;TH;;;;1;TH;193;;
+Dr.;;Kessler;Achim Dieter;m;1964;Angestellter;DIE LINKE;DIE LINKE;Z;HE;;;;2;HE;182;;
+;;Kestner;Jens;m;1971;Bestatter;AfD;Alternative für Deutschland;Z;NI;;;;6;NI;52;;
+;;Keul;Katja;w;1969;MdB / Rechtsanwältin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NI;;;;5;NI;40;;X
+;;Keuter;Stefan;m;1972;Bankkaufmann;AfD;Alternative für Deutschland;Z;NW;;;;11;NW;120;;
+;;Kiesewetter;Roderich;m;1963;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;270;Aalen – Heidenheim;46,4;;;;;X
+;;Kießling;Michael Hannes;m;1973;Erster Bürgermeister;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;224;Starnberg – Landsberg am Lech;42,1;;BY;;40;
+;;Kindler;Sven-Christian;m;1985;MdB / Betriebswirt;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NI;;;;4;NI;42;;X
+Dr.;;Kippels;Georg;m;1959;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NW;91;Rhein-Erft-Kreis I;39,2;;NW;;32;X
+;;Kipping;Katja;w;1978;MdB / Literaturwissenschaftlerin;DIE LINKE;DIE LINKE;Z;SN;;;;1;SN;159;;X
+;;Kiziltepe;Cansel;w;1975;MdB / Dipl.-Volkswirtin;SPD;Sozialdemokratische Partei Deutschlands;Z;BE;;;;3;BE;83;;X
+;;Klare;Arno;m;1952;Lehrer;SPD;Sozialdemokratische Partei Deutschlands;E;NW;118;Mülheim – Essen I;34,9;;NW;;55;X
+;;Klein;Karsten;m;1977;Dipl.-Kaufmann;FDP;Freie Demokratische Partei;Z;BY;;;;2;BY;247;;
+;;Klein;Volkmar;m;1960;MdB / Dipl.-Volkswirt;CDU;Christlich Demokratische Union Deutschlands;E;NW;148;Siegen-Wittgenstein;40,1;;NW;;24;X
+;;Klein-Schmeink;Maria;w;1958;Soziologin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;9;NW;129;;X
+;;Kleinwächter;Norbert;m;1986;Lehrer;AfD;Alternative für Deutschland;Z;BB;;;;5;;;;
+;;Klingbeil;Lars;m;1978;MdB;SPD;Sozialdemokratische Partei Deutschlands;E;NI;35;Rotenburg I – Heidekreis;41,2;;NI;;7;X
+Dr.;;Klinge;Marcel;m;1980;Geschäftsführer Landtagsfraktion;FDP;Freie Demokratische Partei;Z;BW;;;;6;BW;286;;
+;;Kloke;Katharina;w;1987;Rechtsreferendarin;FDP;Freie Demokratische Partei;Z;NW;;;;20;NW;90;;
+;;Kluckert;Daniela;w;1980;Dipl.-Volkswirtin / Ministerialreferentin;FDP;Freie Demokratische Partei;Z;BE;;;;2;BE;76;;
+;;Knoerig;Axel;m;1967;MdB;CDU;Christlich Demokratische Union Deutschlands;E;NI;33;Diepholz – Nienburg I;44,6;;NI;;27;X
+;;Kober;Pascal;m;1971;Militärseelsorger;FDP;Freie Demokratische Partei;Z;BW;;;;4;BW;289;;
+;;Koeppen;Jens;m;1962;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BB;57;Uckermark – Barnim I;30,6;;BB;;2;X
+Dr.;;Kofler;Bärbel;w;1967;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;8;BY;225;;X
+Dr.;;Köhler;Lukas;m;1986;wiss. Mitarbeiter;FDP;Freie Demokratische Partei;Z;BY;;;;6;BY;220;;
+;;Kolbe;Daniela;w;1980;MdB / Dipl.-Physikerin;SPD;Sozialdemokratische Partei Deutschlands;Z;SN;;;;1;SN;152;;X
+;;Komning;Enrico;m;1968;Rechtsanwalt;AfD;Alternative für Deutschland;Z;MV;;;;2;MV;16;;
+;;König;Jörn;m;1967;Dipl.-Ingenieur (MBA);AfD;Alternative für Deutschland;Z;NI;;;;2;NI;41;;
+;;Konrad;Carina;w;1982;Dipl.-Agraringenieurin (FH);FDP;Freie Demokratische Partei;Z;RP;;;;4;RP;200;;
+;;Koob;Markus Benjamin;m;1977;MdB;CDU;Christlich Demokratische Union Deutschlands;E;HE;176;Hochtaunus;39,9;;HE;;15;X
+;;Körber;Carsten;m;1979;MdB / Betriebswirt;CDU;Christlich Demokratische Union Deutschlands;E;SN;165;Zwickau;33,7;;SN;;5;X
+;;Korkmaz;Elvan;w;1985;Dipl.-Verwaltungswirtin;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;16;NW;131;;
+;;Korte;Jan;m;1977;MdB / Politikwissenschaftler (M. A.);DIE LINKE;DIE LINKE;Z;ST;;;;2;ST;71;;X
+;;Kotré;Steffen;m;1971;Referent / Unternehmensberater;AfD;Alternative für Deutschland;Z;BB;;;;4;;;;
+;;Kotting-Uhl;Sylvia;w;1952;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;3;BW;271;;X
+Dr.;;Kraft;Rainer;m;1974;Dipl.-Chemiker;AfD;Alternative für Deutschland;Z;BY;;;;12;BY;253;;
+;;Kramme;Anette;w;1967;MdB / parl. Staatssekretärin;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;2;BY;237;;X
+;;Krauß;Alexander Gerd;m;1975;MdL / Politikwissenschaftler;CDU;Christlich Demokratische Union Deutschlands;E;SN;164;Erzgebirgskreis I;34,7;;;;;
+;;Krellmann;Jutta;w;1956;Gewerkschaftssekretärin;DIE LINKE;DIE LINKE;Z;NI;;;;3;NI;46;;X
+;;Krichbaum;Gunther;m;1964;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;279;Pforzheim;36,4;;;;;X
+Dr.;;Krings;Günter;m;1969;MdB / Jurist;CDU;Christlich Demokratische Union Deutschlands;E;NW;109;Mönchengladbach;44,3;;NW;;5;X
+;;Krischer;Oliver Michael;m;1969;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;2;NW;90;;X
+;;Kruse;Rüdiger;m;1961;Geschäftsführer;CDU;Christlich Demokratische Union Deutschlands;Z;HH;;;;2;HH;20;;X
+;;Kubicki;Wolfgang;m;1952;Rechtsanwalt / Dipl.-Volkswirt;FDP;Freie Demokratische Partei;Z;SH;;;;1;SH;3;;
+;;Kuffer;Michael;m;1972;Rechtsanwalt;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;219;München-Süd;33;;BY;;24;
+;;Kuhle;Konstantin Elias;m;1989;Rechtsanwalt;FDP;Freie Demokratische Partei;Z;NI;;;;6;NI;53;;
+;;Kühn;Christian;m;1979;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;6;BW;290;;X
+;;Kühn;Stephan;m;1979;MdB / Dipl.-Soziologe;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;SN;;;;2;SN;160;;X
+Dr.;;Kühne;Roy;m;1967;MdB / Dipl.-Sporttherapeut / Physiotherapeut;CDU;Christlich Demokratische Union Deutschlands;E;NI;52;Goslar – Northeim – Osterode;39,8;;NI;;23;X
+;;Kulitz;Alexander;m;1981;Unternehmer;FDP;Freie Demokratische Partei;Z;BW;;;;11;BW;291;;
+;;Künast;Renate;w;1955;Rechtsanwältin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BE;;;;3;BE;81;;X
+;;Kurth;Markus;m;1966;Dipl.-Politikwissenschaftler;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;8;NW;142;;X
+;;Lambrecht;Christine;w;1965;Rechtsanwältin;SPD;Sozialdemokratische Partei Deutschlands;Z;HE;;;;2;HE;188;;X
+;Graf;Lambsdorff;Alexander;m;1966;Diplomat;FDP;Freie Demokratische Partei;Z;NW;;;;3;NW;96;;
+Prof. h. c. Dr.;;Lamers;Karl;m;1951;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;BW;274;Heidelberg;32,7;;BW;;8;X
+;;Lämmel;Gottfried Andreas;m;1959;MdB;CDU;Christlich Demokratische Union Deutschlands;E;SN;159;Dresden I;24,6;;;;;X
+;;Landgraf;Katharina;w;1954;MdB;CDU;Christlich Demokratische Union Deutschlands;E;SN;154;Leipzig-Land;34,1;;SN;;3;X
+;;Lange;Christian;m;1964;MdB / parl. Staatssekretär;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;2;BW;269;;X
+;;Lange;Ulrich;m;1969;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;254;Donau-Ries;47;;;;;X
+Dr.;;Launert;Silke;w;1976;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;237;Bayreuth;46,5;;BY;;18;X
+Prof. Dr.;;Lauterbach;Karl;m;1963;MdB;SPD;Sozialdemokratische Partei Deutschlands;E;NW;101;Leverkusen – Köln IV;38,7;;NW;;58;X
+;;Lay;Caren Nicole;w;1972;Soziologin;DIE LINKE;DIE LINKE;Z;SN;;;;3;SN;156;;X
+;;Lazar;Monika;w;1967;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;SN;;;;1;SN;153;;X
+;;Lechte;Ulrich;m;1977;Betriebswirt (VWA);FDP;Freie Demokratische Partei;Z;BY;;;;8;BY;233;;
+;;Lehmann;Jens;m;1967;Erzieher;CDU;Christlich Demokratische Union Deutschlands;E;SN;152;Leipzig I;27,5;;;;;
+;;Lehmann;Sven;m;1979;Politikwissenschaftler / Personalentwickler ö. D.;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;4;NW;94;;
+;;Lehrieder;Paul;m;1959;MdB / Rechtsanwalt;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;251;Würzburg;42,2;;BY;;36;X
+;;Leidig;Sabine;w;1961;MdB;DIE LINKE;DIE LINKE;Z;HE;;;;1;HE;169;;X
+Dr.;;Leikert;Katja;w;1975;MdB;CDU;Christlich Demokratische Union Deutschlands;E;HE;180;Hanau;35,3;;HE;;6;X
+;;Lemke;Steffi;w;1968;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;ST;;;;1;ST;70;;X
+;;Lenkert;Ralph;m;1967;MdB / Werkzeugmacher / Maschinenbautechniker;DIE LINKE;DIE LINKE;Z;TH;;;;2;TH;191;;X
+Dr.;;Lenz;Andreas;m;1981;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;213;Erding – Ebersberg;48,2;;;;;X
+;;Leutert;Michael Gerhard;m;1974;Dipl.-Soziologe;DIE LINKE;DIE LINKE;Z;SN;;;;4;SN;162;;X
+Dr.;von der;Leyen;Ursula;w;1958;MdB / Bundesministerin / Ärztin;CDU;Christlich Demokratische Union Deutschlands;Z;NI;;;;1;NI;42;;X
+;;Lezius;Antje;w;1960;MdB;CDU;Christlich Demokratische Union Deutschlands;E;RP;201;Kreuznach;37;;RP;;9;X
+;;Liebich;Stefan;m;1972;MdB / Dipl.-Betriebswirt;DIE LINKE;DIE LINKE;E;BE;76;Berlin-Pankow;28,8;;BE;;2;X
+;;Lindh;Helge;m;1976;wiss. Mitarbeiter;SPD;Sozialdemokratische Partei Deutschlands;E;NW;102;Wuppertal I;31,5;;NW;;31;
+;;Lindholz;Andrea;w;1970;MdB / Rechtsanwältin;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;247;Aschaffenburg;48,1;;BY;;14;X
+;;Lindner;Christian;m;1979;MdL;FDP;Freie Demokratische Partei;Z;NW;;;;1;NW;100;;
+Dr.;;Lindner;Tobias;m;1982;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;RP;;;;2;RP;211;;X
+;;Link;Michael Georg;m;1963;Staatsminister a. D.;FDP;Freie Demokratische Partei;Z;BW;;;;3;BW;267;;
+Dr.;;Linnemann;Carsten;m;1977;MdB / Dipl.-Volkswirt;CDU;Christlich Demokratische Union Deutschlands;E;NW;137;Paderborn – Gütersloh III;53,3;;;;;X
+;;Lips;Patricia;w;1963;Handelsfachwirtin;CDU;Christlich Demokratische Union Deutschlands;E;HE;187;Odenwald;36,1;;HE;;3;X
+;;Lischka;Burkhard Karl Erich;m;1965;MdB / Jurist;SPD;Sozialdemokratische Partei Deutschlands;Z;ST;;;;1;ST;69;;X
+;;Löbel;Nikolas;m;1986;Geschäftsführer;CDU;Christlich Demokratische Union Deutschlands;E;BW;275;Mannheim;29,3;;;;;
+;;Loos;Bernhard;m;1955;mittelständ. Unternehmer;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;217;München-Nord;32,2;;BY;;20;
+Dr.;;Lötzsch;Gesine;w;1961;MdB / Philologin;DIE LINKE;DIE LINKE;E;BE;86;Berlin-Lichtenberg;34,8;;BE;;3;X
+;;Lucassen;Hans-Rüdiger;m;1951;Geschäftsführer;AfD;Alternative für Deutschland;Z;NW;;;;7;NW;92;;
+Dr.;;Luczak;Jan-Marco;m;1975;Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;BE;81;Berlin-Tempelhof-Schöneberg;28,9;;BE;;3;X
+;;Ludwig;Daniela;w;1975;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;222;Rosenheim;45,9;;BY;;7;X
+;;Lühmann;Kirsten;w;1964;MdB / Polizistin;SPD;Sozialdemokratische Partei Deutschlands;Z;NI;;;;10;NI;44;;X
+;;Luksic;Oliver;m;1979;Unternehmensberater;FDP;Freie Demokratische Partei;Z;SL;;;;1;SL;298;;
+;;Lutze;Thomas;m;1969;MdB / Maschinenbauer;DIE LINKE;DIE LINKE;Z;SL;;;;1;;;;X
+;;Maag;Karin;w;1962;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;259;Stuttgart II;33,5;;;;;X
+;;Maas;Heiko Josef;m;1966;Jurist;SPD;Sozialdemokratische Partei Deutschlands;Z;SL;;;;1;SL;297;;
+;;Magnitz;Frank Rüdiger Heinrich;m;1952;Kaufmann;AfD;Alternative für Deutschland;Z;HB;;;;1;HB;55;;
+;;Magwas;Yvonne;w;1979;MdB;CDU;Christlich Demokratische Union Deutschlands;E;SN;166;Vogtlandkreis;35;;SN;;4;X
+;;Maier;Jens;m;1962;Richter;AfD;Alternative für Deutschland;Z;SN;;;;2;SN;159;;
+Prof. Dr.;;Maier;Lothar;m;1944;Hochschullehrer;AfD;Alternative für Deutschland;Z;BW;;;;2;BW;259;;
+Dr.;de;Maizière;Thomas;m;1954;MdB / Bundesminister;CDU;Christlich Demokratische Union Deutschlands;E;SN;155;Meißen;36,7;;SN;;1;X
+Dr.;;Malsack-Winkemann;Birgit;w;1964;Richterin;AfD;Alternative für Deutschland;Z;BE;;;;4;;;;
+Dr.;;Mannes;Astrid;w;1967;Bürgermeisterin;CDU;Christlich Demokratische Union Deutschlands;E;HE;186;Darmstadt;30,7;;HE;;12;
+;;Mansmann;Till Berthold;m;1968;Dipl.-Physiker;FDP;Freie Demokratische Partei;Z;HE;;;;5;HE;188;;
+;;Marks;Caren;w;1963;MdB / Dipl.-Geografin;SPD;Sozialdemokratische Partei Deutschlands;Z;NI;;;;6;NI;43;;X
+Dr.;;Martens;Jürgen Andreas Michael;m;1959;Rechtsanwalt / Staatsminister a. D.;FDP;Freie Demokratische Partei;Z;SN;;;;2;SN;165;;
+;von der;Marwitz;Hans-Georg;m;1961;MdB / Landwirt;CDU;Christlich Demokratische Union Deutschlands;E;BB;59;Märkisch-Oderland – Barnim II;28,4;;BB;;9;X
+;De;Masi;Fabio Valeriano Lanfranco;m;1980;MdEP / Dipl.-Volkswirt;DIE LINKE;DIE LINKE;Z;HH;;;;1;;;;
+;;Mast;Katja;w;1971;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;7;BW;279;;X
+;;Matschie;Christoph;m;1961;Theologe;SPD;Sozialdemokratische Partei Deutschlands;Z;TH;;;;3;TH;191;;
+;;Mattfeldt;Andreas;m;1969;MdB / Industriekaufmann;CDU;Christlich Demokratische Union Deutschlands;E;NI;34;Osterholz – Verden;39,2;;NI;;20;X
+;;Mattheis;Hildegard;w;1954;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;5;BW;291;;X
+;;Mayer;Stephan;m;1973;MdB / Rechtsanwalt;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;212;Altötting;54,5;;;;;X
+;;Meiser;Pascal;m;1975;Dipl.-Politikwissenschaftler;DIE LINKE;DIE LINKE;Z;BE;;;;4;BE;83;;
+Dr.;;Meister;Michael Günther;m;1961;Dipl.-Mathematiker;CDU;Christlich Demokratische Union Deutschlands;E;HE;188;Bergstraße;38,9;;HE;;2;X
+Dr.;;Merkel;Angela Dorothea;w;1954;MdB;CDU;Christlich Demokratische Union Deutschlands;E;MV;15;Vorpommern-Rügen – Vorpommern-Greifswald I;44;;MV;;1;X
+;;Metzler;Jan;m;1981;Winzer / Dipl.-Betriebswirt (FH);CDU;Christlich Demokratische Union Deutschlands;E;RP;206;Worms;41,1;;RP;;6;X
+;;Meyer;Christoph;m;1975;Rechtsanwalt / ltd. Angestellter;FDP;Freie Demokratische Partei;Z;BE;;;;1;BE;80;;
+;;Miazga;Corinna;w;1983;Angestellte;AfD;Alternative für Deutschland;Z;BY;;;;3;;;;
+Dr. h. c.;;Michelbach;Hans Georg;m;1949;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;238;Coburg;45,3;;BY;;15;X
+Dr.;;Middelberg;Mathias;m;1964;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NI;39;Stadt Osnabrück;40,3;;NI;;5;X
+Dr.;;Miersch;Matthias;m;1968;MdB / Rechtsanwalt;SPD;Sozialdemokratische Partei Deutschlands;E;NI;47;Hannover-Land II;37;;NI;;3;X
+;;Mieruch;Mario;m;1975;Dipl.-Ing. Mechatronik (B. A.);AfD;Alternative für Deutschland;Z;NW;;;;12;NW;124;;
+;;Mihalic;Irene;w;1976;Polizeibeamtin a. D.;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;5;NW;123;;X
+;;Mindrup;Klaus;m;1964;MdB / Dipl.-Biologe;SPD;Sozialdemokratische Partei Deutschlands;Z;BE;;;;4;BE;76;;X
+;;Mittag;Susanne;w;1958;Polizeibeamtin;SPD;Sozialdemokratische Partei Deutschlands;Z;NI;;;;2;NI;28;;X
+;;Mohamed Ali;Amira;w;1980;Rechtsanwältin;DIE LINKE;DIE LINKE;Z;NI;;;;5;NI;27;;
+;;Möhring;Cornelia;w;1960;Dipl.-Sozialökonomin;DIE LINKE;DIE LINKE;Z;SH;;;;1;SH;7;;X
+;;Mohrs;Falko;m;1984;Dipl.-Kaufmann (FH) / Speditionskaufmann;SPD;Sozialdemokratische Partei Deutschlands;E;NI;51;Helmstedt – Wolfsburg;38;;NI;;19;
+;;Moll;Claudia;w;1968;Altenpflegerin;SPD;Sozialdemokratische Partei Deutschlands;E;NW;88;Aachen II;36,9;;NW;;38;
+;;Möller;Siemtje;w;1983;Lehrerin (StRin);SPD;Sozialdemokratische Partei Deutschlands;E;NI;26;Friesland – Wilhelmshaven – Wittmund;39,7;;NI;;18;
+;;Monstadt;Dietrich;m;1957;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;MV;12;Schwerin – Ludwigslust-Parchim I – Nordwestmecklenburg I;32,1;;MV;;3;X
+;;Möring;Karsten;m;1949;MdB;CDU;Christlich Demokratische Union Deutschlands;E;NW;93;Köln I;31,6;;NW;;42;X
+;;Mortler;Marlene;w;1955;MdB / Hauswirtschaftsmeisterin;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;246;Roth;44,5;;BY;;9;X
+;;Motschmann;Elisabeth Charlotte;w;1952;MdB / Staatsrätin a. D.;CDU;Christlich Demokratische Union Deutschlands;Z;HB;;;;1;HB;54;;X
+;;Movassat;Niema;m;1984;Jurist;DIE LINKE;DIE LINKE;Z;NW;;;;6;NW;117;;X
+;;Mrosek;Andreas;m;1958;MdL / Dipl.-Ing. für Schiffsführung;AfD;Alternative für Deutschland;Z;ST;;;;4;ST;70;;
+;;Müller;Alexander;m;1969;Dipl.-Informatiker;FDP;Freie Demokratische Partei;Z;HE;;;;6;HE;178;;
+;;Müller;Axel;m;1963;Richter;CDU;Christlich Demokratische Union Deutschlands;E;BW;294;Ravensburg;38,5;;;;;
+;;Müller;Bettina;w;1959;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;HE;;;;8;HE;175;;X
+;;Müller;Carsten;m;1970;Rechtsanwalt / Bankkaufmann;CDU;Christlich Demokratische Union Deutschlands;Z;NI;;;;8;NI;50;;X
+;;Müller;Claudia;w;1981;Betriebswirtin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;MV;;;;1;MV;15;;
+;;Müller;Detlef;m;1964;Lokomotivführer;SPD;Sozialdemokratische Partei Deutschlands;Z;SN;;;;4;SN;162;;X
+Dr.;;Müller;Gerhard (Gerd);m;1955;MdB / Bundesminister;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;256;Oberallgäu;50,4;;BY;;5;X
+;;Müller;Hansjörg Gerhard Georg;m;1968;selbst. Interimmanager;AfD;Alternative für Deutschland;Z;BY;;;;6;BY;225;;
+;;Müller;Norbert;m;1986;MdB / Student;DIE LINKE;DIE LINKE;Z;BB;;;;4;BB;61;;X
+;;Müller;Sepp;m;1989;Dipl.-Bankbetriebswirt (FS);CDU;Christlich Demokratische Union Deutschlands;E;ST;70;Dessau – Wittenberg;35,2;;ST;;6;
+;;Müller;Stefan;m;1975;parl. Staatssekretär;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;242;Erlangen;42,7;;BY;;11;X
+;;Müller-Böhm;Roman;m;1992;Student;FDP;Freie Demokratische Partei;Z;NW;;;;18;NW;117;;
+;;Müller-Gemmeke;Beate;w;1960;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;7;BW;289;;X
+;;Müller-Rosentritt;Frank;m;1982;ltd. Angestellter / Geschäftsführer;FDP;Freie Demokratische Partei;Z;SN;;;;3;SN;162;;
+;;Müntefering;Michelle;w;1980;Journalistin;SPD;Sozialdemokratische Partei Deutschlands;E;NW;141;Herne – Bochum II;41,9;;NW;;30;X
+;;Münz;Volker;m;1964;Bankkaufmann;AfD;Alternative für Deutschland;Z;BW;;;;8;BW;263;;
+;;Münzenmaier;Sebastian;m;1989;Geschäftsführer;AfD;Alternative für Deutschland;Z;RP;;;;1;RP;205;;
+Dr.;;Mützenich;Rolf;m;1959;Politikwissenschaftler;SPD;Sozialdemokratische Partei Deutschlands;E;NW;95;Köln III;32,3;;NW;;60;X
+;;Nahles;Andrea;w;1970;MdB / Literaturwissenschaftlerin (M. A.);SPD;Sozialdemokratische Partei Deutschlands;Z;RP;;;;1;RP;198;;X
+;;Nastic;Zaklin;w;1980;Angehörigenpflegerin;DIE LINKE;DIE LINKE;Z;HH;;;;2;HH;20;;
+;;Nestle;Ingrid;w;1977;Dipl.-Wirtschaftsingenieurin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;SH;;;;3;SH;3;;
+Dr.;;Neu;Alexander;m;1969;Politikwissenschaftler;DIE LINKE;DIE LINKE;Z;NW;;;;10;NW;97;;X
+;;Neumann;Christoph;m;1964;Dipl.-Ing. Pädagoge;AfD;Alternative für Deutschland;Z;SN;;;;11;SN;152;;
+Prof. Dr.;;Neumann;Martin;m;1956;Hochschullehrer / beratender Ingenieur;FDP;Freie Demokratische Partei;Z;BB;;;;2;BB;65;;
+Dr.;;Nick;Andreas;m;1967;MdB / Dipl.-Kaufmann / M.I.P.P.;CDU;Christlich Demokratische Union Deutschlands;E;RP;204;Montabaur;43,3;;RP;;12;X
+;;Nicolaisen;Petra;w;1965;Industriekauffrau;CDU;Christlich Demokratische Union Deutschlands;E;SH;1;Flensburg – Schleswig;40;;;;;
+;;Nietan;Dietmar;m;1964;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;9;NW;90;;X
+;;Nissen;Ulrike;w;1959;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;HE;;;;6;HE;183;;X
+;;Noll;Michaela;w;1959;MdB / Rechtsanwältin;CDU;Christlich Demokratische Union Deutschlands;E;NW;104;Mettmann I;44,6;;NW;;4;X
+;;Nolte;Jan Ralf;m;1988;Soldat;AfD;Alternative für Deutschland;Z;HE;;;;4;HE;167;;
+;;Nord;Thomas Hans;m;1957;MdB / Kulturwissenschaftler;DIE LINKE;DIE LINKE;Z;BB;;;;2;BB;63;;X
+Dr.;von;Notz;Konstantin;m;1971;MdB / Jurist;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;SH;;;;2;SH;10;;X
+;;Nouripour;Omid;m;1975;selbständig;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;HE;;;;2;HE;183;;X
+Dr.;;Nüßlein;Georg;m;1969;MdB / Dipl.-Kaufmann;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;255;Neu-Ulm;44,6;;;;;X
+;;Oehme;Bernhard Ulrich;m;1960;Versicherungsmakler;AfD;Alternative für Deutschland;Z;SN;;;;7;SN;163;;
+;;Oellers;Wilfried;m;1975;Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NW;89;Heinsberg;45,6;;NW;;53;X
+;;Oppermann;Thomas;m;1954;MdB / Jurist;SPD;Sozialdemokratische Partei Deutschlands;E;NI;53;Göttingen;34,9;;NI;;1;X
+;;Ortleb;Josephine Loulou;w;1986;Fachwirtin im Gastgewerbe;SPD;Sozialdemokratische Partei Deutschlands;E;SL;296;Saarbrücken;32,1;;SL;;2;
+;;Oßner;Florian;m;1980;Dipl.-Volkswirt (Univ.);CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;228;Landshut;39,6;;;;;X
+;;Ostendorff;Friedrich;m;1953;Bauer;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;12;NW;127;;X
+;;Oster;Josef;m;1971;Bürgermeister;CDU;Christlich Demokratische Union Deutschlands;E;RP;199;Koblenz;41,3;;RP;;14;
+;;Otte;Henning;m;1968;MdB;CDU;Christlich Demokratische Union Deutschlands;E;NI;44;Celle – Uelzen;42,7;;NI;;11;X
+;;Otten;Gerold Joachim;m;1955;Major a. D. / Oberst d. R.;AfD;Alternative für Deutschland;Z;BY;;;;8;BY;221;;
+;;Özdemir;Cem;m;1965;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;2;BW;258;;X
+;;Özdemir;Mahmut;m;1987;MdB;SPD;Sozialdemokratische Partei Deutschlands;E;NW;116;Duisburg II;34,7;;NW;;63;X
+;;Özoğuz;Aydan Saliha;w;1967;MdB / Staatsministerin;SPD;Sozialdemokratische Partei Deutschlands;E;HH;22;Hamburg-Wandsbek;34,6;;HH;;1;X
+;;Pantel;Sylvia;w;1961;MdB;CDU;Christlich Demokratische Union Deutschlands;E;NW;107;Düsseldorf II;33,8;;NW;;44;X
+;;Pasemann;Frank;m;1960;selbständig;AfD;Alternative für Deutschland;Z;ST;;;;2;ST;69;;
+;;Patzelt;Martin Maria Otto Felix;m;1947;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BB;63;Frankfurt (Oder) – Oder-Spree;27,1;;BB;;10;X
+;;Pau;Petra;w;1963;MdB;DIE LINKE;DIE LINKE;E;BE;85;Berlin-Marzahn-Hellersdorf;34,2;;BE;;1;X
+;;Paus;Elisabeth (Lisa);w;1968;MdB / Dipl.-Volkswirtin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BE;;;;1;BE;80;;X
+;;Pellmann;Sören;m;1977;Grund- und Förderschullehrer;DIE LINKE;DIE LINKE;E;SN;153;Leipzig II;25,3;;;;;
+;;Perli;Victor Angelo;m;1982;Geschäftsführer / Politikwissenschaftler;DIE LINKE;DIE LINKE;Z;NI;;;;4;NI;49;;
+;;Peterka;Tobias Matthias;m;1982;Dipl.-Jurist;AfD;Alternative für Deutschland;Z;BY;;;;11;BY;237;;
+;;Petry;Christian;m;1965;Dipl.-Verwaltungswirt;SPD;Sozialdemokratische Partei Deutschlands;Z;SL;;;;3;SL;298;;X
+Dr.;;Petry;Frauke;w;1975;MdL;AfD;Alternative für Deutschland;E;SN;158;Sächsische Schweiz-Osterzgebirge;37,4;;SN;;1;
+Dr.;;Pfeiffer;Joachim;m;1967;MdB / Dipl.-Kaufmann;CDU;Christlich Demokratische Union Deutschlands;E;BW;264;Waiblingen;36,8;;;;;X
+;;Pflüger;Tobias;m;1965;wiss. Angestellter;DIE LINKE;DIE LINKE;Z;BW;;;;4;BW;281;;
+;;Pilger;Detlev;m;1955;MdB / Lehrer;SPD;Sozialdemokratische Partei Deutschlands;Z;RP;;;;8;RP;199;;X
+;;Pilsinger;Stephan;m;1987;Arzt;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;220;München-West/Mitte;33,3;;BY;;23;
+Dr.;;Ploß;Christoph Johannes;m;1985;Pressereferent;CDU;Christlich Demokratische Union Deutschlands;E;HH;21;Hamburg-Nord;33,5;;HH;;4;
+;;Podolay;Paul Viktor;m;1946;Medizintechniker / Publizist;AfD;Alternative für Deutschland;Z;BY;;;;10;BY;242;;
+;;Pohl;Jürgen;m;1964;Rechtsanwalt;AfD;Alternative für Deutschland;Z;TH;;;;2;TH;189;;
+;;Polat;Filiz;w;1978;MdL / Dipl.-Volkswirtin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NI;;;;3;NI;38;;
+;;Pols;Eckhard;m;1962;MdB / Glasermeister;CDU;Christlich Demokratische Union Deutschlands;E;NI;37;Lüchow-Dannenberg – Lüneburg;33,5;;NI;;17;X
+;;Poschmann;Sabine;w;1968;Betriebswirtin (VWA);SPD;Sozialdemokratische Partei Deutschlands;E;NW;143;Dortmund II;38,8;;NW;;24;X
+;;Post;Achim;m;1959;Dipl.-Soziologe;SPD;Sozialdemokratische Partei Deutschlands;E;NW;134;Minden-Lübbecke I;37,4;;NW;;5;X
+;;Post;Florian;m;1981;MdB / Dipl.-Kaufmann;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;9;BY;217;;X
+;;Pronold;Florian;m;1972;MdB / parl. Staatssekretär;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;1;BY;230;;X
+;;Protschka;Stephan;m;1977;selbständig;AfD;Alternative für Deutschland;Z;BY;;;;9;BY;230;;
+Dr.;;Raabe;Sascha Markus;m;1968;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;HE;;;;3;HE;180;;X
+;;Rabanus;Martin Hermann;m;1971;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;HE;;;;7;HE;178;;X
+;;Rachel;Thomas;m;1962;MdB / parl. Staatssekretär;CDU;Christlich Demokratische Union Deutschlands;E;NW;90;Düren;41,9;;NW;;6;X
+;;Radomski;Kerstin;w;1974;MdB / Lehrerin;CDU;Christlich Demokratische Union Deutschlands;E;NW;114;Krefeld II – Wesel II;37;;NW;;29;X
+;;Radwan;Alexander Gamal;m;1964;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;223;Bad Tölz-Wolfratshausen – Miesbach;47,6;;;;;X
+;;Rainer;Alois Georg Josef;m;1965;MdB / Metzgermeister;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;231;Straubing;47,6;;;;;X
+Dr.;;Ramsauer;Peter;m;1954;MdB / Müllermeister / Dipl.-Kaufmann;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;225;Traunstein;50,3;;BY;;17;X
+;;Rehberg;Eckhardt Harald;m;1954;MdB / Dipl.-Ing. für Informationsverwaltung;CDU;Christlich Demokratische Union Deutschlands;E;MV;17;Mecklenburgische Seenplatte II – Landkreis Rostock III;37,6;;MV;;2;X
+;;Reichardt;Martin;m;1969;Angestellter;AfD;Alternative für Deutschland;Z;ST;;;;1;;;;
+Dr.;;Reimann;Carola;w;1967;MdB / Biotechnologin;SPD;Sozialdemokratische Partei Deutschlands;E;NI;50;Braunschweig;38;;NI;;12;X
+;;Reinhold;Hagen;m;1978;Meister im Maurer- und Betonhandwerk;FDP;Freie Demokratische Partei;Z;MV;;;;1;MV;14;;
+;;Remmers;Ingrid;w;1965;Sozialwissenschaftlerin;DIE LINKE;DIE LINKE;Z;NW;;;;11;NW;123;;
+;;Renner;Martin Erwin;m;1954;Dipl.-Betriebswirt;AfD;Alternative für Deutschland;Z;NW;;;;1;NW;104;;
+;;Renner;Martina;w;1967;MdB / wiss. Mitarbeiterin;DIE LINKE;DIE LINKE;Z;TH;;;;1;TH;193;;X
+;;Reusch;Roman Johannes;m;1954;Beamter / Oberstaatsanwalt;AfD;Alternative für Deutschland;Z;BB;;;;2;;;;
+;;Reuther;Bernd;m;1971;Angestellter;FDP;Freie Demokratische Partei;Z;NW;;;;13;NW;113;;
+Dr.;De;Ridder;Daniela;w;1962;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;NI;;;;4;NI;31;;X
+;;Riebsamen;Lothar;m;1957;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;293;Bodensee;41,4;;;;;X
+;;Rief;Josef;m;1960;MdB / Landwirtschaftsmeister;CDU;Christlich Demokratische Union Deutschlands;E;BW;292;Biberach;44,5;;;;;X
+;;Riexinger;Bernd;m;1955;Parteivorsitzender;DIE LINKE;DIE LINKE;Z;BW;;;;1;BW;259;;
+;;Rimkus;Andreas;m;1962;Elektromeister in der Energiewirtschaft;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;17;NW;107;;X
+;;Rix;Sönke;m;1975;Erzieher;SPD;Sozialdemokratische Partei Deutschlands;Z;SH;;;;2;SH;4;;X
+;;Rohde;Dennis;m;1986;MdB / Rechtsanwalt;SPD;Sozialdemokratische Partei Deutschlands;E;NI;27;Oldenburg – Ammerland;36,3;;NI;;11;X
+;;Röring;Johannes August;m;1959;MdB / staatl. geprüfter Landwirt;CDU;Christlich Demokratische Union Deutschlands;E;NW;126;Borken II;52,3;;;;;X
+Dr.;;Rosemann;Martin;m;1976;MdB / Dipl.-Volkswirt;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;14;BW;290;;X
+;;Röspel;René;m;1964;MdB / Dipl.-Biologe;SPD;Sozialdemokratische Partei Deutschlands;E;NW;138;Hagen – Ennepe-Ruhr-Kreis I;39,2;;NW;;47;X
+Dr.;;Rossmann;Ernst Dieter;m;1951;MdB / Dipl.-Psychologe;SPD;Sozialdemokratische Partei Deutschlands;Z;SH;;;;4;SH;7;;X
+;;Rößner;Tabea;w;1966;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;RP;;;;1;RP;205;;X
+;;Roth;Claudia Benedikta;w;1955;MdB / Dramaturgin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;1;BY;252;;X
+;;Roth;Michael;m;1970;Staatsminister;SPD;Sozialdemokratische Partei Deutschlands;E;HE;169;Werra-Meißner – Hersfeld-Rotenburg;41,2;;HE;;1;X
+Dr.;;Röttgen;Norbert;m;1965;Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NW;98;Rhein-Sieg-Kreis II;46,5;;;;;X
+Dr.;;Rottmann;Manuela;w;1972;Juristin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;7;BY;248;;
+;;Rouenhoff;Stefan;m;1978;Handelsattaché;CDU;Christlich Demokratische Union Deutschlands;E;NW;112;Kleve;45;;;;;
+;;Rüddel;Erwin;m;1955;MdB / Dipl.-Betriebswirt;CDU;Christlich Demokratische Union Deutschlands;E;RP;197;Neuwied;43,2;;RP;;7;X
+;;Rüffer;Corinna;w;1975;Politikerin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;RP;;;;3;RP;203;;X
+Dr.;;Ruppert;Stefan;m;1971;Rechtsanwalt;FDP;Freie Demokratische Partei;Z;HE;;;;2;HE;176;;
+;;Rupprecht;Albert;m;1968;MdB / Dipl.-Volkswirt;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;235;Weiden;46,2;;BY;;35;X
+;;Rüthrich;Susann;w;1977;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;SN;;;;3;SN;155;;X
+;;Rützel;Bernd;m;1968;MdB / techn. Oberamtsrat a. D.;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;7;BY;249;;X
+;;Ryglewski;Sarah Janina;w;1983;MdB / Dipl.-Politikwissenschaftlerin;SPD;Sozialdemokratische Partei Deutschlands;E;HB;54;Bremen I;30;;HB;;1;X
+;;Saathoff;Johann;m;1967;MdB / Dipl.-Verwaltungswirt (FH);SPD;Sozialdemokratische Partei Deutschlands;E;NI;24;Aurich – Emden;49,6;;NI;;21;X
+;;Sarrazin;Manuel Ferdinand Theodor;m;1982;Historiker;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;HH;;;;2;HH;23;;X
+;;Sattelberger;Thomas;m;1949;Vorstand i. R.;FDP;Freie Demokratische Partei;Z;BY;;;;5;BY;219;;
+;;Sauer;Stefan;m;1966;Bürgermeister;CDU;Christlich Demokratische Union Deutschlands;E;HE;184;Groß-Gerau;35,1;;HE;;19;
+;;Sauter;Christian;m;1980;Dipl.-Wirtschaftsingenieur (FH);FDP;Freie Demokratische Partei;Z;NW;;;;15;NW;135;;
+;;Schäfer;Anita;w;1951;MdB / Angestellte;CDU;Christlich Demokratische Union Deutschlands;E;RP;210;Pirmasens;36,8;;RP;;3;X
+;;Schäfer;Axel;m;1952;MdB;SPD;Sozialdemokratische Partei Deutschlands;E;NW;140;Bochum I;37,2;;NW;;59;X
+;;Schäffler;Frank;m;1968;Dipl.-Betriebswirt;FDP;Freie Demokratische Partei;Z;NW;;;;9;NW;134;;
+Dr.;;Schäuble;Wolfgang;m;1942;MdB / Bundesminister;CDU;Christlich Demokratische Union Deutschlands;E;BW;284;Offenburg;48,1;;BW;;1;X
+;;Schauws;Ursula (Ulle);w;1966;Film- und Fernsehwissenschaftlerin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;11;NW;114;;X
+Dr.;;Scheer;Nina;w;1971;Juristin / Politikwissenschaftlerin / Musikerin;SPD;Sozialdemokratische Partei Deutschlands;Z;SH;;;;3;SH;10;;X
+;;Scheuer;Andreas Franz;m;1974;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;229;Passau;47,5;;BY;;4;X
+Dr.;;Schick;Gerhard;m;1972;MdB / Volkswirt;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;4;BW;275;;X
+;;Schieder;Marianne;w;1962;MdB / Juristin;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;6;BY;234;;X
+;;Schiefner;Udo;m;1959;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;11;NW;111;;X
+;;Schielke-Ziesing;Ulrike;w;1969;Verwaltungsangestellte;AfD;Alternative für Deutschland;Z;MV;;;;3;MV;17;;
+;;Schimke;Jana;w;1979;Dipl.-Politologin / Politikwissenschaftlerin;CDU;Christlich Demokratische Union Deutschlands;E;BB;62;Dahme-Spreewald – Teltow-Fläming III – Oberspreewald-Lausitz I;30,7;;BB;;4;X
+;;Schinnenburg;Wieland Albert Wilhelm;m;1958;Zahnarzt / Rechtsanwalt;FDP;Freie Demokratische Partei;Z;HH;;;;2;HH;22;;
+;;Schipanski;Tankred;m;1976;MdB;CDU;Christlich Demokratische Union Deutschlands;E;TH;192;Gotha – Ilm-Kreis;29;;TH;;5;X
+Dr.;;Schlund;Robby;m;1967;Arzt;AfD;Alternative für Deutschland;Z;TH;;;;4;TH;194;;
+Dr.;;Schmid;Nils;m;1973;MdL;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;6;BW;262;;
+;;Schmidt;Christian;m;1957;Bundesminister;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;243;Fürth;39,9;;BY;;6;X
+;;Schmidt;Dagmar;w;1973;Historikerin;SPD;Sozialdemokratische Partei Deutschlands;Z;HE;;;;4;HE;172;;X
+Dr.;;Schmidt;Frithjof;m;1953;Sozialwissenschaftler;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NW;;;;6;NW;140;;X
+;;Schmidt;Stefan;m;1981;wiss. Angestellter;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;10;BY;233;;
+;;Schmidt;Ursula (Ulla);w;1949;Lehrerin für Sonderpädagogik;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;10;NW;87;;X
+;;Schmidt;Uwe;m;1966;Hafenfacharbeiter;SPD;Sozialdemokratische Partei Deutschlands;E;HB;55;Bremen II – Bremerhaven;34;;HB;;2;
+Prof. Dr.;;Schmidtke;Claudia;w;1966;Ärztin;CDU;Christlich Demokratische Union Deutschlands;E;SH;11;Lübeck;35,3;;SH;;9;
+;;Schneider;Carsten;m;1976;Bankkaufmann;SPD;Sozialdemokratische Partei Deutschlands;Z;TH;;;;1;TH;193;;X
+;;Schneider;Jörg;m;1964;Lehrer;AfD;Alternative für Deutschland;Z;NW;;;;5;NW;123;;
+;;Schnieder;Patrick;m;1968;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;RP;202;Bitburg;51,2;;RP;;1;X
+;;Schön;Nadine;w;1983;MdB;CDU;Christlich Demokratische Union Deutschlands;E;SL;298;St. Wendel;41,8;;SL;;2;X
+;;Schraps;Johannes;m;1983;wiss. Mitarbeiter Bundestag;SPD;Sozialdemokratische Partei Deutschlands;E;NI;46;Hameln-Pyrmont – Holzminden;39,1;;NI;;13;
+;;Schreiber;Eva-Maria Elisabeth;w;1958;Ethnologin;DIE LINKE;DIE LINKE;Z;BY;;;;7;BY;221;;
+;;Schreiner;Felix;m;1986;MdL;CDU;Christlich Demokratische Union Deutschlands;E;BW;288;Waldshut;41,9;;;;;
+;;Schrodi;Michael;m;1977;Studienrat;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;17;BY;215;;
+Dr.;;Schüle;Manja;w;1976;Angestellte;SPD;Sozialdemokratische Partei Deutschlands;E;BB;61;Potsdam – Potsdam-Mittelmark II – Teltow-Fläming II;26,1;;BB;;3;
+;;Schulte;Ursula;w;1952;MdB / Hausfrau;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;8;NW;126;;X
+;;Schulz;Martin;m;1955;Buchhändler;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;1;;;;
+;;Schulz;Ralph Jimmy;m;1968;Unternehmer;FDP;Freie Demokratische Partei;Z;BY;;;;4;BY;221;;
+;;Schulz;Swen;m;1968;MdB;SPD;Sozialdemokratische Partei Deutschlands;E;BE;78;Berlin-Spandau – Charlottenburg Nord;32,1;;BE;;2;X
+;;Schulz;Uwe;m;1961;ltd. Angestellter;AfD;Alternative für Deutschland;Z;HE;;;;3;HE;173;;
+;;Schulz-Asche;Kordula Anna Paula;w;1956;Kommunikationswissenschaftlerin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;HE;;;;3;HE;181;;X
+Dr.;;Schulze;Klaus-Peter Friedrich Walter;m;1954;MdB / Dipl.-Lehrer;CDU;Christlich Demokratische Union Deutschlands;E;BB;64;Cottbus – Spree-Neiße;28,4;;BB;;6;X
+;;Schummer;Uwe;m;1957;Groß- und Außenhandelskaufmann;CDU;Christlich Demokratische Union Deutschlands;E;NW;111;Viersen;47,9;;NW;;39;X
+;;Schurer;Ewald;m;1954;MdB / Dipl.-Betriebswirt;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;5;BY;213;;X
+;;Schuster;Armin;m;1961;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;282;Lörrach – Müllheim;39,4;;;;;X
+;;Schwabe;Frank;m;1970;MdB;SPD;Sozialdemokratische Partei Deutschlands;E;NW;121;Recklinghausen I;38,7;;NW;;54;X
+;;Schwartze;Stefan;m;1974;MdB / Industriemechaniker;SPD;Sozialdemokratische Partei Deutschlands;E;NW;133;Herford – Minden-Lübbecke II;36,7;;NW;;35;X
+;;Schwarz;Andreas;m;1965;MdB / Dipl.-Betriebswirt (FH);SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;13;BY;236;;X
+;;Schwarzelühr-Sutter;Rita;w;1962;MdB / parl. Staatssekretärin;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;3;BW;288;;X
+;;Schweiger;Torsten;m;1968;Dipl.-Ingenieur;CDU;Christlich Demokratische Union Deutschlands;E;ST;74;Mansfeld;31;;ST;;8;
+;;Seestern-Pauly;Matthias;m;1984;Gymnasiallehrer;FDP;Freie Demokratische Partei;Z;NI;;;;7;NI;38;;
+;;Seif;Detlef;m;1962;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NW;92;Euskirchen – Rhein-Erft-Kreis II;42,8;;NW;;48;X
+;;Seitz;Thomas;m;1967;Rechtsassessor;AfD;Alternative für Deutschland;Z;BW;;;;5;BW;283;;
+;;Selle;Johannes;m;1956;Dipl.-Mathematiker;CDU;Christlich Demokratische Union Deutschlands;E;TH;191;Jena – Sömmerda – Weimarer Land I;29,2;;TH;;7;X
+;;Sendker;Reinhold;m;1952;MdB / Studiendirektor a. D.;CDU;Christlich Demokratische Union Deutschlands;E;NW;130;Warendorf;46,4;;;;;X
+;;Sensburg;Patrick Ernst Hermann;m;1971;MdB / Hochschullehrer;CDU;Christlich Demokratische Union Deutschlands;E;NW;147;Hochsauerlandkreis;48;;;;;X
+;;Sichert;Martin Johannes;m;1980;Dipl.-Kaufmann;AfD;Alternative für Deutschland;Z;BY;;;;5;BY;244;;
+;;Silberhorn;Thomas;m;1968;parl. Staatssekretär;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;236;Bamberg;42,1;;BY;;12;X
+;;Simon;Björn Manuel;m;1981;Politikwissenschaftler;CDU;Christlich Demokratische Union Deutschlands;E;HE;185;Offenbach;36,4;;HE;;22;
+;;Sitta;Frank;m;1978;Geschäftsführer;FDP;Freie Demokratische Partei;Z;ST;;;;1;ST;72;;
+Dr.;;Sitte;Petra;w;1960;Dipl.-Ökonomin;DIE LINKE;DIE LINKE;Z;ST;;;;1;ST;72;;X
+;;Skudelny;Judith;w;1975;Rechtsanwältin;FDP;Freie Demokratische Partei;Z;BW;;;;2;BW;258;;
+Dr.;;Solms;Hermann Otto;m;1940;selbständig;FDP;Freie Demokratische Partei;Z;HE;;;;3;HE;173;;
+;;Sommer;Evrim;w;1971;wiss. Mitarbeiterin;DIE LINKE;DIE LINKE;Z;BE;;;;5;;;;
+;;Sorge;Tino;m;1975;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;ST;69;Magdeburg;27,4;;ST;;3;X
+;;Spahn;Jens;m;1980;MdB / Bankkaufmann;CDU;Christlich Demokratische Union Deutschlands;E;NW;124;Steinfurt I – Borken I;51,3;;;;;X
+;;Spangenberg;Detlev;m;1944;Dipl.-Betriebswirt;AfD;Alternative für Deutschland;Z;SN;;;;4;SN;151;;
+Dr.;;Spaniel;Dirk;m;1971;Dipl.-Ingenieur;AfD;Alternative für Deutschland;Z;BW;;;;10;BW;258;;
+;;Spiering;Rainer;m;1956;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;NI;;;;9;NI;38;;X
+;;Springer;René;m;1979;Angestellter;AfD;Alternative für Deutschland;Z;BB;;;;3;BB;61;;
+;;Stadler;Svenja;w;1976;MdB / Senior-PR-Beraterin;SPD;Sozialdemokratische Partei Deutschlands;Z;NI;;;;8;NI;36;;X
+;;Staffler;Katrin;w;1981;Biochemikerin (M. Sc.);CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;215;Fürstenfeldbruck;43,6;;BY;;19;
+;;Stamm-Fibich;Martina;w;1965;MdB / Marketing- und Kommunikationsmanagerin;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;14;BY;242;;X
+;;Stark-Watzinger;Bettina;w;1968;Dipl.-Volkswirtin;FDP;Freie Demokratische Partei;Z;HE;;;;4;HE;181;;
+Dr.;;Steffel;Frank;m;1966;Dipl.-Kaufmann;CDU;Christlich Demokratische Union Deutschlands;E;BE;77;Berlin-Reinickendorf;36,8;;;;;X
+;;Steffen;Sonja Amalie;w;1963;Rechtsanwältin;SPD;Sozialdemokratische Partei Deutschlands;Z;MV;;;;1;MV;15;;X
+Dr.;;Stefinger;Wolfgang;m;1985;MdB / Betriebswirt;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;218;München-Ost;36,8;;;;;X
+;;Stegemann;Albert;m;1976;MdB / Landwirtschaftsmeister;CDU;Christlich Demokratische Union Deutschlands;E;NI;31;Mittelems;53,6;;NI;;30;X
+;;Steier;Andreas;m;1972;Dipl.-Ingenieur;CDU;Christlich Demokratische Union Deutschlands;E;RP;203;Trier;37,9;;RP;;10;
+;;Stein;Jens Mathias;m;1970;Bautechniker;SPD;Sozialdemokratische Partei Deutschlands;E;SH;5;Kiel;31;;SH;;9;
+;;Stein;Peter;m;1968;MdB;CDU;Christlich Demokratische Union Deutschlands;E;MV;14;Rostock – Landkreis Rostock II;29,5;;MV;;5;X
+;;Steineke;Sebastian;m;1973;Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;BB;56;Prignitz – Ostprignitz-Ruppin – Havelland I;30,8;;BB;;7;X
+;;Steiniger;Johannes;m;1987;MdB / Gymnasiallehrer;CDU;Christlich Demokratische Union Deutschlands;E;RP;208;Neustadt – Speyer;40;;RP;;13;X
+;;Steinke;Kersten;w;1958;MdB / Agraringenieurin;DIE LINKE;DIE LINKE;Z;TH;;;;3;TH;189;;X
+;Freiherr von;Stetten;Christian Alexander;m;1970;MdB / selbst. Kaufmann;CDU;Christlich Demokratische Union Deutschlands;E;BW;268;Schwäbisch Hall – Hohenlohe;40,5;;;;;X
+;;Stier;Dieter;m;1964;MdB / Dipl.-Agraringenieur;CDU;Christlich Demokratische Union Deutschlands;E;ST;73;Burgenland – Saalekreis;33,6;;ST;;4;X
+;von;Storch;Beatrix;w;1971;MdEP / Anwältin;AfD;Alternative für Deutschland;Z;BE;;;;1;BE;75;;
+;;Storjohann;Gero;m;1958;MdB / Dipl.-Betriebswirt (FH);CDU;Christlich Demokratische Union Deutschlands;E;SH;8;Segeberg – Stormarn-Mitte;41,1;;SH;;4;X
+;;Stracke;Stephan;m;1974;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;257;Ostallgäu;49,2;;;;;X
+Dr.;;Strack-Zimmermann;Marie-Agnes;w;1958;selbst. Verlagsrepräsentantin;FDP;Freie Demokratische Partei;Z;NW;;;;2;NW;106;;
+;;Straetmanns;Friedrich;m;1961;Richter;DIE LINKE;DIE LINKE;Z;NW;;;;12;NW;132;;
+;;Strasser;Benjamin;m;1987;Rechtsanwalt;FDP;Freie Demokratische Partei;Z;BW;;;;8;BW;294;;
+;;Straubinger;Max;m;1954;Versicherungskaufmann;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;230;Rottal-Inn;45;;BY;;13;X
+;;Strengmann-Kuhn;Wolfgang;m;1964;Volkswirt;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;HE;;;;4;HE;185;;X
+;;Strenz;Karin;w;1967;MdB;CDU;Christlich Demokratische Union Deutschlands;E;MV;13;Ludwigslust-Parchim II – Nordwestmecklenburg II – Landkreis Rostock I;30;;MV;;4;X
+;;Stübgen;Michael;m;1959;MdB / Baufacharbeiter / Pfarrer;CDU;Christlich Demokratische Union Deutschlands;E;BB;65;Elbe-Elster – Oberspreewald-Lausitz II;29,5;;BB;;1;X
+;;Stumpp;Margit;w;1963;Oberstudienrätin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BW;;;;13;BW;270;;
+;;Suding;Katja Rita;w;1975;Kommunikationsberaterin;FDP;Freie Demokratische Partei;Z;HH;;;;1;HH;19;;
+;;Tack;Kerstin;w;1968;MdB / Dipl.-Sozialpädagogin;SPD;Sozialdemokratische Partei Deutschlands;E;NI;41;Stadt Hannover I;35,6;;NI;;22;X
+Dr.;;Tackmann;Kirsten;w;1960;MdB / Tierärztin;DIE LINKE;DIE LINKE;Z;BB;;;;1;BB;56;;X
+;;Tatti;Jessica;w;1981;Sozialarbeiterin (B. A.);DIE LINKE;DIE LINKE;Z;BW;;;;5;BW;289;;
+Dr.;;Tauber;Peter Michael;m;1974;MdB;CDU;Christlich Demokratische Union Deutschlands;E;HE;175;Main-Kinzig – Wetterau II – Schotten;36,4;;HE;;4;X
+;;Tausend;Claudia;w;1964;MdB / Dipl.-Geografin;SPD;Sozialdemokratische Partei Deutschlands;Z;BY;;;;12;BY;218;;X
+Dr.;;Tebroke;Hermann-Josef;m;1964;Landrat;CDU;Christlich Demokratische Union Deutschlands;E;NW;100;Rheinisch-Bergischer Kreis;40;;NW;;43;
+;;Teuteberg;Linda;w;1981;Rechtsanwältin / Referentin im BMBF;FDP;Freie Demokratische Partei;Z;BB;;;;1;BB;61;;
+;;Theurer;Michael;m;1967;MdEP;FDP;Freie Demokratische Partei;Z;BW;;;;1;BW;271;;
+;;Thews;Michael;m;1964;Dipl.-Chemieingenieur;SPD;Sozialdemokratische Partei Deutschlands;E;NW;145;Hamm – Unna II;36,4;;NW;;61;X
+;;Thies;Hans-Jürgen;m;1955;Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;NW;146;Soest;42,7;;NW;;49;
+;;Thomae;Stephan;m;1968;Rechtsanwalt;FDP;Freie Demokratische Partei;Z;BY;;;;7;BY;256;;
+;;Throm;Alexander;m;1968;Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;BW;267;Heilbronn;35,3;;;;;
+Dr.;;Tiemann;Dietlind;w;1955;Oberbürgermeisterin;CDU;Christlich Demokratische Union Deutschlands;E;BB;60;Brandenburg an der Havel – Potsdam-Mittelmark I – Havelland III – Teltow-Fläming I;31,8;;BB;;3;
+;;Tillmann;Antje;w;1964;Dipl.-Finanzwirtin;CDU;Christlich Demokratische Union Deutschlands;E;TH;193;Erfurt – Weimar – Weimarer Land II;27,3;;TH;;2;X
+;;Todtenhausen;Manfred;m;1950;Elektromeister;FDP;Freie Demokratische Partei;Z;NW;;;;16;NW;102;;
+Dr.;;Toncar;Florian;m;1979;Rechtsanwalt;FDP;Freie Demokratische Partei;Z;BW;;;;5;BW;260;;
+;;Töns;Markus;m;1964;Politologe;SPD;Sozialdemokratische Partei Deutschlands;E;NW;123;Gelsenkirchen;38,3;;NW;;48;
+;;Tressel;Markus Stefan;m;1977;MdB;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;SL;;;;1;SL;297;;X
+;;Trittin;Jürgen;m;1954;MdB / Bundesminister a. D.;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NI;;;;2;NI;53;;X
+;;Uhl;Markus Alexander;m;1979;Dipl.-Kaufmann;CDU;Christlich Demokratische Union Deutschlands;E;SL;299;Homburg;33,6;;SL;;4;X
+Prof. Dr.;;Ullmann;Andrew;m;1963;Universitätsprofessor für Infektiologie;FDP;Freie Demokratische Partei;Z;BY;;;;12;BY;251;;
+;;Ullrich;Gerald;m;1962;Ingenieur;FDP;Freie Demokratische Partei;Z;TH;;;;2;TH;196;;
+Dr.;;Ullrich;Volker Michael;m;1975;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;252;Augsburg-Stadt;34,8;;BY;;25;X
+;;Ulrich;Alexander;m;1971;MdB;DIE LINKE;DIE LINKE;Z;RP;;;;1;RP;209;;X
+;;Vaatz;Arnold;m;1955;MdB;CDU;Christlich Demokratische Union Deutschlands;E;SN;160;Dresden II – Bautzen II;25,5;;SN;;2;X
+;;Veith;Oswin;m;1961;MdB;CDU;Christlich Demokratische Union Deutschlands;E;HE;177;Wetterau I;36,4;;HE;;14;X
+Dr.;;Verlinden;Julia Maria Kornelia;w;1979;MdB / Dipl.-Umweltwissenschaftlerin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;NI;;;;1;NI;37;;X
+;;Vieregge;Kerstin;w;1976;Betriebswirtin;CDU;Christlich Demokratische Union Deutschlands;E;NW;135;Lippe I;36,6;;NW;;18;
+;;Vogel;Johannes;m;1982;Politikwissenschaftler;FDP;Freie Demokratische Partei;Z;NW;;;;5;NW;149;;
+;;Vogel;Volkmar;m;1959;Dipl.-Ingenieur (FH);CDU;Christlich Demokratische Union Deutschlands;E;TH;194;Gera – Greiz – Altenburger Land;30,4;;TH;;3;X
+;;Vogler;Kathrin;w;1963;MdB;DIE LINKE;DIE LINKE;Z;NW;;;;7;NW;128;;X
+;;Vogt;Ute;w;1964;MdB / Rechtsanwältin;SPD;Sozialdemokratische Partei Deutschlands;Z;BW;;;;9;BW;258;;X
+;;Vöpel;Dirk;m;1971;selbst. Kaufmann;SPD;Sozialdemokratische Partei Deutschlands;E;NW;117;Oberhausen – Wesel III;38,5;;NW;;62;X
+;de;Vries;Christoph Bernhard;m;1974;Dipl.-Soziologe / ltd. Angestellter;CDU;Christlich Demokratische Union Deutschlands;Z;HH;;;;3;HH;18;;
+;de;Vries;Kees;m;1955;MdB;CDU;Christlich Demokratische Union Deutschlands;E;ST;71;Anhalt;31,6;;ST;;2;X
+Dr.;;Wadephul;Johann David;m;1963;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;SH;4;Rendsburg-Eckernförde;42,7;;SH;;1;X
+Dr.;;Wagenknecht;Sahra;w;1969;MdB;DIE LINKE;DIE LINKE;Z;NW;;;;1;NW;107;;X
+;;Wagner;Andreas;m;1972;Heilerziehungspfleger;DIE LINKE;DIE LINKE;Z;BY;;;;6;BY;223;;
+;;Wagner;Daniela;w;1957;Stadträtin a. D.;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;HE;;;;1;HE;186;;
+;;Walter-Rosenheimer;Beate;w;1964;MdB / Dipl.-Psychologin;GRÜNE;BÜNDNIS 90/DIE GRÜNEN;Z;BY;;;;5;BY;215;;X
+;;Wanderwitz;Marco;m;1975;MdB / Rechtsanwalt;CDU;Christlich Demokratische Union Deutschlands;E;SN;163;Chemnitzer Umland – Erzgebirgskreis II;35,1;;;;;X
+;;Weber;Gabi;w;1955;MdB / Keramikmalerin;SPD;Sozialdemokratische Partei Deutschlands;Z;RP;;;;7;RP;204;;X
+;;Weeser;Sandra;w;1969;Vizepräsidentin SGD Nord;FDP;Freie Demokratische Partei;Z;RP;;;;2;RP;197;;
+;;Wegner;Kai;m;1972;MdB / Versicherungskaufmann;CDU;Christlich Demokratische Union Deutschlands;Z;BE;;;;2;BE;78;;X
+;;Weidel;Alice;w;1979;Beraterin von Start-Up-Unternehmen;AfD;Alternative für Deutschland;Z;BW;;;;1;BW;293;;
+;;Weiler;Albert Helmut;m;1965;Dipl.-Verwaltungswirt / Betriebswirt;CDU;Christlich Demokratische Union Deutschlands;E;TH;195;Saalfeld-Rudolstadt – Saale-Holzland-Kreis – Saale-Orla-Kreis;30,9;;;;;X
+;;Weinberg;Harald;m;1957;MdB / Soziologe;DIE LINKE;DIE LINKE;Z;BY;;;;4;BY;241;;X
+;;Weinberg;Marcus;m;1967;MdB;CDU;Christlich Demokratische Union Deutschlands;Z;HH;;;;1;HH;19;;X
+Dr.;;Weisgerber;Anja;w;1976;MdB / Rechtsanwältin;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;250;Schweinfurt;47,9;;BY;;10;X
+;;Weiß;Peter Siegfried;m;1956;MdB;CDU;Christlich Demokratische Union Deutschlands;E;BW;283;Emmendingen – Lahr;37,6;;;;;X
+;;Weiss;Sabine Katharina;w;1958;Rechtsanwältin;CDU;Christlich Demokratische Union Deutschlands;E;NW;113;Wesel I;39;;NW;;19;X
+;;Wellenreuther;Ingo;m;1959;MdB / Vors. Richter am LG a. D.;CDU;Christlich Demokratische Union Deutschlands;E;BW;271;Karlsruhe-Stadt;28,5;;BW;;5;X
+;;Wendt;Marian;m;1985;MdB;CDU;Christlich Demokratische Union Deutschlands;E;SN;151;Nordsachsen;32,8;;SN;;11;X
+;;Werner;Katrin;w;1973;Kauffrau im Einzelhandel;DIE LINKE;DIE LINKE;Z;RP;;;;2;RP;203;;X
+;;Westig;Nicole;w;1967;Fundraiserin;FDP;Freie Demokratische Partei;Z;NW;;;;12;NW;98;;
+;;Westphal;Bernd Helmut;m;1960;MdB;SPD;Sozialdemokratische Partei Deutschlands;E;NI;48;Hildesheim;37,2;;NI;;17;X
+Prof. Dr.;;Weyel;Harald;m;1959;Professor der Betriebswirtschaft;AfD;Alternative für Deutschland;Z;NW;;;;3;;;;
+;;Whittaker;Kai;m;1985;MdB / Wirtschaftswissenschaftler (M. Sc.);CDU;Christlich Demokratische Union Deutschlands;E;BW;273;Rastatt;44,1;;;;;X
+;;Widmann-Mauz;Annette;w;1966;MdB / parl. Staatssekretärin;CDU;Christlich Demokratische Union Deutschlands;E;BW;290;Tübingen;35,7;;BW;;2;X
+;;Wiehle;Wolfgang;m;1964;IT-Berater / Dipl.-Informatiker;AfD;Alternative für Deutschland;Z;BY;;;;14;BY;219;;
+;;Wiese;Dirk;m;1983;Jurist;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;13;NW;147;;X
+;;Wiesmann;Bettina Margarethe;w;1966;Unternehmensberaterin;CDU;Christlich Demokratische Union Deutschlands;E;HE;183;Frankfurt am Main II;32,4;;HE;;9;
+Dr.;;Wildberg;Heiko;m;1952;Dipl.-Geologe;AfD;Alternative für Deutschland;Z;RP;;;;2;RP;211;;
+;;Willsch;Klaus-Peter;m;1961;Dipl.-Volkswirt;CDU;Christlich Demokratische Union Deutschlands;E;HE;178;Rheingau-Taunus – Limburg;41,8;;HE;;10;X
+;;Winkelmeier-Becker;Elisabeth;w;1962;Richterin a. D.;CDU;Christlich Demokratische Union Deutschlands;E;NW;97;Rhein-Sieg-Kreis I;44,3;;NW;;2;X
+Dr.;;Wirth;Christian Friedrich;m;1963;Rechtsanwalt;AfD;Alternative für Deutschland;Z;SL;;;;1;;;;
+;;Witt;Uwe;m;1959;Dipl.-Personalwirt;AfD;Alternative für Deutschland;Z;NW;;;;13;;;;
+;;Wittke;Oliver;m;1966;Dipl.-Geograph;CDU;Christlich Demokratische Union Deutschlands;Z;NW;;;;3;NW;123;;X
+;;Yüksel;Gülistan;w;1962;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;NW;;;;12;NW;109;;X
+;;Zdebel;Hubertus;m;1954;Journalist;DIE LINKE;DIE LINKE;Z;NW;;;;8;NW;129;;X
+;;Zeulner;Emmi;w;1987;MdB;CSU;Christlich-Soziale Union in Bayern e.V.;E;BY;240;Kulmbach;55,4;;BY;;16;X
+;;Ziegler;Dagmar;w;1960;Dipl.-Finanzökonomin;SPD;Sozialdemokratische Partei Deutschlands;Z;BB;;;;1;BB;56;;X
+;;Ziemiak;Paul;m;1985;Angestellter / Student;CDU;Christlich Demokratische Union Deutschlands;Z;NW;;;;10;NW;141;;
+;;Zierke;Stefan;m;1970;Werkzeugmacher / Touristikfachwirt;SPD;Sozialdemokratische Partei Deutschlands;Z;BB;;;;4;BB;57;;X
+Prof. Dr.;;Zimmer;Matthias Rainer;m;1961;Hochschullehrer;CDU;Christlich Demokratische Union Deutschlands;E;HE;182;Frankfurt am Main I;30,5;;HE;;8;X
+Dr.;;Zimmermann;Jens;m;1981;MdB;SPD;Sozialdemokratische Partei Deutschlands;Z;HE;;;;9;HE;187;;X
+;;Zimmermann;Pia-Beate;w;1956;Mediengestalterin;DIE LINKE;DIE LINKE;Z;NI;;;;1;NI;51;;X
+;;Zimmermann;Sabine;w;1960;MdB;DIE LINKE;DIE LINKE;Z;SN;;;;5;SN;165;;X

sose2021/r/w03/L03-1-exerc.R

@@ -0,0 +1,20 @@
+library(ggplot2)
+library(tibble)
+
+x_plt1 <- seq(0,1,len=1000)
+x_plt2 <- seq(0,1,len=200)
+plt_data1 <- tibble(
+  x_val = x_plt1,
+  y_val1 = x_plt1^2,
+  y_val2 = sqrt(x_plt1))
+plt_data2 <- tibble(
+  x_val = x_plt2,
+  y_val = sin(2*pi*x_plt2)/2+0.5)
+
+plt <- ggplot(data = plt_data1, mapping = aes(x = x_val)) +
+    geom_line(mapping = aes(y = y_val1), color="blue") +
+    geom_line(mapping = aes(y = y_val2), color="red") +
+    geom_line(data = plt_data2, mapping = aes(x = x_val, y = y_val), color="red") +
+    geom_point(data = plt_data2, mapping = aes(x = x_val, y = y_val), color="cyan")
+
+print(plt)

sose2021/r/w03/P03-1.R

@@ -0,0 +1,8 @@
+# Josua Kugler, Christian Merten
+
+`%o%` <- function(f, g) {
+    comp <- function(...) {
+        return(f(g(...)))
+    }
+    return(comp)
+}

sose2021/r/w03/P03-2.R

@@ -0,0 +1,37 @@
+# Josua Kugler, Christian Merten
+
+n_diag <- function(mat, n) {
+    stopifnot("Matrix not quadratic" = nrow(mat) == ncol(mat))
+    stopifnot("Matrix does not have such a (sub)diagonal" = abs(n) < nrow(mat))
+    dg <- c()
+    for (i in (1:(nrow(mat)-abs(n)))) {
+        elem <- if (n > 0) {
+            mat[i, i+n]
+        } else {
+            mat[i+abs(n), i]
+        }
+        dg <- c(dg, elem)
+    }
+    return(dg)
+}
+
+`n_diag<-` <- function(x, value, n) {
+    stopifnot("Matrix not quadratic" = nrow(mat) == ncol(mat))
+    stopifnot("Matrix does not have such a (sub)diagonal" = abs(n) < nrow(mat))
+    stopifnot("Subdiagonal length and replacement do not match" = length(value) == nrow(mat) - abs(n))
+    for (i in (1:(nrow(mat)-abs(n)))) {
+        elem <- if (n > 0) {
+            mat[i, i+n] <- value[i]
+        } else {
+            mat[i+abs(n), i] <- value[i]
+        }
+    }
+    return(mat)
+}
+
+mat <- matrix(1:16, nrow=4)
+print(mat)
+print(n_diag(mat, 2))
+
+n_diag(mat, -3) <- 1
+print(mat)

sose2021/r/w03/P03-3.R

@@ -0,0 +1,172 @@
+# Josua Kugler, Christian Merten
+
+## 1.
+
+size <- function(mat) {
+    return(attr(mat, "size"))
+}
+
+`size<-` <- function(x, value) {
+    attributes(x)$size <- value
+    return(x)
+}
+
+
+## 2.
+
+sudoku <- function(mat, n=NULL, m=NULL) {
+    attributes(mat)$class <- "sudoku"
+    if (!is.matrix(mat)) {
+        stopifnot("If mat is not a matrix, at n and m have to be specified" = !is.null(n) && !is.null(m))
+        mat <- matrix(mat, nrow=n*m)
+    } else if (is.null(n)) {
+        n <- nrow(mat) / m
+    } else if (is.null(m)) {
+        m <- nrow(mat) / n
+    }
+    size(mat) <- c(n, m)
+    return(mat)
+}
+
+
+## 3.
+
+is_sudoku <- function(s) {
+    if (is.null(size(s))) {
+        return(FALSE)
+    }
+    n <- size(s)[1]
+    m <- size(s)[2]
+    checks <- c(nrow(s) == ncol(s),
+                nrow(s) == n*m,
+                attr(s, "class") == "sudoku",
+                s %in% c(NA, (1:(n*m))))
+    return(all(checks))
+}
+
+
+
+## 4.
+
+is_sub_valid <- function(x) {
+    dups <- any(duplicated(x))
+    in_range <- all(x %in% c(NA, (1:length(x))))
+    return(in_range && !dups)
+}
+
+
+
+## 5.
+
+partition_index <- function(n, m) {
+    m1 <- matrix(rep(1:(n*m), each=n), nrow=n*m)
+    m2 <- m1[, rep(1:n, each=m)]
+    return(m2)
+}
+partition_index(3,2)
+
+
+
+## 6.
+
+is_valid <- function(s) {
+    stopifnot("s is not a sudoku!" = is_sudoku(s))
+    n <- size(s)[1]
+    m <- size(s)[2]
+    rows_valid <- sapply(1:(n*m), function(r) is_sub_valid(s[r,]))
+    cols_valid <- sapply(1:(n*m), function(c) is_sub_valid(s[,c]))
+    part <- partition_index(n, m)
+    fields_valid <- sapply(1:(n*m), function(i) is_sub_valid(s[part == i]))
+    return(all(c(fields_valid, cols_valid, fields_valid)))
+}
+
+is_filled_in <- function(s) {
+    return(!any(is.na(s)))
+}
+
+is_solved <-function(s) {
+    return(is_valid(s) && is_filled_in(s))
+}
+
+
+## 7.
+
+is_solution_of <- function(s, s_star) {
+    return(is_solved(s_star) && all(s == s_star, na.rm=TRUE))
+}
+
+
+## 8.
+
+print_non_valid <- function(s, print_missing=T) {
+    stopifnot("s is not a sudoku!" = is_sudoku(s))
+    if (print_missing) {
+        apply(which(is.na(s), arr.ind=T), 1, function(x) cat("missing value at ", x[1], ",", x[2], "\n", sep=""))
+    }
+    n <- size(s)[1]
+    m <- size(s)[2]
+    rows_invalid <- which(sapply(1:(n*m), function(r) !is_sub_valid(s[r,])))
+    sapply(rows_invalid, function(x) cat("row ",
+                                         x,
+                                         " is invalid\n",
+                                         sep=""))
+    cols_invalid <- which(sapply(1:(n*m), function(c) !is_sub_valid(s[,c])))
+    sapply(cols_invalid, function(x) cat("column ",
+                                         x,
+                                         " is invalid\n",
+                                         sep=""))
+    part <- partition_index(n, m)
+    fields <- matrix(1:(n*m), nrow=m)
+    fields_invalid <- which(apply(fields, c(1,2), function(i) !is_sub_valid(s[part == i])), arr.ind=T)
+    if (length(fields_invalid) > 0) {
+        sapply(1:nrow(fields_invalid), function(r) cat("field ",
+                                                       fields_invalid[r,1],
+                                                       ",",
+                                                       fields_invalid[r,2],
+                                                       " is invalid\n",
+                                                       sep=""))
+    }
+    invisible(NULL)
+}
+
+
+
+## TEST
+
+x <- matrix(
+  c(5,2,6,4,3,1,6,1,3,2,5,4,3,4,1,5,2,6,2,6,4,3,1,5,1,3,5,6,4,2,4,5,2,1,6,3),
+  ncol = 6)
+is_sudoku(x)
+
+s <- sudoku(x, 3, 2)
+s
+size(s)
+is_sudoku(s)
+is_filled_in(s)
+is_valid(s)
+is_solved(s)
+print_non_valid(s)
+
+size(s) <- c(2, 3)
+is_sudoku(s)
+is_filled_in(s)
+is_valid(s)
+is_solved(s)
+
+s_na <- s
+s_na[sample(36, 18)] <- NA
+s_na
+is_sudoku(s_na)
+is_filled_in(s_na)
+is_valid(s_na)
+is_solved(s_na)
+print_non_valid(s_na)
+
+s_not <- sudoku(sample(1:6, 36, replace=T), 2, 3)
+s_not[sample(36, 18)] <- NA
+s_not
+is_sudoku(s_not)
+is_filled_in(s_not)
+is_valid(s_not)
+is_solved(s_not)
+print_non_valid(s_not, print_missing=FALSE)

sose2021/r/w04/P04-1.R

@@ -0,0 +1,27 @@
+# Josua Kugler, Christian Merten
+
+library(tidyverse)
+
+`%o%` <- function(f, g) function(...) f(g(...))
+
+# ich bin mal so dreist und lese das gesamte file direkt ein
+# wenn hier unbedingt read_lines verwendet werden soll, dann füge
+# man eben zuerst mit paste alle zeilen wieder zusammen
+lines <- read_file("books.txt")
+
+sort_char <- function(s) paste(sort(unlist(str_split(s, ""))), sep="", collapse="")
+
+cleared <- str_match_all(str_to_upper(str_replace_all(lines,
+                                                      pattern="\\(.*?\\)|[^a-zA-Z0-9]",
+                                                      replacement="")),
+                         "([A-Z]+)([0-9]+)")[[1]]
+
+unsorted_data <- tibble(category = sapply(cleared[,2], sort_char),
+                        count = as.integer(cleared[,3]))
+
+data <- unsorted_data[order(unsorted_data[,1]),]
+
+books_of_category <- function(data, cat_let) {
+    apply(data[str_detect(data$category, cat_let), ], 1,
+          function(x) str_glue("We have {x[2]} books of category {x[1]}"))
+}

sose2021/r/w04/P04-2.R

@@ -0,0 +1,112 @@
+# Josua Kugler, Christian Merten
+
+# install.packages("babynames")
+library(tidyverse)
+
+## Create some data-----------------------------------------------------------
+
+set.seed(1)
+
+baseset <- list()
+baseset$grade <- as.integer(c(5,6,7,8,9,10,11))
+baseset$grade_boost <- c(1,3,5,7,8,9,10)
+baseset$letter <- letters[1:4]
+baseset$letter_boost <- sample(1:5, 4, replace=T)
+babynames::babynames %>%
+  group_by(sex, name) %>% 
+  summarise(n = sum(n)) %>%
+  arrange(desc(n)) %>%
+  mutate(rank = min_rank(-n)) %>% 
+  filter (rank <= 3000) ->
+  ranked_names
+baseset$name <- ranked_names$name
+baseset$distance <- c(100,200,400,1000)
+baseset$distance_boost <- c(14,12,10,8)
+
+sample_observation <- function(n) {
+  res <- list()
+  res$name <- sample(baseset$name, n, replace=T)
+  res$grade <- sample(baseset$grade, n, replace=T)
+  res$letter <- sample(baseset$letter, n, replace=T)
+  boost_base <- 
+    baseset$grade_boost[match(res$grade,baseset$grade)] + 
+    baseset$letter_boost[match(res$letter,baseset$letter)]
+  res$time100 <- sample_time(100, baseset$distance_boost[1] + boost_base)
+  res$time200 <- sample_time(200, baseset$distance_boost[2] + boost_base)
+  res$time400 <- sample_time(400, baseset$distance_boost[3] + boost_base)
+  res$time1000 <- sample_time(1000, baseset$distance_boost[4] + boost_base)
+  as_tibble(res)
+}
+
+sample_time <- function(dist, boost) {
+  (runif(length(boost))/2+2.5)/boost*dist*2
+}
+
+sports <- sample_observation(1000)
+
+requirements <- tibble(
+  level = 1:11,
+  min100 = seq(43,23,len=11),
+  min1000 = seq(500,300,len=11)
+)
+
+
+
+## Exercises -----------------------------------------------------------------
+
+# a) 
+# sort sports by 'name' (alphabetically)
+arrange(sports, name)
+
+# b) 
+# sort sports by 'grade' (11, 10, ..., 5), 
+# in case of ties by 'letter' (a, b, d, e),
+# in case of ties by 'name' (A-Z)
+arrange(sports, grade, letter, name)
+
+# c)
+# count the numbers of students per class
+sports %>% group_by(grade, letter) %>% summarize(student_count = n())
+
+# d)
+# what is the mean, max and min class size
+sports %>%
+    group_by(grade, letter) %>%
+    summarize(student_count = n()) %>%
+    ungroup() %>%
+    summarize(mean_class_size = mean(student_count),
+              max_class_size = max(student_count),
+              min_class_size = min(student_count))
+
+# e)
+# get all students with a non-unqiue name
+sports %>% group_by(name) %>% filter(n()>1)
+
+# f)
+# get the top 10 sprinters (100m)
+sports %>% top_n(10, -time100)
+
+# g)
+# get the slowest 10 sprinters (100m)
+sports %>% top_n(10, time100)
+
+# h)
+# remove 100m, 200m, and 400m, and add velocity in km/h for 1000m
+sports %>% mutate(velocity = 60*60/time1000) %>% select(-(time100:time1000))
+
+# i)
+# rename 'grade' to 'level'
+sports %>% rename(level = grade)
+
+# j)
+# calculate average and min times for 200m in each grade
+sports %>% group_by(grade) %>% summarize(average200 = mean(time200), min200 = min(time200))
+
+# k)
+# select all time-columns
+sports %>% select(time100:time1000)
+
+# l)
+# show the fastest sprinter (100m) in each class 
+# sorted by class (ie by grade and letter)
+sports %>% group_by(grade, letter) %>% top_n(1, -time100) %>% arrange(grade, letter)

sose2021/r/w04/books.txt

@@ -0,0 +1,65 @@
+R S V C E W Y: 25
+vqayl 18 (plus minus25)
+wl: 16; MUST - 16; HCUDM: 14; LBR: 20
+c u g m h: 22
+BLZJ 24; FEJB - 27; xsa: 20; LDECK 15; S,K: 27. WOAC: 18; WORZE - 26. PRK 25
+L G U K E 19; w j x n 26
+XTL: 16; O Y B - 35. XHBWK - 18. AXUPL: 31; YELJ 13; d,r,c,l: 26. QEGX: 21
+RALM 26. G,K,I,W: 12; IJXC: 19. HPZAY: 19; JSPCO: 22; BIXE: 12
+VTG: 26
+dce: 25
+P J W 23
+AMFE: 15; YBA: 12; yxb: 26
+GV 19; SA 23; PTQ: 17; VHIC: 22; K W R A: 22; U V E B Y 23
+LEQZN 17; MJ - 11; MWQ: 24; LFOJKG: 28
+PJWUQ: 20. jqpk 14. FKZN 30
+HKWLDP 21; IVKTFSQ 22. QNA 25; Z X V S: 25. K X 17
+SEJ 18. FRYA: 14
+O H E: 19; WT 24. YJCHDNG: 22. JXAV: 22; XQSAT: 27
+W,M,Z,Y - 20; SVF: 17; IHNU 15
+KPVL: 12
+EMADH 30
+HFSAOJ 26
+LPVK: 21; LEM: 22. RDWCXA: 15; YEAU 16
+JCNW: 22 (nicht24)
+F,B,T,W,I,C: 13; QPMZ: 18; albio 22
+r g - 18; tudnp 13; IEWRBLT: 14; V: 20
+sefmdb: 25. WMFC: 14; k 30. V U E G: 17; nsfz: 23. O E C A: 21. N X V: 27
+REGS: 19; DZ: 22
+K Y - 14
+EH: 25; QVB: 24. B H E O N - 30; CH - 23
+AWXC: 18; VGDFZ: 20. ME: 12; YJBA 30. LYXUTHM: 21; D P M W E R 28; mrkavsj: 23; u p y t: 18
+HEINBFZ: 14; SGDLRK 25. G,M,Y,K,R: 19. UHRJT: 19
+OD: 30. PAJZYFH 24; h,v,r,x,w: 36 (plus minus15); DBNW: 24; ZJQWGSC: 26; M B X: 20
+YBCK: 21
+rclgi: 22. nkzpbg 19 (letztes Jahr15); VXZE: 21
+YHZ: 21
+LGTA: 26. K A G: 23. rvg: 20; UTIV - 19; FMVIPRT: 20 (letztes Jahr22)
+P Q X Y N O - 22
+ZSLHRY 27; KOMEN: 28; vf: 27; F W R 26 (soll:23); Y,X,D: 17; HKDM - 16; QMIGNSY: 16; G S Z - 20 (nicht24); DWUERKH - 24 (soll:20)
+L M E G: 16. ifelp: 28. AKQT: 20; BFQTX: 25; JBVWS 21; R Z 16; FGQCEV - 24; NEOF 19
+L R I: 19; Z H C W R: 27; A,V,W,L,U,E,T: 23; it: 32. o r p 20
+e,h: 14. TJSRHFD 25; MOLCHX: 24
+YAK: 21. m d e b 19
+DTOAMNWC: 14
+WNPSBZ 25; WYBNKD 16; xcosjtg 26
+t,s,z,o,f,w,y,a: 26. X,N,J,D: 22
+tefyk 20; V J B R K: 21
+JPEM: 17
+R: 22; CWGH 24 (soll:15)
+GZPA: 12
+LJSGP: 32
+KZBMNH: 26; ILZWJR - 18; GSUC: 20
+Q I N - 22 (nicht28)
+WUDMG: 18. GQAVW: 15
+w: 26; EDZ: 25
+DIX - 9. x n m k f: 17; L Z R O Y V M: 20; QAGVHB: 21; D A H T Q S: 16
+ZGAOI: 22; LICZM: 20. ZHDBKMLU: 21
+FCJUH: 20. IHJVSWB: 18; D F W G: 22. FKWSRM 30. G,M,O 26
+EKI: 18; unm - 22; CZWA: 18; PZML: 25; FVCUY: 27. Z,B,G,X,J,H - 21
+imvx: 21. cd: 27; YVCZQG 22
+XTVI: 20
+GVCDXBNK: 23
+LFGX: 26. EKMV 25; lhdika: 21; OGHLB 21
+PANDMC: 24
+twb: 20

sose2021/r/w05/L05-exerc.R

@@ -0,0 +1,95 @@
+library(tidyverse)
+
+
+# --- load athlete data
+
+# We are only interested in following disciplines
+std_runs <- c("100 metres", "200 metres", "400 metres", "800 metres", 
+              "1,500 metres", "5,000 metres", "10,000 metres", "Marathon")
+
+read_csv("athlete_events.csv") %>% 
+  filter(Sport == "Athletics") %>% 
+  select(Name, Sex, Age, Height, Weight, Year, Event, Medal) %>% 
+  mutate(
+    Event = str_remove(Event, "Athletics Women's "),
+    Event = str_remove(Event, "Athletics Men's ")) %>% 
+  filter(Event %in% std_runs) ->
+  athletes
+
+
+# --- Top Medalists
+
+athletes %>% 
+    pivot_wider(names_from = Medal, values_from = Medal) %>%
+    mutate(across(c(Gold, Bronze, Silver), ~ !is.na(.))) %>%
+    group_by(Name) %>%
+    summarize(across(where(is.logical), sum)) %>%
+    arrange(-Gold, -Silver, -Bronze) %>%
+    transmute(Name, Gold, Silver, Bronze) ->
+    medal_ranking
+
+
+# --- Age distribution among Women's Marathon participants
+
+medal_color <- c(Bronze = "#6A3805", Silver = "#B4B4B4", Gold = "#AF9500")
+
+athletes %>% 
+    filter(Event == "Marathon", Sex == "F", Year > 1980) %>%
+    mutate(Year = as.factor(Year)) ->
+    d
+
+ggplot(d, aes(x = Year, y = Age)) +
+    geom_boxplot(na.rm=T) +
+    geom_point(data = drop_na(d), mapping = aes(color = Medal)) +
+    scale_color_manual(values = medal_color) +
+    ggtitle("Age distribution among Women's Marathon participants")
+
+# --- Change in height of male runners
+
+athletes %>% 
+    mutate(Event = factor(Event, levels=std_runs)) %>% # use factor for ordering
+    filter(Sex == "M", Year > 1900) %>%
+    group_by(Event, Year) %>%
+    summarize(MeanHeight = mean(Height, na.rm=T)) %>%
+    ggplot(aes(x = Year, y = MeanHeight, color = Event)) +
+        geom_point() + 
+        ggtitle("Men's runs - mean across participants") +
+        geom_smooth(se = FALSE)
+
+# --- Medalist times
+
+# Times are given as strings with inconsistent format.
+# Need custom function for conversion in seconds
+str2sec <- function(s) { 
+  s %>% 
+    str_split(":|h|-") %>% 
+    sapply(function(x) {
+      v <- as.double(x)
+      v3 <- c(0,0,0)
+      v3[(4-length(v)):3] <- v
+      v3[1] * 3600 + v3[2] * 60 + v3[3]
+    })
+}
+
+# We are only interested in following disciplines
+std_runs <- c("100M", "200M", "400M", "800M", "1500M", "5000M", "10000M", "Marathon")
+
+read_csv("results.csv") %>% 
+  mutate(
+    Event = str_remove(Event, c(" Men")),
+    Event = str_remove(Event, c(" Women"))) %>% 
+  filter(Event %in% std_runs) %>% 
+  mutate(Result = str2sec(Result)) %>% 
+  drop_na() ->
+  runs
+
+medal_color <- c(B = "#6A3805", S = "#B4B4B4", G = "#AF9500")
+
+ggplot(runs, aes(x = Year, y = Result, shape = Gender)) +
+    facet_wrap(vars(factor(Event, levels = std_runs)), scales = "free_y") +
+    geom_point(aes(color = Medal)) +
+    scale_color_manual(values = medal_color) +
+    ggtitle("Times of medal winners in different running disciplines") +
+    xlab("Year") +
+    ylab("Time in seconds") +
+    geom_smooth(se = T)

sose2021/r/w05/P05-1.R

@@ -0,0 +1,79 @@
+# Josua Kugler, Christian Merten
+
+# install.packages("babynames")
+library(tidyverse)
+
+## Create some data-----------------------------------------------------------
+
+set.seed(1)
+
+baseset <- list()
+baseset$grade <- as.integer(c(5,6,7,8,9,10,11))
+baseset$grade_boost <- c(1,3,5,7,8,9,10)
+baseset$letter <- letters[1:4]
+baseset$letter_boost <- sample(1:5, 4, replace=T)
+babynames::babynames %>%
+  group_by(sex, name) %>% 
+  summarise(n = sum(n)) %>%
+  arrange(desc(n)) %>%
+  mutate(rank = min_rank(-n)) %>% 
+  filter (rank <= 3000) ->
+  ranked_names
+baseset$name <- ranked_names$name
+baseset$distance <- c(100,200,400,1000)
+baseset$distance_boost <- c(14,12,10,8)
+
+sample_observation <- function(n) {
+  res <- list()
+  res$name <- sample(baseset$name, n, replace=T)
+  res$grade <- sample(baseset$grade, n, replace=T)
+  res$letter <- sample(baseset$letter, n, replace=T)
+  boost_base <- 
+    baseset$grade_boost[match(res$grade,baseset$grade)] + 
+    baseset$letter_boost[match(res$letter,baseset$letter)]
+  res$time100 <- sample_time(100, baseset$distance_boost[1] + boost_base)
+  res$time200 <- sample_time(200, baseset$distance_boost[2] + boost_base)
+  res$time400 <- sample_time(400, baseset$distance_boost[3] + boost_base)
+  res$time1000 <- sample_time(1000, baseset$distance_boost[4] + boost_base)
+  as_tibble(res)
+}
+
+sample_time <- function(dist, boost) {
+  (runif(length(boost))/2+2.5)/boost*dist*2
+}
+
+sports <- sample_observation(1000)
+
+requirements <- tibble(
+  level = 1:11,
+  min100 = seq(43,23,len=11),
+  min1000 = seq(500,300,len=11)
+)
+
+
+
+## Exercises -----------------------------------------------------------------
+
+
+# a)
+# get all students who failed in 100m or 1000m
+sports %>% left_join(requirements, by = c("grade" = "level")) %>%
+    filter(time100 <= min100, time1000 <= min1000)
+
+# b)
+# get names, grade and letter of all students who failed 1000m by less than 1s
+# so you can still let them pass :)
+sports %>% left_join(requirements, by = c("grade" = "level")) %>%
+    filter((time1000 - min1000) > 0 & (time1000 - min1000) < 1) %>%
+    select(name, grade, letter)
+
+# c)
+# tidy the data:
+# create two columns from all timeXXX-columns:
+# a column "time" with the entries from all timeXXX-columns
+# a column "distance" of the distance the time refers to
+# make sure all columns have a suitable type
+sports %>% pivot_longer(c("time100", "time200", "time400", "time1000"),
+                        names_to="distanceRaw",
+                        values_to="time") %>%
+           extract(distanceRaw, into="distance", regex="time(.*)", convert=T)

sose2021/r/w05/P05-2.R

@@ -0,0 +1,65 @@
+library(tidyverse)
+library(babynames)
+
+# 1)
+babynames %>%
+    filter(year >= 2000) %>%
+    group_by(sex, name) %>%
+    summarize(n=sum(n), .groups="drop") ->
+    bn20
+
+# 2)
+bn20 %>%
+    group_by(name) %>%
+    pivot_wider(names_from="sex", values_from="n") %>%
+    rename(female = "F", male = "M") %>%
+    filter(female > 0 & male > 0 & (female+male) > 1e5) %>%
+    arrange(abs(female - male) / (male + female)) ->
+    bn20_sim
+
+# 3)
+bn20 %>% group_by(name_length = nchar(name)) %>% summarize(n=sum(n))
+
+# 4)  
+min_len <- min(nchar(bn20$name))
+bn20 %>% filter(nchar(name) == min_len) %>% arrange(desc(n))
+
+# 5)
+babynames %>% 
+   group_by(year, sex) %>%
+   summarize(avg_len = mean(nchar(name))) ->
+   bn_avg_len
+
+bn_avg_len %>%
+    ggplot() +
+    geom_line(aes(x=year, y=avg_len, color=sex))
+  
+# 6)
+babynames %>%
+    select(-prop) %>%
+    filter(year >= 2000) ->
+    bn
+
+# Annahme: "Neue" Namen die im Vorjahr noch nicht in bn auftauchen
+# werden ausgewertet mit n_prev = 0
+replace_with_zero <- function(x) {
+    x[is.na(x)] <- 0
+    x
+}
+
+bn %>%
+    filter(year > 2000) %>%
+    left_join(mutate(bn, year = year + 1, n_prev = n, n = NULL)) %>%
+    mutate(n_prev = replace_with_zero(n_prev)) ->
+    bn_prev
+
+# Wenn das nicht erwünscht, führe man diese Zeile aus
+# bn %>% inner_join(mutate(bn, year = year + 1, n_prev = n, n = NULL)) -> bn_prev
+
+n_mean <- mean(bn$n)
+
+bn_prev %>% 
+    mutate(s_incr = (n-n_prev)/(n_prev + n_mean)) %>%
+    group_by(year, sex) %>%
+    slice_max(s_incr, n = 3) ->
+    bn_trending

sose2021/r/w06/L06-1.R

@@ -0,0 +1,27 @@
+clear_warnings <- function() last.warning <<- list()
+
+careless <- function(f) {
+    function(...) {
+        suppressWarnings(f(...))
+    }
+}
+
+fail_with <- function(expr, value) tryCatch(expr, error = function(cond) value)
+does_error <- function(expr) {
+    didFail <- F
+    tryCatch(expr, error = function(cond) didFail <<- T)
+    didFail
+}
+
+count_warnings <- function(expr) {
+    N <- 0
+    withCallingHandlers(expr, warning = function(cond) N <<- N + 1)
+    N
+}
+
+record <- function(expr) {
+    msgs <- c()
+    rec <- function(cond) { msgs <<- c(msgs, cond$message); rlang::cnd_muffle(cond)}
+    withCallingHandlers(expr, warning = rec, message = rec)
+    msgs
+}

sose2021/r/w06/P06-1.R

@@ -0,0 +1,14 @@
+# Josua Kugler, Christian Merten
+
+rec_series <- function(start, f, n, m = length(start)) {
+    if (length(start) >= n) return(start)
+    rec_series(c(start, f(tail(start, m))), f, n, m)
+}
+
+rec_series(rep(1, 2), sum, 16)
+rec_series(rep(1, 3), sum, 16)
+rec_series(rep(1, 4), sum, 16)
+rec_series(c(1,1), function(x) 2*x[1]+x[2], 16)
+rec_series(c(1,1), function(x) x[2]-x[1], 16)
+rec_series(1:5, mean, 16)
+rec_series(1:5, median, 16)

sose2021/r/w06/P06-2.R

@@ -0,0 +1,34 @@
+# Josua Kugler, Christian Merten
+
+make_store <- function(n) {
+    dl <- vector(mode="list", length=n)
+    i <- 1
+    function(item=NULL, reset=FALSE) {
+        if (reset) { dl <<- vector(mode="list", length=n); i <<- 1 }
+        if (is.null(item)) return(dl)
+        dl[[i]] <<- item
+        i <<- i+1
+        if (i > n) i <<- 1
+        invisible(dl)
+    }
+}
+
+store3 <- make_store(3)
+store2 <- make_store(2)
+store3(1)
+store3("asdf")
+str(store3())
+store3(list())
+store3(TRUE)
+store3(1:10)
+str(store3())
+store3(NA, reset=TRUE)
+str(store3())
+store3(1:10)
+str(store3())
+store2(1)
+store2(2)
+store2(3)
+str(store2())
+str(store3())
+

sose2021/r/w06/P06-3.R

@@ -0,0 +1,104 @@
+# Josua Kugler, Christian Merten
+
+# a) ----------------------------------------------------------------------- 
+midpoint <- function(f, a, b) (b-a) * f((a+b)/2)
+trapezoid <- function(f, a, b) (b-a) * (f(a) + f(b))/2
+
+# b) ----------------------------------------------------------------------
+nc_integrate <- function(f, lower, upper, n, rule) {
+    xs <- seq(lower, upper, length.out=n+1)
+    sum(rule(f, xs[-(n+1)], xs[-1]))
+}
+
+# c) ------------------------------------------------------------------------
+closeable_seq <- function(from, to, len, closed=TRUE) {
+    if (closed) seq(from, to, length.out = len)
+    else seq(from, to, length.out = len+2)[-c(1, len+2)]
+}
+
+newton_cotes <- function(coef, closed=TRUE) {
+    m <- length(coef)
+    w <- coef / sum(coef)
+    function(f, a, b) {
+        t <- mapply(closeable_seq, a, b, len=m, closed=closed)
+        (b-a) * colSums(w*matrix(f(t), ncol=length(a)))
+    }
+}
+
+# d) ------------------------------------------------------------------------
+
+# some objects for param_fun-list
+sin1x <- function(x) {
+  y <- suppressWarnings(sin(1/x))
+  y[is.na(y)] <- 0
+  y
+}
+set.seed(0)
+x <- c(0:1, runif(5))
+y <- runif(7)
+
+# list of functions with integral interval
+param_fun <- list(
+  poly = list(f = function(x) x^4 - x^3 - 3*x^2 + x + 2, lower = 0, upper = 2),
+  sin1x = list(f = sin1x, lower = 0, upper = 1),
+  lin = list(f = approxfun(x, y), lower = 0, upper = 1),
+  spline = list(f = splinefun(x, y), lower = 0, upper = 1)
+)
+
+# true values of integrals
+true <- c(
+  poly = 0.4, 
+  sin1x = 0.504067061906928, 
+  lin = 0.472878602164825, 
+  spline = 0.97236924451286)
+
+# options for creating integral-rules
+param_rule <- list(
+  midpoint = list(coef = 1, closed=FALSE),
+  trapezoid = list(coef = c(1,1), closed=TRUE),
+  simpson = list(coef = c(1,4,1), closed=TRUE),
+  boole = list(coef = c(7,32,12,32,7), closed=TRUE),
+  open5 = list(coef = c(611, -453, 562, 562, -453, 611), closed=FALSE)
+)
+
+# how many function evaluations are allowed
+param_n <- 5*(2:20)
+
+library(tidyverse)
+
+param <- as_tibble(
+  expand.grid(n = param_n,
+              fun_name = names(param_fun),
+              rule_name = names(param_rule),
+              stringsAsFactors=FALSE))
+
+nc_rules <- sapply(param_rule, do.call, what=newton_cotes)
+
+# run nc_integrate with given options
+call_nc <- function(n, fun_name, rule_name) {
+  opts <- param_fun[[fun_name]]
+  opts$rule = nc_rules[[rule_name]]
+  # to make things fair:
+  # a rule which evaluates f at m points may only be called n/m times
+  opts$n = round(n / length(param_rule[[rule_name]]$coef))
+  do.call(nc_integrate, opts)
+}
+
+param %>% rowwise() %>%
+    mutate(value=nc_integrate(param_fun[[fun_name]]$f,
+                              lower = param_fun[[fun_name]]$lower,
+                              upper = param_fun[[fun_name]]$upper,
+                              n = n,
+                              rule = nc_rules[[rule_name]]),
+           true=true[[fun_name]],
+           error=abs(true-value)) -> res
+
+# plot results
+plots <- lapply(names(param_fun), function(nm) 
+  res %>%
+    filter(fun_name == nm) %>%
+    ggplot(aes(x = n, y = error, color = rule_name)) +
+    scale_y_log10() +
+    geom_line() + geom_point() + labs(title = nm)
+)
+gridExtra::grid.arrange(grobs = plots, nrow=2)

sose2021/r/w07/P07-1.R

@@ -0,0 +1,14 @@
+# Josua Kugler, Christian Merten
+
+mem_near <- function(f_in) {
+    memo <- list(input=c(), value=c())
+    function(x, nearest) {
+        if (!nearest) {
+            memo$input <<- c(memo$input, x)
+            y <- f_in(x)
+            memo$value <<- c(memo$value, y)
+            return(y)
+        }
+        memo$value[apply(outer(memo$input, x, function(a, b)  abs(a-b)), 2, which.min)]
+    }
+}

sose2021/r/w07/P07-2.R

@@ -0,0 +1,79 @@
+# Josua Kugler, Christian Merten
+
+poly1 <- structure(
+  list(sides = c(2, 2, 2, 2), angles = c(pi/3, 2*pi/3, pi/3, 2*pi/3)),
+  class = c("Quadrilateral", "Polygon"))
+poly2 <- structure(
+  list(sides = c(3, 4, 3, 4), angles = rep(pi/2, 4)),
+  class = c("Rectangle", "Quadrilateral", "Polygon"))
+poly3 <- structure(
+  list(sides = c(2, 2, 2), angles = rep(pi/3, 3)),
+  class = c("Triangle", "Polygon"))
+poly4 <- structure(
+  list(sides = rep(1, 5), angles = rep(3/5*pi, 5)),
+  class = c("Polygon"))
+
+get_corners <- function(x) {
+  n <- length(x$sides)
+  if (n < 3) return(invisible(NULL))
+  out <- matrix(ncol = 2, nrow = length(x$sides))
+  direction <- c(1, 0)
+  point <- c(0, 0)
+  out[1, ] <- point
+  for (i in 1:(n-1)) {
+    point <- point + direction * x$sides[i]
+    out[i+1, ] <- point
+    a <- pi - x$angles[i]
+    direction <- matrix(c(cos(a), sin(a), -sin(a), cos(a)), ncol=2) %*% direction
+  }
+  out
+}
+
+plot_polygon <- function(x) {
+  corners <- get_corners(x)
+  plot(range(corners[,1]), range(corners[,2]), type = 'n', axes=FALSE, ann=FALSE, asp=1)
+  polygon(corners[,1], corners[,2], lwd = 3)
+}
+
+# a)
+plot.Polygon <- plot_polygon
+
+# b)
+Rectangle <- function(w, h) structure(
+    list(sides = c(w, h, w, h), angles = rep(pi/2, 4)),
+    class = c("Rectangle", "Quadrilateral", "Polygon"))
+
+Triangle <- function(s1, s2, a1) {
+    b <- sqrt(s1^2 + s2^2 - 2*s1*s2*cos(a1))
+    a2 <- acos((b^2 + s2^2 - s1^2)/(2 * s2 * b))
+    structure(list(sides = c(s1, s2, b),
+                   angles = c(a1, a2, 2*pi-a1-a2)),
+              class = c("Triangle", "Polygon"))
+}
+
+# c)
+validate_Triangle <- function(x) {
+    stopifnot("no triangle" = "Triangle" %in% class(x))
+    tri <- Triangle(x$sides[1], x$sides[2], x$angles[1])
+    stopifnot("side and angles do not fit" = identical(c(tri$angles, tri$sides), c(x$angles, x$sides)))
+}
+
+# d)
+circumference <- function(obj) {
+    UseMethod("circumference")
+}
+
+circumference.Polygon <- function(p) sum(p$sides)
+
+# e)
+area <- function(obj) {
+    UseMethod("area")
+}
+
+area.Triangle <- function(p) {
+    h <- p$sides[1] * sin(p$angles[1])
+    p$sides[2]*h*0.5
+}
+
+area.Quadrilateral <- function(p)
+    1/2 * (p$sides[1]*p$sides[4]*sin(p$angles[4]) + p$sides[2]*p$sides[3]*sin(p$angles[2]))

sose2021/r/w07/P07-3.R

@@ -0,0 +1,58 @@
+# Josua Kugler, Christian Merten
+
+library(R6)
+
+compass <- c("N", "E", "S", "W")
+movement <- list(N = c(0, 1), S = c(0, -1), W = c(-1, 0), E = c(1, 0))
+
+# helper because R indexing beginning at 1 is stupid
+get_dir <- function(k) {
+    compass[(k-1) %% 4 + 1]
+}
+
+arrow_coords <- function(n, coord) {
+    (coord + 0.5) / n
+}
+
+GridPath <- R6Class("GridPath", list(
+    path = matrix(c(0,0), nrow=1),
+    dir = character(0),
+    initialize = function(dir) {
+        self$dir <- dir
+    },
+    move = function(steps) {
+        if (steps == 0) return(invisible(self))
+        n <- nrow(self$path)
+        self$path <- rbind(self$path,
+                           self$path[n,] + movement[[self$dir]])
+        self$move(steps-1)
+    },
+    rotate_right = function() {
+        self$dir <- get_dir(which(self$dir == compass) + 1)
+        invisible(self)},
+    rotate_left = function() {
+        self$dir <- get_dir(which(self$dir == compass) - 1)
+        invisible(self)
+    },
+    print = function() {
+        n <- max(self$path)+1
+        grid <- matrix(rep(F, n^2), nrow=n)
+        apply(self$path, 1, function(r) grid[r[1]+1, r[2]+1] <<- T)
+        image(grid, useRaster=T, asp=T, col=c("white", "black"),
+              axes=F)
+        final <- self$path[nrow(self$path),]
+        print(final)
+        mv <- movement[[self$dir]]
+        coords <- c((final)/(n-1),
+                    (final + mv) / (n-1))
+        arrows(coords[1], coords[2], coords[3], coords[4], col="red")
+    }))
+
+gpath3 <- GridPath$new("N")
+gpath3$move(7)$
+    rotate_right()$move(8)$
+    rotate_right()$move(7)$
+    rotate_right()$move(6)$
+    rotate_right()$move(5)
+
+gpath3

sose2021/r/w08/P08-1.R

@@ -0,0 +1,5 @@
+# Josua Kugler, Christian Merten
+
+library(rlang)
+
+`%->%` <- function(value, x) eval.parent(substitute(x <- value))

sose2021/r/w08/P08-2.R

@@ -0,0 +1,50 @@
+# Josua Kugler, Christian Merten
+
+library(tidyverse)
+library(rlang)
+
+variables <- LETTERS[1:7]
+names(variables) <- variables
+prop_ops <- exprs(`(`,`!`,`&`,`|`,`<=`,`>=`,`==`)
+prop_ops_str <- sapply(prop_ops, expr_text)
+ops_expr_str <- c("==", "<=", ">=", "&", "|", "!")
+ops_print_str <- c("\u2194","\u2190","\u2192","\u2227","\u2228","\u00AC")
+names(ops_print_str) <- ops_expr_str
+
+flip <- function(f) function(x,y) f(y,x)
+implies <- function(A, B) (!A) | B
+
+validate_Prop <- function(e) {
+    stopifnot("class must be Prop" = "Prop" %in% class(e))
+    stopifnot("only numbers 0 and 1 allowed" = !str_detect(expr_text(e), "[2-9]"))
+    stopifnot("invalid operator or variable" = all(all.names(e) %in% c(variables, ops_expr_str, "(", ")")))
+    e
+}
+
+Prop <- function(x) {
+    e <- enexpr(x)
+    if (typeof(e) == "symbol") e <- expr(( (!!e) ))
+    validate_Prop(structure(e, class="Prop"))
+}
+
+tochar <- function(p) str_replace_all(expr_text(p), fixed(ops_print_str))
+
+print.Prop <- function(p) {
+    cat(tochar(p), "\n")
+    invisible(p)
+}
+
+interprete <- function(prop, vars, append=FALSE) {
+    res <- as.logical(eval_tidy(prop, c(as.list(vars),
+                                        `>=` = implies,
+                                        `<=` = flip(implies))))
+    var <- tochar(prop)
+    if(append) add_column(vars, (!!sym(var)) := res)
+    else res
+}
+
+combinations <- do.call(expand.grid, lapply(variables, function(v) c(0,1)))
+
+is_tautology <- function(prop) {
+    all(interprete(prop, combinations))
+}

sose2021/r/w08/P08-3.R

@@ -0,0 +1,32 @@
+# Josua Kugler, Christian Merten
+
+library(tidyverse)
+
+# a)
+rate <- function(df, expr, name) {
+    t <- summarize(df, total := sum({{expr}}))
+    mutate(df, {{name}} := {{expr}} / t$total)
+}
+
+#b)
+show_na <- function(df, expr) df %>% filter(is.na({{expr}}))
+
+#c)
+ggplot_line <- function(df, expr_x, expr_y)
+    df %>% ggplot(aes(x = {{expr_x}}, y = {{expr_y}})) + geom_line()
+
+#d)
+athletes <- read_csv("athletes.csv")
+medal_color <- c(Bronze = "#6A3805", Silver = "#B4B4B4", Gold = "#AF9500")
+
+plot_olympia <- function(event, sex, metric) {
+    athletes %>% filter(Event == event , Sex == sex) %>%
+        mutate (Year = as.factor(Year)) ->
+        d
+
+    ggplot(d, aes(x = Year, y = {{metric}})) +
+        geom_boxplot (na.rm = TRUE) +
+        geom_point (data = drop_na (d), aes(color = Medal)) +
+        scale_color_manual (values = medal_color) +
+        ggtitle(str_c(event, sex, sep = ", "))
+}