update groupschemes lecture

.gitignore

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

.gitmodules

@@ -4,3 +4,18 @@
 [submodule "sose2020/num/hdnum"]
 	path = sose2020/num/hdnum
 	url = https://parcomp-git.iwr.uni-heidelberg.de/Teaching/hdnum
+[submodule "ws2020/theo/lectures"]
+	path = ws2020/theo/lectures
+	url = https://git.flavigny.de/christian/theo-lecture
+[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

@@ -27,6 +27,17 @@
 \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}
+    },
+}
 
 \DeclareOption*{\PassOptionsToClass{\CurrentOption}{article}}
 \DeclareOption{uebung}{
@@ -52,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}
@@ -151,6 +162,22 @@
 % 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
@@ -213,7 +240,7 @@
   }
   % 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{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

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

sose2020/ana/uebungen/ana10.tex

@@ -0,0 +1,189 @@
+\documentclass[uebung]{../../../lecture}
+
+\title{Analysis II: Übungsblatt 10}
+\author{Leon Burgard, Christian Merten}
+
+\begin{document}
+
+\punkte
+
+\begin{aufgabe}
+    \begin{enumerate}[(a)]
+        \item Beh.: $T(t) = (T_0 - T_{a})e^{kt}+T_a$ löst das gegebene AWP.
+            \begin{proof}
+                Löse zunächst homogene DGL durch Trennung der Variablen:
+                \begin{align*}
+                    \frac{\mathrm{d}T}{\d t} = kT \implies \frac{\d T}{T} = k \d t
+                    \implies T_h = Ae^{kt}
+                .\end{align*}
+                Mit der partikulär Lösung $T_i = T_a$ ($T_a' = 0 = kT_a - kT_a$), folgt:
+                $T(t) = A e^{kt} + T_a$. Mit $T(0) = T_0$ folgt $A = T_0 - T_a$, also
+                insgesamt
+                \[
+                    T(t) = (T_0 - T_a) e^{kt} + T_a
+                .\]
+            \end{proof}
+        \item Beh.: Es dauert $60$ Zeiteinheiten.
+            \begin{proof}
+                Mit $k \coloneqq - \frac{\ln 2}{20}$ folgt
+                \[
+                    T(20) = (T_0 - T_a) \exp\left(- \frac{\ln 2}{20}\cdot  20\right) + T_a
+                    = \frac{1}{2} (T_0 - T_a) + T_a = \frac{1}{2} (T_0 + T_a)
+                .\] Mit $T_0 = 100$ und $T_a = 20$ folgt $T(20) = 60$.
+                Damit folgt nun direkt
+                \begin{align*}
+                    T(60) &= (T_0 - T_a) \exp\left( - \frac{\ln 2}{20} \cdot 60 \right) + T_a \\
+                    &= (T_0 - T_a) \exp\left( - \ln\left( 2^{3} \right)  \right) + T_a \\
+                    &= (T_0 - T_a) \frac{1}{8} + T_a \\
+                    &= \frac{1}{8} T_0 + \frac{7}{8} T_a
+                .\end{align*}
+                Mit $T_0 = 100$ und $T_a = 20$ folgt $T(60) = 30$.
+            \end{proof}
+        \item Beh.: $\lim_{t \to \infty} T(t) = 20$.
+            \begin{proof}
+                Es gilt da $k < 0$:
+                \[
+                    \lim_{t \to \infty} T(t) = \lim_{t \to \infty} ( (T_0 - T_a) \underbrace{e^{kt}}_{\xrightarrow {t \to \infty} 0} + T_a ) = T_a
+                .\] Mit $T_a = 20$ aus (b) folgt die Behauptung.
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Beh.: Falls $y_0 = -1$ ist $y(t) = -1$ Lösung der AWA.
+    \begin{proof}
+        Es gilt $y(t_0) = -1 = y_0$ und $y'(t) = 0 = -2t(1 - 1)^2 = -2t(1 + y(t))^2$, $\forall t \in \R$.
+    \end{proof}
+
+    Beh.: Falls $y_0 \neq -1$ ist $y(t) = - \frac{1}{t_0^2 - t^2 - \frac{1}{1 + y_0}} - 1$
+    Lösung der AWA.
+    \begin{proof}
+        Falls $y \neq -1$: Trennung der Variablen:
+        \begin{salign*}
+            \frac{\d y}{\d t} &= -2t (1+y)^2 \\
+            \implies \frac{\d y}{(1+y)^2} &= -2t \d t \\
+            \implies \int_{c}^{y} \frac{\d y}{(1+y)^2} \d y &= \int_{t_0}^{t} -2t \d t \\
+            \implies - \frac{1}{1 + y} - \frac{1}{1+c} &= -t^2 + t_0^2 \\
+            \intertext{Damit folgt}
+            y(t) &= - \frac{1}{t_0^2 - t^2 + \frac{1}{1+c}} - 1
+            \intertext{Durch Einsetzen der Anfangsbedingung folgt}
+            y(t_0) &= - 1 - c -1 = y_0 \implies c = -2 - y_0
+            \intertext{Insgesamt folgt also}
+            y(t) &= - \frac{1}{t_0^2 - t^2 - \frac{1}{1 + y_0}} - 1
+        .\end{salign*}
+        Dies ist wohldefiniert da $y_0 \neq -1$.
+        Da $1 \neq 0$ folgt $y(t) \neq -1$ $\forall t \in \R$, d.h. keine weitere Fallunterscheidung notwendig
+        und $y(t)$ Lösung der AWA.
+    \end{proof}
+\end{aufgabe}
+
+\begin{aufgabe}
+    \begin{enumerate}[(a)]
+        \item Beh.: Das gegebene AWP hat eine Lösung $y\colon [0, b] \to \R$.
+            \begin{proof}
+                Es ist $f(t,y) = \frac{1}{1 + |y|}$ auf $\R \times \R$ stetig.
+                Bestimme
+                \[
+                    M = \max_{(t,y) \in D} |f(t,y) | > 0
+                .\]
+                Wähle $\alpha \coloneqq b > 0$ und $\beta \coloneqq 2 \alpha M$. Dann ist $f$ insbesondere auf
+                \[
+                    D = \{(t,y) \in \R \times \R  \mid |t| \le \alpha, |y - y_0 | \le \beta \} 
+                \] stetig.
+                Dann ex. nach dem Satz von Peano auf dem Intervall $[t_0 - T, t_0 + T]$ eine Lösung
+                der AWA mit
+                \[
+                T = \min \left\{ \alpha, \frac{\beta}{M} \right\} = \min \{\alpha, 2 \alpha \} = \alpha = b
+            .\] Mit $t_0 = 0$ existiert also inbesondere eine Lösung $y(t)$ auf $[0 + b] \subseteq [-T, T]$.
+            \end{proof}
+        \item Beh.: Diese Lösung $y$ ist für festes $y_0 \in \R$ eindeutig.
+            \begin{proof}
+                Nach VL g.z.z., dass $f(t,y)$ Lipschitz-stetig bezüglich $y$ ist. Seien dazu
+                $x, y \in \R$. Dann ist
+                \begin{salign*}
+                    |f(t,x) - f(t,y)| &= \left| \frac{1}{1 + |x|} - \frac{1}{1+|y|} \right| \\
+                    &= \left| \frac{|y|-|x|}{(1 + |x|)(1+|y|)} \right| \\
+                    &\le \frac{|x-y|}{1 + |x|+|y|+|xy|} \\
+                    &\le 1 \cdot |x-y|
+                .\end{salign*}
+                Mit $L \coloneqq 1$ folgt die Behauptung.
+            \end{proof}
+        \item Sei nun zusätzlich $v\colon [0,b] \to \R$ Lösung der AWA mit $v(0) = v_0$.
+
+            Beh.:
+            \[
+                |y(t) - v(t)| \le e^{t} |y_0 - v_0| \quad \forall t \in [0,b]
+            .\] 
+            \begin{proof}
+                Definiere
+                \[
+                    w(t) \coloneqq |y(t) - v(t)|
+                .\] Da $y$ und $v$ die AWA lösen, erfüllen sie die Integralgleichung. Damit folgt
+                \begin{salign*}
+                    w(t) &= \left| y_0 - v_0 + \int_{t_0}^{t} f(s, y(s)) \d s - \int_{t_0}^{t} f(s, v(s)) \d s  \right| \\
+                    &\le |y_0 - v_0| + \int_{t_0}^{t} |f(s, y(s)) - f(s, v(s))| \d s \\
+                    &\stackrel{\text{(b)}}{\le} |y_0 - v_0| + \int_{t_0}^{t} |y(s) - v(s)| \d s  \\
+                    &= |y_0 - v_0| + \int_{t_0}^{t} w(s) \d s \\
+                    &\stackrel{\text{Lemma v. Gronwall}}{\le } e^{t-t_0} |y_0 - v_0|
+                .\end{salign*}
+                Mit $t_0 = 0$ folgt die Behauptung.
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    \begin{align*}
+        y'(t) &= 3 (y(t))^{\frac{2}{3}}, t \in I \\
+        y(0) &= 0
+    .\end{align*}
+    \begin{enumerate}[(a)]
+        \item Beh.: Es ex. unendlich viele Lösungen für diese AWA.
+            \begin{proof}
+                Die Funktion $y(t) = (t-t_0)^{3}$ löst die AWA mit $y(t_0) = 0$. Denn
+                \[
+                    y'(t) = 3 (t-t_0)^{2} = 3 (t-t_0)^{2 \cdot 3 \cdot \frac{1}{3}} = 3 \left((t-t_0)^{3}\right)^{\frac{2}{3}} = 3 (y(t))^{\frac{2}{3}} \quad (*)
+                .\] 
+                Da $I \subseteq \R$ abgeschlossenes Intervall mit $0 \in I$, ex. $a, b \in \R$
+                mit $a < 0$, $b > 0$, s.d. $I = [a,b]$. Definiere nun
+                \[
+                    y_d(t) \coloneqq \begin{cases}
+                        0 & a \le t \le d \\
+                        (t-d)^{3} & \text{sonst}
+                    \end{cases}
+                .\] g.z.z.: $\forall d \in R$ mit $0 \le d \le b$ ist $y_d(t)$ eine Lösung der AWA.
+
+                Es gilt $y_d(t_0) = y_d(0) = 0$. Weiter ist mit für $t \neq d$:
+                \[
+                    y'_d(t) = \begin{cases}
+                        0 = 3 (y(t))^{\frac{2}{3}} & a \le t < d \\
+                        3 (y(t))^{\frac{2}{3}} & \text{sonst}
+                    \end{cases}
+                .\] Für $t = d$ gilt
+                \begin{align*}
+                    \lim_{h \searrow 0} \frac{y_d(d + h) - y_d(d)}{h}
+                    &= \lim_{h \searrow 0} \frac{(d+h-d)^{3} - (d-d)^{3}}{h} \\
+                    &= \lim_{h \searrow 0} \frac{h^{3}}{h}  \\
+                    &= \lim_{h \searrow 0} h^2  \\
+                    &= 0  \\
+                    &= \lim_{h \nearrow 0} \frac{y_d(d+h) - y_d(d)}{h}
+                .\end{align*}
+                Also gilt für $t \in I$: $y_d'(t) = 3 (y_d(t))^{\frac{2}{3}}$. Damit
+                löst $y_d(t)$ die AWA.
+            \end{proof}
+        \item Beh.: $f(t,y) \coloneqq 3 y^{\frac{2}{3}}$ ist nicht Lipschitz-stetig.
+            \begin{proof}
+                Sei $L > 0$ beliebig. Dann wähle $x = 0$ und $y < \left(\frac{3}{L} \right)^{3}$. Dann folgt
+                \begin{salign*}
+                    \left| f(x) - f(y) \right| &= \left|3 y^{\frac{2}{3}}\right| \\
+                    &= \left|3 y^{-\frac{1}{3}}\right| |y| \\
+                    &> \left| 3 \frac{L}{3}\right| |y| \\
+                    &= L |y|
+                .\end{salign*}
+            \end{proof}
+            Die Lipschitz-stetigkeit von $f$ bezüglich $y$
+            ist Voraussetzung für den Eindeutigkeitssatz aus der VL.
+        \item siehe (a).
+    \end{enumerate}
+\end{aufgabe}
+
+\end{document}

sose2020/ana/uebungen/ana11.tex

@@ -0,0 +1,201 @@
+\documentclass[uebung]{../../../lecture}
+
+\title{Analysis II: Übungsblatt 11}
+\author{Leon Burgard, Christian Merten}
+
+\begin{document}
+
+\punkte
+
+\begin{aufgabe}
+    \begin{enumerate}[(a)]
+        \item Beh.: Das AWP $(*)$ hat eine globale definierte Lösung $u$.
+            \begin{proof}
+                Da $f$ stetig existiert nach Peano eine lokale Lösung $y(t)$ auf $I \coloneqq [t_0, t_0 + T]$.
+                Es ist also
+                \[
+                    y(t) = y_0 + \int_{t_0}^{t} f(s, y(s)) \d s \quad \forall t \in I
+                .\]
+                Damit folgt $\forall t \in I$:
+                \begin{salign*}
+                    \Vert y(t) \Vert &\le \Vert y_0 \Vert + \int_{t_0}^{t} \Vert f(s, y(s)) \d s \\
+                    &\stackrel{f \text{ linear beschränkt}}{\le}
+                    \Vert y_0 \Vert + \int_{t_0}^{t} (\alpha(s) \Vert y(s) \Vert + \beta(s)) \d s  \\
+                    &= \Vert y_0 \Vert + \int_{t_0}^{t} \alpha(s) \Vert y(s) \Vert \d s +
+                    \int_{t_0}^{t} \beta(s) \d s 
+                    \intertext{Da $I$ kompaktes Intervall, nehmen $\alpha(s)$ und $\beta(s)$ ihr
+                    Maximum an. Damit folgt}
+                    \Vert y(t) \Vert &\le \Vert y_0 \Vert + \alpha_{max}\int_{t_0}^{t} \Vert y(s) \Vert \d s + \beta_{\text{max}}(t - t_0) \\
+                    &\stackrel{t \le T}{\le} \Vert y_0 \Vert + \alpha_{max}\int_{t_0}^{t} \Vert y(s) \Vert \d s + \beta_{\text{max}}T
+                    \intertext{Damit folgt mit dem Lemma von Gronwall}
+                    \Vert y(t) \Vert &\le \underbrace{e^{\alpha_{\text{max}}(t-t_0)} (\Vert y_0 \Vert + T \beta_{max})}_{\eqqcolon \rho(t)} \\
+                    &\le \rho(t)
+                .\end{salign*}
+                Da $\rho(t)$ stetig folgt globale Fortsetzbarkeit von $y(t)$.
+            \end{proof}
+        \item Beh.: $f_1$ ist linear beschränkt.
+            \begin{proof}
+                Aus der Taylorreihe von $\sin(t)$ folgt $|\sin(t)| \le |t|$. Außerdem ist
+                $\sqrt{|x|} \le |x| + 1$. Damit folgt direkt
+                \begin{salign*}
+                    |f_1(t, (x_1, x_2))| &\le |t| |x_1|^{\frac{1}{2}} + |\sin(t)| |x_2| \\
+                    &\le |t| (|x_1| + 1) + |t| |x_2| \\
+                    &\le \underbrace{|t|}_{=: \alpha(t)} \left( |x_1| + |x_2| \right) + \underbrace{2 |t|}_{=: \beta(t)} \\
+                    &= \alpha(t) + \Vert x \Vert_1 + \beta(t)
+                .\end{salign*}
+            \end{proof}
+            Beh.: $f_2$ ist linear beschränkt.
+            \begin{proof}
+                Es gilt
+                \begin{salign*}
+                    |f_2(t, (x_1, x_2))| &\le e^{-t^2 |x_1|} + |x_1| \left| \frac{1}{1+x_2^2} \right| \\
+                    &\le \frac{1}{e^{t^2}|x_1|} + |x_1| \\
+                    &\le 1 + |x_1| \\
+                    &\le \underbrace{1}_{=: \beta(t)} + \underbrace{1}_{=: \alpha(t)} \cdot \Vert x \Vert_1 \\
+                    &= \alpha(t) \Vert x \Vert_1 + \beta(t)
+                .\end{salign*}
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Beh.: Das Taylorpolynom $4$-ter Ordnung ist gegeben als
+    \[
+        T_4(u, t, t_0=0) = t - t^2 + \frac{1}{2} t ^{3} - \frac{1}{6} t ^{4}
+    .\] 
+    \begin{proof}
+        $u$ ist Lösung des AWP, d.h. es gilt
+        \begin{align*}
+            u''(t) &= - \sin(u(t)) - 2u'(t), \quad t \ge 0
+            \intertext{Damit folgt}
+            u^{(3)}(t) &= - \cos(u(t)) u'(t) - 2u''(t) \\
+            u^{(4)}(t) &= \sin(u(t)) u'(t)^2 - \cos(u(t)) u''(t) - 2u^{(3)}(t)
+            \intertext{Mit $u(0) = 0$ und $u'(0) = 1$ folgt}
+            u^{(3)}(0) &= 3 \\
+            u^{(4)}(0) &= -4
+            \intertext{Insgesamt folgt dann}
+            T_4(u, t) &= u(0) + u'(0) t + \frac{u''(0)}{2} t^2 + \frac{u^{(3)}(0)}{3!} t ^{3}
+            + \frac{u^{(4)}(t)}{4!} t ^{4} \\
+            &= t - t^2 + \frac{1}{2} t ^{3} - \frac{1}{6} t ^{4}
+        .\end{align*}
+    \end{proof}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Beh.: Die Matrix $A(t)$ ist gegeben als
+    \[
+        A(t) = \begin{pmatrix} 1-t & 1 \\
+            2t - t^2 & t-1
+        \end{pmatrix} 
+    .\] 
+    \begin{proof}
+        Durch Nachrechnen folgt
+        \[
+            \phi^{-1} = \begin{pmatrix} t^2 - t + 1 & -t \\ -t^2 & t+1 \end{pmatrix} 
+        .\] Mit $\phi'(t) = A(t) \phi(t)$ folgt also
+        \[
+            A(t) = \phi'(t) \phi^{-1}(t) = \begin{pmatrix} 1 & 1 \\ 2t & 2t-1 \end{pmatrix}
+            \begin{pmatrix} t^2 - t + 1 & -t \\ -t^2 & t+1 \end{pmatrix}
+            =
+            \begin{pmatrix} 1-t & 1 \\
+                2t - t^2 & t-1
+            \end{pmatrix}
+        .\]
+    \end{proof}
+    Beh.: Die Lösung $u(t)$ ist gegeben als
+    \[
+        u(t) = \begin{pmatrix} t+1 \\ t^2 \end{pmatrix} +
+        \begin{pmatrix} \frac{1}{2} t^2 + t \\ \frac{1}{2} t ^{3} + \frac{3}{2} t^2 \end{pmatrix}
+    .\] 
+    \begin{proof}
+        Nach VL gilt für die partikuläre Lösung mit $u_b(t_0 = 0) = (0,0)^{T}$ und
+        $b(t) = (1,t)^{T}$:
+        \begin{align*}
+            u_b(t) &= \phi(t) \left( \int_{0}^{t} \phi^{-1}(s) b(s) \d s + \begin{pmatrix} 0 \\ 0 \end{pmatrix}  \right) \\
+            &= \phi(t) \int_{0}^{t} \begin{pmatrix} 1 - s \\ s \end{pmatrix}  \d s \\
+            &= \begin{pmatrix} 1 + t & t \\ t^2 & t^2 -t +1 \end{pmatrix}
+            \begin{pmatrix} 
+                t - \frac{1}{2}t^2 \\
+                \frac{1}{2} t^2
+            \end{pmatrix} \\
+            &= \begin{pmatrix} \frac{1}{2} t^2 + t \\ \frac{1}{2} t ^{3} + \frac{3}{2} t^2 \end{pmatrix} 
+            \intertext{Mit der Anfangsbedingung $u(0) = (1,0)^{T}$ folgt}
+            u(t) &= c_1 \begin{pmatrix} 1 + t  \\ t^2 \end{pmatrix} + c_2 \begin{pmatrix} t \\ t^2 - t + 1 \end{pmatrix} + u_b(t) \\
+            u(0) &= c_1 \begin{pmatrix} 1 \\ 0 \end{pmatrix} + c_2 \begin{pmatrix} 0 \\ 1 \end{pmatrix}
+            + \begin{pmatrix} 0 \\ 0 \end{pmatrix} \stackrel{!}{=} \begin{pmatrix} 1 \\ 0 \end{pmatrix}
+            \intertext{$c_1 = 0$ also insgesamt}
+            u(t) &= \begin{pmatrix} t+1 \\ t^2 \end{pmatrix} +
+            \begin{pmatrix} \frac{1}{2} t^2 + t \\ \frac{1}{2} t ^{3} + \frac{3}{2} t^2 \end{pmatrix}
+        .\end{align*}
+    \end{proof}
+\end{aufgabe}
+
+\begin{aufgabe}
+    \begin{enumerate}[(a)]
+        \item Beh.: Bedingung $(**)$ für die eindeutige Lösbarkeit von (RWP-2.Ord) ist äquivalent
+            zur Bedingung $(*)$, wenn (RWP-2.Ord.) als System 1. Ordnung umformuliert wird.
+            \begin{proof}
+                Es sei ein RWP-2.Ord. wie beschrieben gegeben. Definiere
+                $y_1(t) \coloneqq u(t)$ und $y_2(t) \coloneqq y_1'(t)$. Dann
+                mit
+                \[
+                    B_a = \begin{pmatrix} \alpha_0 & \alpha_1 \\ 0 & 0 \end{pmatrix}
+                    \quad
+                    \text{und}
+                    \quad
+                    B_b = \begin{pmatrix} 0 & 0 \\ \beta_0 & \beta_1 \end{pmatrix} 
+                \] als äquivalente Randwertbedingung
+                \[
+                    B_a y(a) + B_b y(b) = g := \begin{pmatrix} \eta_0 \\ \eta_1 \end{pmatrix} 
+                .\] Sei nun $\{y, z\} $ ein beliebiges Fundamentalsystem der homogenen Gleichung
+                mit $\phi(a) = \mathbb{I}$. Dann gilt
+                $y_1(a) = z_2(a) = 1$ und $y_2(a) = z_1(a) = 0$. Damit folgt mit
+                \[
+                    A \coloneqq \begin{pmatrix} \alpha_0 & \alpha_1 \\ \beta_0 y_1(b) + \beta_1 y_2(b)
+                    & \beta_0 z_1(b) + \beta_1 z_2(b) \end{pmatrix} 
+                \] die zu $(**)$ äquivalente Bedingung $\text{det}(A) \neq 0$.
+
+                Damit g.z.z. $A = B_a + B_b \phi(b)$.
+                \begin{align*}
+                    B_a + B_b \phi(b) &= \begin{pmatrix} \alpha & \alpha_1 \\ 0 & 0 \end{pmatrix}
+                    + \begin{pmatrix} 0 & 0 \\ \beta_0 & \beta_1 \end{pmatrix}
+                    \begin{pmatrix} y_1(b) & z_1(b) \\ y_2(b) & z_2(b) \end{pmatrix} \\
+                    &= \begin{pmatrix} \alpha_0 & \alpha_1 \\ \beta_0 y_1(b) + \beta_1 y_2(b)
+                    & \beta_0 z_1(b) + \beta_1 z_2(b) \end{pmatrix} = A
+                .\end{align*}
+            \end{proof}
+        \item Hier gilt
+            in Analogie zu (a) für (i) bis (iii): $\alpha_0 = 1$, $\alpha_1 = 0$, $\beta_0 = 1$ und
+            $\beta_1 = 0$. Sei außerdem $u_1 = \sin(t)$ und $u_2 = \cos(t)$.
+            \begin{enumerate}[(i)]
+                \item Beh.: Es existiert eine eindeutige Lösung.
+                    \begin{proof}
+                        Mit
+                        \[
+                            \text{det}\begin{pmatrix} 0 & 1 \\ 1 & 0 \end{pmatrix} = -1 \neq 0
+                        \] und (a) folgt die Behauptung.
+                    \end{proof}
+                \item Beh.: Es existiert keine Lösung.
+                    \begin{proof}
+                        Das Kriterium aus (a) liefert
+                        \[
+                            \text{det}\begin{pmatrix} 0 & 1 \\ 0 & -1 \end{pmatrix} = 0
+                        .\] Ang. es ex. eine Lösung $u(t)$ des RWP. Dann hat diese die
+                        Form $u(t) = c_1 \sin(t) + c_2 \cos(t)$.
+                        Es gilt weiter $u(0) = 0 \implies c_2 = -1$, aber
+                        $u(\pi) = 0 \implies c_2 = 1$ $\contr$.
+                    \end{proof}
+                \item Beh.: Es existieren unendlich viele Lösungen.
+                    \begin{proof}
+                        Das Kriterium aus (a) liefert
+                        \[
+                            \text{det}\begin{pmatrix} 0 & 1 \\ 0 & -1 \end{pmatrix} = 0
+                        .\] Z.z.: $\forall c_1 \in \R$ ist $u(t) = c_1 \sin(t) + 1$ eine Lösung des
+                        RWP. Es ist $u(0) = u(\pi) = 1$ und $u(t)$ ist mit $c_1$ und $c_2 = 0$ Lösung
+                        des RWP.
+                    \end{proof}
+            \end{enumerate}
+    \end{enumerate}
+\end{aufgabe}
+
+\end{document}

sose2020/ana/uebungen/ana9.tex

@@ -0,0 +1,289 @@
+\documentclass[uebung]{../../../lecture}
+
+\title{Analysis II: Übungsblatt 9}
+\author{Leon Burgard, Christian Merten}
+
+\usepackage[]{gauss}
+
+\begin{document}
+
+\punkte
+
+\begin{aufgabe}
+    Sei
+    \[
+    f\colon \begin{pmatrix} x \\ y \\ z \end{pmatrix} \mapsto \begin{pmatrix} u \\ v \\ w \end{pmatrix} 
+    \coloneqq \begin{pmatrix} yz \\ x + 2z \\ xy \end{pmatrix} 
+    .\]
+    Dann ist die Umkehrfunktion $g = f^{-1}$ gegeben als
+    \begin{align*}
+        g(u, v, w) = \begin{pmatrix} \frac{wv}{w + 2u} \\ \frac{w + 2u}{v} \\ \frac{vu}{w + 2u} \end{pmatrix}
+    .\end{align*} Denn $\forall x, y, z \in \R$ gilt
+    \begin{align*}
+        g(f(x,y,z)) = g(yz, x+2z, xy) = \begin{pmatrix} x \\ y \\ z \end{pmatrix} 
+    .\end{align*}
+    Analog für $f(g(u,v,w)) = (u,v,w)^{T}$.
+
+    Für die Jacobimatrizen folgt
+    \begin{align*}
+        D_f(x,y,z) = \begin{pmatrix} 0 & z & y \\ 1 & 0 & 2 \\ y & x & 0 \end{pmatrix}
+        \quad
+        \text{und}
+        \quad
+        D_g(u,v,w) = \begin{pmatrix} - 2 \frac{wv}{(w + 2u)^2} & \frac{w}{w+2u} & \frac{2uv}{(w + 2u)^2}\\
+        \frac{2}{v} & -\frac{2 + 2u}{v^2} & \frac{1}{v} \\
+    \frac{vw}{(w + 2u)^2} & \frac{u}{w + 2u} & -\frac{vu}{(w + 2u)^2}\end{pmatrix}
+    .\end{align*}
+    Für den Punkt $(x,y,z)^{T} = (2,1,0)$ folgt $f(2,1,0) = (0,2,2)^{T}$. Damit folgt
+    \begin{align*}
+        D_f(2,1,0) = \begin{pmatrix} 
+            0 & 0 & 1 \\
+            1 & 0 & 2 \\
+            1 & 2 & 0
+        \end{pmatrix} 
+        \quad
+        \text{und}
+        \quad
+        D_g(0,2,2) = \begin{pmatrix} 
+            -2 & 1 & 0 \\
+            1 & -\frac{1}{2} & \frac{1}{2} \\
+            1 & 0 & 0
+        \end{pmatrix} 
+    .\end{align*}
+    Damit folgt
+    \begin{align*}
+        D_f(2,1,0) D_g(0,2,2) = 
+        \begin{pmatrix} 
+            0 & 0 & 1 \\
+            1 & 0 & 2 \\
+            1 & 2 & 0
+        \end{pmatrix} 
+        \begin{pmatrix} 
+            -2 & 1 & 0 \\
+            1 & -\frac{1}{2} & \frac{1}{2} \\
+            1 & 0 & 0
+        \end{pmatrix}
+        =
+            \begin{pmatrix} 1 & 0 & 0 \\
+            0 & 1 & 0 \\
+            0 & 0 & 1\end{pmatrix} 
+    .\end{align*}
+    Also $D_f(2,1,0)^{-1} = D_g(0,2,2)$.
+\end{aufgabe}
+
+\begin{aufgabe}
+    Sei
+    \[
+        P\coloneqq \{(x,y,z)^{T} \in \R^{3}  \mid x + y - z = 1\}
+        \quad
+        \text{und}
+        \quad
+        Z \coloneqq \{(x,y,z)^{T} \in \R^{3}  \mid x^2 + y^2 = 1\} 
+    .\] Setze
+    \begin{align*}
+        &f\colon \R^{3} \to \R, x \mapsto \Vert x \Vert_2^2 \\
+        &g\colon \R^{3} \to \R^2, x \mapsto \begin{pmatrix} x+y-z-1 \\ x^2 + y^2 - 1 \end{pmatrix} 
+    .\end{align*}
+    Dann ist die Nebenbedingung äquivalent zu $g(x) = 0$. Minimiere nun $f(x)$ unter $g(x) = 0$.
+    Es gilt
+    \begin{align*}
+        J_g(x) = \begin{pmatrix} 1 & 1 & -1 \\ 2x & 2y & 0 \end{pmatrix}
+        \quad
+        \text{und}
+        \quad
+        \nabla f(x) = \begin{pmatrix} 2x \\ 2y \\ 2z \end{pmatrix} 
+    .\end{align*}
+    Es gilt $\text{Rg}(J_g(x)) = 2$, also ist mit Lagrangeregel notwendige Bedingung für
+    Minimum:
+    \[
+        J_f(\hat{x})^{T} \lambda = \nabla f(\hat{x})
+    .\]
+    Damit folgt das Gleichungssystem
+    \begin{align}
+        x + y - z - 1 &= 0 \\
+        x^2 + y^2 - 1 &= 0 \\
+        \lambda_1 + 2 x \lambda_2 &= 2x \\
+        \lambda_1 + 2y \lambda_2 &= 2y \\
+        - \lambda_1 &= 2z
+    .\end{align}
+    Sei zunächst $x \neq y$. Ziehe (4) von (3) ab. Damit folgt
+    \begin{align*}
+        \lambda_2 (x - y) = x - y \implies \lambda_2 = 1
+    .\end{align*}
+    Aus (5) folgt direkt $\lambda_1 = - 2z$. Damit folgt mit (3):
+    \begin{align*}
+    - 2z +2x = 2x \implies -2z = 0 \implies z = 0
+    .\end{align*}
+    Eingesetzt in (1) und in (2) ergibt das
+    \[
+        x + y - 1 = 0 \implies x = 1 - y \stackrel{\text{(2)}}{\implies} (1-y)^2 + y^2 - 1 = 0 \implies y (y-1) = 0 \implies y_1 = 0 \land y_2 = 1
+    .\] Damit ergeben sich $x_1 = 1 - y_1 = 1$ und $x_2 = 1 - y_2 = 0$, also
+    $P_1 = (1, 0, 0)^{T}$ und $P_2 = (0,1,0)^{T}$. Hier gilt
+    $f(P_1) = \Vert P_1\Vert_2^2 = 1$ und $f(P_2) =\Vert P_2 \Vert_2^2 = 1$.
+
+    Falls nun $x = y$. Dann folgt aus (2) direkt $x = \pm \frac{1}{\sqrt{2} }$ und damit mit (1)
+$z = \pm \frac{2}{\sqrt{2} } - 1$. Allerdings ist dann bereits $f(\pm \frac{1}{\sqrt{2}}, \pm \frac{1}{\sqrt{2}}, \pm \frac{2}{\sqrt{2} } - 1) > 1$, d.h. dies kann kein Minimum sein.
+
+    Es bleiben also $P_1$ und $P_2$. Da $f(P_1) = f(P_2)$ sind beide Minima.
+\end{aufgabe}
+
+\begin{aufgabe}
+    Definiere
+    \begin{align*}
+        &f(x) \colon \R^{3} \to \R, x \mapsto 2x_1^2 + 2x_1 x_3 + 2x_2^2 + x_2x_3 + 3x_3^2 + 3x_1 - 8x_2 + 2x_3 \\
+        &g(x) \colon \R^{3} \to \R^2, x \mapsto \begin{pmatrix} -x_1 + 3x_2 - 2x^{3} - 7 \\
+            -3x_1 + 2x_2 -x_3 -2
+        \end{pmatrix} 
+    .\end{align*}
+    Damit ist das gegebene Optimierungsproblem äquivalent zu der Minimierung von $f$ unter $g(x) = 0$.
+
+    Mit
+    \[
+        Q \coloneqq \begin{pmatrix} 4 & 0 & 2 \\
+            0 & 4 & 1 \\
+            2 & 1 & 6
+        \end{pmatrix}
+        \quad
+        \text{und}
+        \quad
+        c \coloneqq \begin{pmatrix} -3 \\ 8 \\ -2 \end{pmatrix} 
+    .\] folgt
+    \[
+        f(x) = \frac{1}{2} x^{T} Qx - c^{T} x
+    .\] Mit
+    \[
+        A \coloneqq \begin{pmatrix} -1 & 3 & -2 \\ -3 & 2 & -1 \end{pmatrix}
+        \quad
+        \text{und}
+        \quad
+        b \coloneqq \begin{pmatrix} 7 \\ 2 \end{pmatrix} 
+    \] folgt
+    \[
+        g(x) = Ax - b
+    .\] 
+    Es ist $\forall x \in \R^{3}$
+    \begin{salign*}
+        f(x) &= \frac{1}{2} x^{T} Q x - c^{T} x  \\
+        &= \frac{1}{2} \sum_{i=1}^{n} x_i (Qx)_i - \sum_{i=1}^{n} c_i x_i \\
+        &= \frac{1}{2} \sum_{i=1}^{n} x_i \sum_{j=1}^{n} Q_{ij} x_j - \sum_{i=1}^{n} c_i x_i \\
+        &= \frac{1}{2} \left[ \sum_{i=1}^{n} Q_{ii} x_i^2 + \sum_{i,j=1, i\neq j}^{n} Q_{ij} x_i x_j \right]
+        - \sum_{i=1}^{n} c_i x_i
+        \intertext{Da $Q$ symmetrisch, folgt $Q_{ij} = Q_{ji}$, also}
+        \frac{\partial f}{\partial x_i}
+        &= \frac{1}{2} \left[ 2 Q_{ii} x_i + 2 \sum_{j=1}^{n} Q_{ij} x_j \right] - c_i \\
+        &= \sum_{j=1}^{n} Q_{ij} x_j - c_i \\
+        &= (Qx)_i - c_i
+        \intertext{Insgesamt folgt}
+        \nabla f(x) &= Qx - c
+    .\end{salign*}
+    Mit der Definition von $g$ und $A$ folgt außerdem direkt $J_g(x) = A$. Wegen $\text{Rg}(A) = 2$ folgt
+    mit der Lagrangeregel und die Bedingung für ein Minimum für $\lambda \in \R^2$:
+    \begin{align*}
+        A^{T} \lambda &= Qx - c \\
+        Ax &= b
+    .\end{align*}
+    Löse zunächst $Ax = b$:
+    \begin{align*}
+        \begin{gmatrix}[p] -1 & 3 & -2 & 7 \\
+            -3 & 2 & -1 & 2
+            \rowops
+            \add[-3]{0}{1}
+        \end{gmatrix}
+        \to
+        \begin{gmatrix}[p]
+            -1 & -3 & 2 & -7 \\
+            0 & -7 & 5 & -19
+            \rowops
+            \mult{0}{-1}
+            \mult{1}{-\frac{1}{7}}
+            \add[3]{1}{0}
+        \end{gmatrix} 
+        \to
+        \begin{gmatrix}[p] 
+            1 & 0 & -\frac{1}{7} & \frac{8}{7} \\
+            0 & 1 & -\frac{5}{7} & \frac{19}{7}
+        \end{gmatrix} 
+    .\end{align*}
+    Damit folgt als Lösungsmenge
+    \[
+    L = \begin{pmatrix} \frac{8}{7} \\ \frac{19}{7} \\ 0 \end{pmatrix}
+    + \text{Lin}\left( \begin{pmatrix} -\frac{1}{7} \\ -\frac{5}{7} \\ -1 \end{pmatrix}  \right)
+    = \begin{pmatrix} 1 \\ 2 \\ -1 \end{pmatrix} + \text{Lin}\left( \begin{pmatrix} 1 \\ 5 \\ 7 \end{pmatrix}  \right) 
+    .\] Also folgt für $a \in \R$:
+    \[
+    x = \begin{pmatrix} 1 + a \\ 2 + 5a \\ -1 + 7a \end{pmatrix} 
+    .\] Setze jetzt in $A^{T} \lambda = Qx - c$ ein:
+    \begin{align*}
+        A^{T} \lambda &= Qx -c
+                      = \begin{pmatrix} 5 + 18a \\ -1 + 27 a \\ 49 a \end{pmatrix} 
+    .\end{align*}
+    und löse
+    \[
+        \begin{pmatrix} -1 & -3 & -18 \\
+            3 & 2 & -27 \\
+            -2 & -1 & -49
+        \end{pmatrix}
+        \begin{pmatrix} \lambda_1 \\ \lambda_2 \\ a \end{pmatrix}
+        =
+        \begin{pmatrix} 5 \\ -1 \\ 0 \end{pmatrix} 
+    .\] Kurze Rechnung ergibt $a = 0$. Damit folgt
+    \[
+        x = \begin{pmatrix} 1 \\ 2 \\ -1 \end{pmatrix}
+    .\] Da $f(1, 2, -1) = -12$ und für $y = (2,7,6)^{T} \in L$ ist $f(y) = 242 > -12$ folgt
+    $x = (1,2,-1)^{T}$ löst das Minimierungsproblem.
+\end{aufgabe}
+
+\begin{aufgabe}
+    \begin{enumerate}[(a)]
+        \item Definiere:
+            \begin{align*}
+                x_1 &\coloneqq v_1(t) \\
+                x_2 &\coloneqq v_1'(t) \\
+                x_3 &\coloneqq v_2(t) \\
+                x_4 &\coloneqq v_2'(t) \\
+                x_5 &\coloneqq v_2''(t) \\
+                x_6 &\coloneqq v_2'''(t)
+            .\end{align*}
+            Das gegebene Gleichungssystem lässt sich dann so formulieren
+            \begin{align*}
+                x_6'(t) - a ( g(t) - b x_3(t)) &= f(t) \\
+                x_2'(t) + b x_3(t) &= g(t)
+            .\end{align*}
+            Dann folgt für das gegebene Gleichungssystem das äquivalente Gleichungssystem 1. Ordnung:
+            \begin{align*}
+            x' = \begin{pmatrix} x_2 \\
+                g(t) - b x_3(t) \\
+                x_4 \\
+                x_5 \\
+                x_6 \\
+                a (g(t) - b x_3(t)) + f(t)
+            \end{pmatrix} 
+            .\end{align*}
+        \item Seien $u_1$, $u_2$ Lösungen von $(*)$. Dann gilt
+            \[
+                W(t) = \text{det} \begin{pmatrix} u_1(t) & u_2(t) \\
+                    \frac{\d}{\d t} u_1(t) & \frac{\d}{\d t} u_2(t)
+                \end{pmatrix}
+                = u_1 \frac{\d}{\d t} u_2(t) - u_2(t) \frac{\d}{\d t} u_1(t)
+            .\] Damit folgt
+            \begin{salign*}
+                \frac{\d}{\d t} W(t) &= \frac{\d}{\d t}\left( u_1 \frac{\d}{\d t}u_2 \right)
+            - \frac{\d}{\d t} \left( u_2 \frac{\d}{\d t} u_1 \right) \\
+            &= \left( \frac{\d}{\d t} u_1 \right)\left( \frac{\d}{\d t} u_2 \right)
+            + u_1 \frac{\mathrm{d}^2}{\d t^2} u_2 - \left( \frac{\d}{\d t} u_2 \right)
+            \left( \frac{\d}{\d t} u_1 \right)
+            - u_2 \frac{\mathrm{d}^2}{\d t^2} u_1 \\
+            &= 
+            u_1 \frac{\mathrm{d}^2}{\d t^2} u_2
+            - u_2 \frac{\mathrm{d}^2}{\d t^2} u_1 \\
+            &\stackrel{(*)}{=}
+            u_1 \left[ - p \frac{\d}{\d t} u_2 - q u_2 \right]
+            - u_2 \left[ - p \frac{\d}{\d t} u_1 - q u_1 \right] \\
+            &= - u_1 p \frac{\d }{\d t}u_2 - u_1 q u_2 + u_2 p \frac{\d }{\d t} u_1 + u_2 q u_1 \\
+            &= -p \left( u_1 \frac{\d}{\d t} u_2 - u_2 \frac{\d }{\d t} u_1\right) \\
+            &= -p W(t)
+            .\end{salign*}
+    \end{enumerate}
+\end{aufgabe}
+
+\end{document}

sose2020/la/uebungen/la10.tex

@@ -0,0 +1,296 @@
+\documentclass[uebung]{../../../lecture}
+
+\title{Lineare Algebra II: Übungsblatt 10}
+\author{Miriam Philipp, Dominik Daniel, Christian Merten}
+
+\begin{document}
+
+\punkte[36]
+
+\begin{aufgabe}
+    Seien
+    \[
+        A = \begin{pmatrix} 0 & 2 & 0 \\
+            1 & 1 & 1 \\
+            0 & 3 & 2
+        \end{pmatrix} \in M_{3,3}(\R)
+    \] und $f_A$ die lineare Abbildung $\R^{3} \xrightarrow{A\cdot } \R^{3}$.
+
+    Beh.: Die
+    Darstellungsmatrix von $\bigwedge^2 f_A\colon \bigwedge^2\R^{3} \to \bigwedge^2\R^{3}$ bezüglich
+    der Basis $ \mathcal{B} = (e_1 \wedge e_2, e_1 \wedge e_3, e_2 \wedge e_3)$ ist gegeben als
+    \[
+        M_{\mathcal{B}}^{\mathcal{B}}\left({\bigwedge}^2 f_A\right) =
+        \begin{pmatrix} 
+            -2 & 0 & 2 \\
+            0  & 0 & 4 \\
+            3 & 2 & -1
+        \end{pmatrix} 
+    .\]
+    \begin{proof}
+        Berechne Bild der Basisvektoren unter $\bigwedge^2f_A$:
+        \begin{align*}
+            {\bigwedge}^2f_A(e_1 \wedge e_2) &= f_A(e_1) \wedge f_A(e_2) \\
+                                             &= e_2 \wedge (2 e_1 + e_2 + 3e_3) \\
+                                             &= 2 e_2 \wedge e_1 + e_2 \wedge e_2 + 3 e_2 \wedge e_3 \\
+                                             &= -2 e_1 \wedge e_2 + 3 e_2 \wedge e_3
+            \intertext{Für restliche Basisvektoren analog}
+            {\bigwedge}^2f_A(e_1 \wedge e_3) &= 2 e_2 \wedge e_3 \\
+            {\bigwedge}^2f_A(e_2 \wedge e_3) &= 2 e_1 \wedge e_2 + 4 e_1 \wedge e_3 - 1 e_2 \wedge e_3
+        .\end{align*}
+        Durch Ablesen der Koeffizienten folgt die Behauptung.
+    \end{proof}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Seien $R$ ein Ring und $M$ ein $R$-Modul.
+    \begin{enumerate}[(a)]
+        \item Beh.: Ist $M$ endlich erzeugt und frei, so ist $M$ flach.
+            \begin{proof}
+                Seien $N, L$ $R$-Moduln und $\varphi\colon N \to L$ ein injektiver $R$-Modul.hom.
+
+                $M$ ist endlich erzeugt und frei. Fixiere Basis $(x_1, \ldots, x_n)$. Dann ist
+                $M \stackrel{\sim }{=} R^{n}$. D.h. es existieren R-Mod.iso.
+                $\Phi_1\colon M \otimes_R N \to R^{n} \otimes_R N$ und
+                $\Phi_2\colon M \otimes_R L \to R^{n} \otimes_R L$. Weiter ex. R.-Mod.isomorphismen
+                $f_1\colon R^{n} \otimes_R N \to N^{n}$ und $f_2\colon R^{n} \otimes_R L \to L^{n}$
+                mit $f_1((r_1, \ldots, r_n), x) = (r_1 x, \ldots, r_n x)$, analog für $f_2$.
+
+                Weiter definiere:
+                \begin{align*}
+                    \psi\colon N^{n} &\to L^{n} \\
+                    (n_1, \ldots, n_n) &\mapsto (\varphi(n_1), \ldots, \varphi(n_n))
+                .\end{align*}
+                $\psi$ ist $R$-Modulhom. und injektiv, da $\varphi$ injektiv ist. Definiere nun weiter
+                \begin{align*}
+                    \Psi \colon M \otimes_R N \xrightarrow{\Phi_1} R^{n} \otimes_R N
+                    \xrightarrow{f_1} N^{n}
+                    \xrightarrow{\psi} L^{n}
+                    \xrightarrow{f_2^{-1}} R^{n} \otimes_R L
+                    \xrightarrow{\Phi_{2}^{-1}} M \otimes_R L
+                .\end{align*}
+
+                Beh.: $\Psi$ ist injektiver $R$-Modul.hom. mit $\text{id}_M \otimes \varphi = \Psi$.
+
+                $\Psi$ ist Verknüpfung von injektiven $R$-Modul.homomorphismen,
+                also selbst injektiver $R$-Mod.hom. Sei nun $a \otimes b \in M \otimes_R N$ beliebig.
+                Dann ist ex. $r_1, \ldots, r_n \in R$, s.d. $a = \sum_{i=1}^{n} r_i x_i$. Damit
+                folgt
+                \begin{salign*}
+                    \Phi_1(a \otimes b) &= (r_1, \ldots, r_n) \otimes b \\
+                    f_1((r_1, \ldots, r_n) \otimes b) &= (r_1 b, \ldots, r_n b) \\
+                    \psi(r_1 b, \ldots, r_n b) &= (r_1 \varphi(b), \ldots, r_n \varphi(b)) \\
+                    f_2^{-1}(r_1 \varphi(b), \ldots, r_n \varphi(b)) &=
+                    (r_1, \ldots, r_n) \otimes \varphi(b) \\
+                    \Phi_2^{-1}((r_1, \ldots, r_n) \otimes \varphi(b))
+                                                                     &= (a \otimes \varphi(b))
+                    \intertext{Also folgt}
+                    \Psi(a \otimes b) &= a \otimes \varphi(b) = (\text{id}_M \otimes \varphi)(a \otimes b)
+                .\end{salign*}
+                Also stimmen $\Psi$ und $\text{id}_M \otimes \varphi$ auf den Erzeugern überein, also
+                gilt $\Psi = \text{id}_M \otimes \varphi$. Damit ist auch $\text{id}_M \otimes \varphi$
+                injektiv.
+            \end{proof}
+        \item Seien $M$ flach, $N$ flacher $R$-Modul und $\varphi\colon M \to N$ injektiver
+            $R$-Mod.hom.
+
+            Beh.: $\varphi \otimes \varphi\colon M \otimes_R M \to N \otimes_R N$ ist
+            injektiv.
+            \begin{proof}
+                Es gilt
+                \[
+                    \varphi \otimes \varphi
+                    = \underbrace{(\text{id}_N \otimes \varphi)}_{\text{injektiv, da } N \text{ flach}}
+                    \circ \underbrace{(\varphi \otimes \text{id}_M)}_{\text{injektiv, da } M \text{ flach}}
+                .\] Damit ist $\varphi \otimes \varphi$ als Verknüpfung zweier injektiver $R$-Mod.homs.
+                auch injektiv.
+            \end{proof}
+        \item Beh.: $\Z /  2\Z$ als $\Z$ Modul ist nicht flach.
+            \begin{proof}
+                Betrachte $\varphi\colon \Z \to \Z$, $r \mapsto 2r$. $\varphi$ ist injektiver
+                $R$-Modulhomomorphismus, aber
+                \[
+                    (\varphi \otimes \text{id}_{\Z /  2\Z})( 1 \otimes \overline{1})
+                    = \varphi(1) \otimes \overline{1} = 2 \otimes \overline{1}
+                    = 1 \otimes (2\cdot \overline{1}) = 1 \otimes \overline{0} = 0
+                .\] $1 \otimes \overline{1} \neq 0$ in $\Z \otimes_R \Z / 2 \Z$, denn
+                mit $\beta\colon \Z \times \Z / 2\Z, (z, \overline{a}) \mapsto z \cdot \overline{a}$
+                bilinear und $\beta(1, \overline{1}) = \overline{1} \neq 0$ ist mit UT angewendet auf
+                $\beta$ und $\Z / 2 \Z$
+                $1 \otimes \overline{1} \neq 0$. Damit ist $\text{ker } (\varphi \otimes \text{id}_{\Z / 2\Z}) \neq \{0\} $, also $\varphi \otimes \text{id}_{\Z / 2 \Z}$ nicht injektiv.
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Seien $R$ ein Ring und $M$ ein e.e. freier $R$-Modul.
+    \begin{enumerate}[(a)]
+        \item Seien $N$ e.e. freier $R$-Modul und $\varphi\colon M \to N$ injektiver
+            $R$-Mod.hom.
+
+            Beh.: $\bigwedge^2 \varphi\colon \bigwedge^2 M \to \bigwedge^2 N$ ist injektiv.
+            \begin{proof}
+                Da $M$ und $N$ e.e. und frei ex. nach 35(a) und (b) eindeutige injektive
+                $R$-Mod.homs. $f\colon \bigwedge^2 M \to M \otimes_R M$ und
+                $g\colon \bigwedge^2 N \to N \otimes_R N$ mit
+                $f(a \wedge b) = a \otimes b - b \otimes a$, analog für $g$. 
+
+                Definiere nun $\tilde{g}\colon \bigwedge^2N \to \text{Bild}(g)$. $\tilde{g}$ ist
+                damit surjektiv und injektiv, also $R$-Modul.iso., inbes. ex.
+                $\tilde{g}^{-1}\colon \text{Bild}(g) \to \bigwedge^2 N$.
+
+                Definiere weiter
+                \[
+                    \psi\colon {\bigwedge}^2 M \xrightarrow[\text{inj. nach 35(b)}]{f} M \otimes_R M
+                    \xrightarrow[\text{inj. nach 37(b)}]{\varphi \otimes \varphi} N \otimes_R N
+                    \xrightarrow[\text{inj. nach 35(b)}]{\tilde{g}^{-1}} {\bigwedge}^2 N
+                .\] Z.z.: $\psi$ wohldefiniert, g.z.z.
+                $\text{Bild}((\varphi \otimes \varphi) \circ f) = \text{Bild}(g)$. Dazu
+                seien $a, b \in M$. Dann gilt
+                \begin{salign*}
+                    (\varphi \otimes \varphi)(f(a \wedge b))
+                    &= (\varphi \otimes \varphi)(a \otimes b - b \otimes a) \\
+                    &= (\varphi(a) \otimes \varphi(b) - \varphi(b) \otimes \varphi(a)) \\
+                    &= g(\varphi(a) \wedge \varphi(b)) \in \text{Bild}(g)
+                    \intertext{Da Elemente der Form $a \wedge b$ $\bigwedge^2M$
+                    erzeugen, folgt Behauptung. Damit ist $\psi$ als
+                    Verkettung von injektiven $R$-Mod.homs, injektiver $R$-Mod.hom.
+                    Bleibt zu zeigen: $\psi = \bigwedge^2 \varphi$. Mit obiger Rechnung folgt sofort}
+                    \psi(a \wedge b) &=
+                    \tilde{g}^{-1}((\varphi \otimes \varphi)f(a \wedge b)) \\
+                    &= \tilde{g}^{-1}(g(\varphi(a) \wedge \varphi(b)))\\
+                    &= \varphi(a) \wedge \varphi(b) \\
+                    &= {\bigwedge}^2 \varphi(a \wedge b)
+                .\end{salign*}
+                Da $\bigwedge^2M$ von Elementen der Form $a \wedge b$ erzeugt wird, folgt $\psi = \bigwedge^2\varphi$.
+                Da $\psi$ injektiv als Verkettung von injektiven $R$-Mod.homs, ist $\bigwedge^2\varphi$ injektiv.
+            \end{proof}
+        \item Beh.: Für $m_1, m_2 \in M$ sind folgende Aussagen äquivalent:
+            \begin{enumerate}[(i)]
+                \item Die Familie $(m_1, m_2)$ ist linear unabhängig.
+                \item Aus $r (m_1 \wedge m_2) = 0$ in $\bigwedge^2M$ mit $r \in R$ folgt $r = 0$.
+            \end{enumerate}
+            \begin{proof}
+                (i) $\implies$ (ii): Definiere
+                \begin{align*}
+                    \varphi\colon R &\to {\bigwedge}^2 M \\
+                    r &\mapsto r (m_1 \wedge m_2)
+                .\end{align*}
+                Z.z.: $\varphi$ ist injektiv. Sei $(e_1, e_2)$ die Standardbasis
+                des $R^2$. Definiere damit
+                \begin{align*}
+                    \Phi&\colon R \to {\bigwedge}^2 R^2, \quad
+                    r \mapsto r (e_1 \wedge e_2) \\
+                    \psi&\colon R^2 \to M, \quad
+                    \psi(e_i) = m_i \quad i=1,2
+                .\end{align*}
+                Da $\{e_1 \wedge e_2 \}$ Basis von $\bigwedge^2 R^2$, ist $e_1 \wedge e_2$ l.u. und
+                damit $\Phi$ injektiv. Weiter sind $R^2$ und $M$ e.e. und frei und
+                $\psi$ injektiver $R$-Mod.hom. Mit (a) folgt damit, dass
+                $\bigwedge^2 \psi$ injektiv ist.
+                Außerdem gilt für $r \in R$ beliebig:
+                \begin{salign*}
+                    \left({\bigwedge}^2 \psi\right)(\Phi(r)) &= ({\bigwedge}^2\psi)(r (e_1 \wedge e_2)) \\
+                                                  &= r (\psi(e_1) \wedge \psi(e_2)) \\
+                                                  &= r (m_1 \wedge m_2) \\
+                                                  &= \varphi(r)
+                .\end{salign*}
+                Damit gilt $\varphi = \bigwedge^2 \psi \circ \Phi$ und damit
+                $\varphi$ injektiv, als Verkettung injektiver $R$-Mod.homs.
+
+                (ii) $\implies$ (i): Kontraposition. Seien $(m_1, m_2)$ linear abhängig. Dann ex.
+                ein $\alpha \in R$ mit $m_1 = \alpha m_2$. Damit folgt
+                \[
+                    1 \cdot (m_1 \wedge m_2) = 1 \cdot (\alpha m_2 \wedge m_2) = \alpha (m_2 \wedge m_2) = 0
+                ,\] aber $1 \neq 0$ in $R$, da $R \neq 0$ nach Konvention der VL von Kapitel 9.
+            \end{proof}
+        \item Beh.: Für $\text{Rang}(M) = 2$ und $\varphi \in \text{End}_R(M)$ sind
+            die folgenden Aussagen äquivalent:
+            \begin{enumerate}[(i)]
+                \item $\varphi$ ist injektiv
+                \item $\text{det}(\varphi) \in R$ ist kein Nullteiler
+            \end{enumerate}
+            \begin{proof}
+                (i) $\implies$(ii): Da $\varphi$ injektiv, ist $\bigwedge^2 \varphi$ injektiv.
+                Sei $(x_1, x_2)$ Basis von $M$. Dann gilt
+                \begin{salign*}
+                    {\bigwedge}^2\varphi(\underbrace{x_1 \wedge x_2}_{\neq 0})
+                    = \varphi(x_1) \wedge \varphi(x_2)
+                    = \text{det}(\varphi) (x_1 \wedge x_2)
+                    \neq 0
+                .\end{salign*}
+                Also gilt $\text{det}(\varphi) \neq 0$.
+                Sei nun $r \in R$ beliebig mit $\text{det}(\varphi) r = 0$. Dann betrachte
+                \begin{salign*}
+                    {\bigwedge}^2 \varphi(r x_1 \wedge x_2)
+                    = \varphi(r x_1) \wedge \varphi(x_2)
+                    = \text{det}(\varphi) r (x_1 \wedge x_2)
+                    = 0
+                    = r \underbrace{(\text{det}(\varphi) x_1 \wedge x_2)}_{\neq 0}
+                .\end{salign*}
+                Da $(x_1, x_2)$ Basis sind auch $\text{det}(\varphi) x_1$ und $x_2$ linear unabhängig, d.h.
+                mit (b) folgt $r = 0$.
+
+                (ii) $\implies$ (i): Sei $m \in M$ beliebig mit $\varphi(m) = 0$ und $(x_1, x_2)$ Basis
+                von $M$.
+                Ang.: $m \neq 0$. Dann ex. $a, b \in R$ mit $m = ax_1 + b x_2$ mit
+                $a \neq  0 \lor b\neq  0$. O.E.: $a \neq  0$. Dann folgt
+                \begin{salign*}
+                    0 &= \varphi(m) \wedge \varphi(x_2) \\
+                      &= \text{det}(\varphi) (m \wedge x_2) \\
+                      &= \text{det}(\varphi) (a x_1 + b x_2) \wedge x_2 \\
+                      &= \text{det}(\varphi) (a x_1 \wedge x_2) \\
+                      &= \text{det}(\varphi) \cdot a (x_1 \wedge x_2)
+                .\end{salign*}
+                Da $x_1$, $x_2$ l.u., folgt mit (b), dass $\text{det}(\varphi) \cdot a = 0$. Da
+                $\text{det}(\varphi) $ kein Nullteiler, folgt $a \neq  0$ $\contr$.
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Seien $N = \Z$, $M = \bigoplus_{i \in \N} \Z / 2 \Z$ und
+    $f\colon N \to M \oplus M$, $g: N \oplus M \to M$ gegeben durch
+    \[
+        f(n) = (2n, 0) \quad \text{und} \quad g(n, (\overline{m_1}, \ldots, )) = (\overline{n}, \overline{m_1}, \ldots)
+    .\] 
+    \begin{enumerate}[(a)]
+        \item Beh.: Die Folge $0 \to N \xrightarrow{f} N \oplus M \xrightarrow{g} M \to 0$ ist eine
+            kurze exakte Folge von $\Z$-Moduln.
+            \begin{proof}
+                Offensichtlicherweise ist $f$ injektiv und $g$ surjektiv. Bleibt zu zeigen:
+                $\text{ker } g = \text{im } f$.
+
+                ,,$\subseteq $``: Sei $x \in \text{ker } g$. Dann ex. $n, m_1, m_2, \ldots \in \Z$ mit
+                $x = (n, (\overline{m_1}, \ldots))$. Da $g(x) = 0$ folgt
+                $\overline{n} = \overline{m_1}= \ldots = 0$. Damit ex. $z \in \Z$ mit $z = 2 z$. Also
+                ist $f(z) = (2z, 0) = (n, 0) = (n, (\overline{m_1}, \overline{m_2}, \ldots)) = x$.
+                Damit ist $x \in \text{im }f$.
+
+                ,,$\supseteq$``: Sei $x \in \text{im } f$. Dann $\exists n \in \Z$, s.d.
+                $f(n) = (2n, 0) = x$. Damit folgt
+                $g(x) = g(2n, 0) = (\overline{2n}, 0, \ldots) = (\overline{0}, \overline{0}, \ldots) = 0$. Also
+                $x \in \text{ker } g$.
+            \end{proof}
+        \item Beh.: Die Folge aus (a) zerfällt nicht.
+            \begin{proof}
+                Ang.: Die Folge aus (a) zerfällt. Dann ex. ein $\Z$-Untermodul $T \subseteq N \oplus M$,
+                s.d. $g|_T\colon T \to M$ Isomorphismus ist. Wähle
+                $x \coloneqq (\overline{1}, \overline{0}, \ldots) \in M$. Da $g|_T$ surjektiv,
+                ex. ein $y \in T$, s.d. $g(y) = x$. Es ex. $n, m_1, \ldots \in \Z$ mit
+                $y = (n, (\overline{m_1}, \ldots))$. Wegen
+                \[
+                    g(y) = g(n, (\overline{m_1}, \ldots)) = (\overline{n}, \overline{m_1}, \ldots)
+                    = (\overline{1}, \overline{0}, \ldots) = x
+                \] folgt $n \equiv 1$ $(\text{mod } n)$. Da $T$ $\Z$-Untermodul, ist auch
+                $2y = (2n, (\overline{2 m_1}, \ldots)) = (2n, 0) \in T$. Damit folgt
+                \[
+                    g(y) = g(2n, 0) = (\overline{2n}, \overline{0}, \ldots) = (\overline{0}, \overline{0}, \ldots) = 0
+                .\] 
+                Da $n \neq 0$ und $\Z$ nullteilerfrei,
+                folgt $y = (2n,0) \neq 0$, folgt $\text{ker } g|_T \neq \{0\} $ $\contr$.
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\end{document}

sose2020/la/uebungen/la11.tex

@@ -0,0 +1,299 @@
+\documentclass[uebung]{../../../lecture}
+
+\title{Lineare Algebra II: Übungsblatt 11}
+\author{Dominik Daniel, Miriam Philipp, Christian Merten}
+
+\begin{document}
+
+\punkte[40]
+
+\begin{aufgabe}
+    Sei $R$ ein nullteilerfreier Ring und $M$ ein $R$-Modul.
+    \begin{enumerate}[(a)]
+        \item Beh.: Auf der Menge $R \times (R \setminus \{0\})$ wird durch $(r_1, s_1) \sim (r_2, s_2) \iff r_1s_2 = r_2s_1$
+            eine Äquivalenzrelation definiert.
+            \begin{proof}
+                Reflexivität und Symmetrie sind klar.
+
+                Seien weiter $r_1, r_2, r_3 \in R$ und $s_1, s_2, s_3 \in R\setminus \{0\} $ mit
+                $(r_1, s_1) \sim (r_2, s_2)$ und $(r_2, s_2) \sim (r_3, s_3)$. Dann gilt
+                \[
+                r_1 s_2 = r_2 s_1 \land r_2 s_3 = s_2 r_3
+                .\] 
+                Damit folgt
+                \begin{salign*}
+                    \underbrace{r_1 s_2}_{= r_2 s_1} s_3 = \underbrace{r_2 s_3}_{= s_2 r_3} s_1
+                    = s_2 r_1 s_3 \\
+                    \implies s_2(r_1 s_3) = s_2 (s_1 r_3) \\
+                    \implies s_2 (r_1 s_3 - s_1 r_3) = 0
+                .\end{salign*}
+                Da $s_2 \neq 0$ und $R$ nullteilerfrei, folgt
+                \begin{salign*}
+                    r_1 s_3 - s_1 r_3 = 0 \implies r_1 s_3 = s_1 r_3 \implies (r_1, s_1) \sim (r_3, s_3)
+                .\end{salign*}
+                Das zeigt die Transitivität von $\sim$ und damit die Behauptung.
+            \end{proof}
+        \item Beh.: Die Operationen
+            \[
+            \frac{r_1}{s_1} + \frac{r_2}{s_2} \coloneqq \frac{r_1s_2 + r_2s_1}{s_1 s_2}
+            \quad \text{und} \quad
+            \frac{r_1}{s_1} \cdot \frac{r_2}{s_2} \coloneqq \frac{r_1 r_2}{s_1s_2}
+            \]  sind wohldefiniert.
+            \begin{proof}
+                Seien $r_1, \tilde{r}_1, r_2 \in R$ und $s_1, \tilde{s}_1, s_2 \in R \setminus \{0\} $
+                mit $(r_1, s_1) \sim (\tilde{r}_1, \tilde{s}_1)$.
+
+                Z.z.: $(r_1s_2 + r_2s_1, s_1s_2) \sim (\tilde{r}_1 s_2 + r_2 \tilde{s}_1, \tilde{s}_1 s_2)$.
+                Es ist
+                \begin{salign*}
+                    (r_1 s_2 + r_2s_1) \tilde{s}_1 s_2 &= r_1 s_2 \tilde{s}_1 s_2 + r_2 s_1 \tilde{s}_1 s_2 \\
+                    &\stackrel{r_1 \tilde{s}_1 = \tilde{r}_1 s_1}{=}
+                    s_1 s_2 \tilde{r}_1 s_2 + r_2 s_1 \tilde{s}_1 s_2 \\
+                    &= s_1s_2(\tilde{r}_1 s_2 + r_2 \tilde{s}_1)
+                .\end{salign*}
+                Damit folgt die Behauptung.
+
+                Z.z.: $(r_1r_2, s_1s_2) \sim (\tilde{r}_1r_2, \tilde{s}_1 s_2)$.
+                Es ist
+                \begin{salign*}
+                    r_1 r_2 \tilde{s}_1 s_2
+                    &\stackrel{r_1 \tilde{s}_1 = \tilde{r}_1 s_1}{=} s_1 s_2 \tilde{r}_1 r_2
+                .\end{salign*}
+                Damit folgt die Behauptung.
+
+                Wohldefiniertheit folgt für zweites Argument aus Symmetriegründen.
+            \end{proof}
+        \item Beh.: Auf der Menge $M \times (R \setminus \{0\} )$ wird durch
+            \[
+                (x_1, r_1) \sim (x_2, r_2) \iff \exists s \in R \setminus \{0\} \text{ mit } s r_1 x_2 = s r_2 x_1
+            \] eine Äquivalenzrelation definiert.
+            \begin{proof}
+                Reflexivität und Symmetrie sind klar.
+
+                Seien weiter $x_1, x_2, x_3 \in R$ und $r_1, r_2, r_3 \in R\setminus \{0\} $ mit
+                $(x_1, r_1) \sim (x_2, r_2)$ und $(x_2, r_2) \sim (x_3, r_3)$. Dann ex.
+                $s_1, s_2 \in R \setminus \{0\} $ mit $s_1 r_1 x_2 = s_1 r_2 x_1$ und
+                $s_2 r_2 x_3 = s_2 r_3 x_2$.
+
+                Definiere $s \coloneqq s_1 s_2 r_2$. Es ist $s \neq 0$, da $s_1, s_2, r_2 \in R \setminus \{0\} $
+                und $R$ nullteilerfrei. Dann folgt
+                \begin{salign*}
+                    s_1 s_2 r_2 \cdot r_1 x_3 = s_1 r_1 \underbrace{s_2 r_2 x_3}_{= s_2 r_3 x_2}
+                    = s_2 r_3 \underbrace{s_1 r_1 x_2}_{s_1 r_2 x_1}
+                    = s_1 s_2 r_2 \cdot r_3 x_1
+                .\end{salign*}
+                Das zeigt die Transitivität von $\sim$ und damit die Behauptung.
+            \end{proof}
+        \item Beh.: Mit $R = \Z$ und $M = \Z / 2 \Z$ ist die gegebene Relation nicht
+            transitiv.
+            \begin{proof}
+                Es ist
+                \[
+                    (\overline{1}, 1) \sim (\overline{0}, 2) \land (\overline{0}, 2) \sim (\overline{0},1)
+                ,\] denn $\overline{1} \cdot 2 = \overline{0} = 1 \cdot \overline{0}$ und
+                $\overline{0} \cdot 1 = \overline{0} = 2 \cdot \overline{0}$. Aber
+                $\overline{1}\cdot 1 = \overline{1} \neq \overline{0} = 1\cdot \overline{0}$. Also
+                ist $(\overline{1}, 1) \not\sim (\overline{0}, 1)$
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    \begin{enumerate}[(a)]
+        \item Beh.: Seien $R$ ein nullteilerfreier Ring und $M$ ein e.e. $R$-Modul. Dann sind die folgenden
+            Aussagen sind äquivalent:
+            \begin{enumerate}[(i)]
+                \item $M$ ist ein Torsions-$R$-Modul
+                \item Es gilt $\text{Ann}(M) \neq (0)$
+            \end{enumerate}
+            \begin{proof}
+                (i) $\implies$ (ii): Sei $T(M) = M$. Da $M$ e.e. existiert ein endliches ES.
+                $\{x_1, \ldots, x_n\} \subseteq M$ von $M$.
+                Da $x_1, \ldots, x_n \in M = T(M)$ existieren $s_1, \ldots, s_n \in R \setminus \{0\} $
+                mit 
+                \[
+                    x_1 s_1 = x_2 s_2 = \ldots = x_n s_n = 0 \quad (*)
+                .\] Wähle $a \coloneqq s_1 \cdot \ldots \cdot s_n$. Es ist $a \neq 0$, da
+                $s_1, \ldots, s_n \neq 0$ und $R$ nullteilerfrei. Sei
+                nun $m \in M$ beliebig. Dann ex. $\alpha_1, \ldots, \alpha_n \in R$ mit
+                $m = \sum_{i=1}^{n} \alpha_i x_i$. Damit folgt
+                \[
+                a m = \sum_{i=1}^{n} a \alpha_i x_i = \sum_{i=1}^{n} \alpha_i s_1 \cdot \ldots \cdot s_n x_i
+                \stackrel{(*)}{=} 0
+            .\] Damit ist $0 \neq a \in \text{Ann}(M)$, also $\text{Ann}(M) \neq (0)$.
+
+            (ii) $\implies$ (i): Sei $a \in \text{Ann}(M)$ mit $a \neq 0$. Dann gilt
+            $\forall m \in M$: $a m = 0$. Da $a \neq 0$ folgt $m \in T(M)$, also $M = T(M)$.
+            \end{proof}
+        \item Sei $R = \Z$ und $M = \oplus_{n \in \N} \Z / 2^{n} \Z$.
+
+            Beh.: $M$ ist ein Torsions-$R$-Modul.
+            \begin{proof}
+                Sei $m \in M$ beliebig. Dann ex. $m_i \in \Z / 2^{i} \Z$ mit
+                $m = (m_i)_{i \in \N}$ wobei $m_i = 0$ für fast alle $i \in \N$.
+                Es ex. also eine Indexmenge $I \subseteq \N$ mit $\# I < \infty$ s.d.
+                $m_i \neq 0$ $\forall i \in I$ und $m_i = 0$ $\forall i \in \N \setminus I$.
+
+                Definiere nun
+                \[
+                a \coloneqq \prod_{i \in I} 2^{i}
+                .\] $a$ ist wohldefiniert, da $I$ endlich ist. Außerdem gilt
+                $a \neq 0$ da $2^{i} \neq 0$ $\forall i \in \N$ und $\Z$ nullteilerfrei.
+                Weiter gilt $\forall i \in I$: $a \cdot m_i = 0$, denn $\exists r_i \in \Z$ mit
+                $m_i = r_i + \Z / 2^{i} \Z$. Da $2^{i}  \mid a$ ex. $s_i \in \Z$ mit
+                $a = s_i \cdot 2^{i}$. Damit folgt
+                \[
+                    a m_i = a \left( r_i + 2^{i} \Z \right)
+                    = s_i r_i 2^{i} + 2^{i} \Z = 2^{i} \Z = \overline{0} \in \Z / 2^{i} \Z
+                .\] Insgesamt folgt damit $(a m)_i = 0$ $\forall i \in \N$, also
+                $a m = 0$.
+            \end{proof}
+
+            Beh.: $\text{Ann}(M) = (0)$.
+            \begin{proof}
+                Ang. $\exists a \in \text{Ann}(M)$ mit $a \neq 0$. Dann ist $a \in \Z$ und
+                es ex. $k \in \N$ s.d. $2^{k} > |a|$. Damit folgt
+                $2^{k} \nmid a$, also $a \not\equiv 0$ $(\text{mod } 2^{k})$ $(*)$. Wähle nun
+                $m \coloneqq (m_1, m_2, \ldots)$ mit
+                \[
+                m_i = \begin{cases}
+                    0 & i \neq 2^{k} \\
+                    \overline{1} & i = 2^{k}
+                \end{cases}
+                .\] Es ist $m_i = 0$ für fast alle $i \in N$ also $m \in M$, aber
+                \[
+                a \cdot m_k =
+                    a \cdot \overline{1}
+                    =
+                    a + 2^{i} \Z \stackrel{(*)}{\neq} 0
+                .\] Damit folgt $a m \neq 0$, also $a \not\in \text{Ann}(M)$ $\contr$.
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Sei $M$ der $\R[t]$-Modul $\R[t]/(t^2)$.
+    \begin{enumerate}[(a)]
+        \item Beh.: $T(M) = M$.
+            \begin{proof}
+                Sei $\overline{f} \in \R[t] / (t^2)$ beliebig. Dann wähle $a \coloneqq t^2 \in \R[t]$.
+                Es ist $a \neq 0$ und
+                \[
+                    a m = t^2 f + (t^2) = (t^2) = 0 \in \R[t] / (t^2)
+                .\]
+            \end{proof}
+            Beh.: $\text{Rang}(M) = 0$.
+            \begin{proof}
+                Sei $m \in M$. Dann ist $m \in T(M)$. Also ex. $s \in \R[t] \setminus \{0\} $
+                mit $s m = 0$. Also ist $m$ linear abhängig. Die
+                max. Anzahl l.u. Elemente in $M$ ist also $0$. Damit folgt die Behauptung.
+            \end{proof}
+        \item Beh (i).: $\mathcal{B} = \{\overline{1}, \overline{t}\} $ ist Basis von $\R[t] / (t^2)$ als $\R$-Modul.
+            \begin{proof}
+                Sei $\overline{f} \in \R[t] / (t^2)$ beliebig. $\R$ ist Körper, also ist $\R[t]$
+                Euklidscher Ring. Also existieren $r, q \in \R[t]$ mit $\text{deg}(r) < \text{deg}(t^2) = 2$
+                und
+                \[
+                f = q t^2 + r
+                .\]
+                Da $\text{deg}(r) < 2$ ex. $a_0, a_1 \in \R$ mit
+                \[
+                r = a_0 + a_1 t
+                .\] Damit folgt
+                \[
+                    \overline{f} = f + (t^2) = q t^2 + r + (t^2) = a_0 + a_1 t + (t^2)
+                    = a_0 \overline{1} + a_1 \overline{1}
+                .\] Also ist $\mathcal{B}$ ES. von $\R[t] / (t^2)$ als $\R$-Modul.
+
+                Seien außerdem weiter $a, b \in \R$ mit
+                \[
+                    a \overline{1} + b \overline{t} = 0 \implies a + bt + (t^2) = 0 \implies
+                    a + bt \in (t^2)
+                .\] Wegen $\text{deg}(a + bt) \le 1$ folgt $a = b = 0$. Also
+                $\mathcal{B}$ l.u. und $\mathcal{B}$ Basis von $\R[t] / (t^2)$ als $\R$- Modul.
+            \end{proof}
+            Beh.: $\R[t] / (t^2)$ ist torsionsfreier $\R$-Modul vom Rang $2$.
+            \begin{proof}
+                Wegen (i) ist $\R[t] / (t^2)$ frei mit Rang $2$ als
+                $\R$-Modul und damit auch torsionsfrei nach VL.
+            \end{proof}
+        \item Beh.: $\ell(M) = 2$ mit Kompositionsfaktoren $t / (t^2)$ und $\R[t] / (t^2)$.
+            \begin{proof}
+                Nach VL sind die Untermoduln von $\R[t] / (t^2)$ gerade die Untermoduln
+                $N$ von $\R[t]$ mit $(t^2) \subseteq N$. Diese sind gerade
+                die Ideale $N$ im HIR $\R[t]$ mit $(t^2) \subseteq N$, also
+                $\{(t^2), (t), (1)\} $. Damit sind die Untermoduln von $\R[t] / (t^2)$ gegeben als
+                \[
+                    \left\{ (t^2)/(t^2), (t) / (t^2), (1) / (t^2)\right\}
+                    =
+                    \left\{ 0, (t) / (t^2), \R[t] / (t^2)\right\} 
+                .\] Als längste Filtrierung ergibt sich damit sofort
+                \[
+                    0 \subsetneqq (t) / (t^2) \subsetneqq \R[t] / (t^2)
+                .\] Also folgt $\ell(M) = 2$. Die Kompositionsfaktoren ergeben sich unter
+                Benutzung der Isomorphiesätze der VL als:
+                \begin{align*}
+                    ( (t) / (t^2) ) / 0 &\stackrel{\sim}{=} (t) / (t^2) \\
+                    ( (1) / (t^2)) / ( (t) / (t^2)) &\stackrel{\sim}{=} (1) / (t) 
+                    = \R[t] / (t^2)
+                .\end{align*}
+                Diese sind nach VL einfach, da die Filtrierung Länge $2 = \ell(M)$ hat. 
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Seien $R$ ein Ring und $M$, $N$ zwei $R$-Moduln und $\varphi\colon M \to N$ ein $R$-Mod.hom.
+    \begin{enumerate}[(a)]
+        \item Beh.: Es gilt $\ell(\text{ker } \varphi) = \ell(\text{im }\varphi) = \ell(M)$.
+            \begin{proof}
+                Definiere $\tilde{\varphi}\colon M \to \text{im }\varphi$, $m \mapsto \varphi(m)$. Dann
+                ist $\tilde{\varphi}$ surjektiv. Sei weiter
+                $\iota \colon \text{ker } \varphi \to M$ die kanonische Inklusion. Da $\iota$ injektiv
+                und $\text{im }\iota = \text{ker } \varphi = \text{ker } \tilde{\varphi}$ ist die kurze Folge
+                \[
+                    0 \to \text{ker } \varphi \to M \to \text{im } \varphi \to 0
+                \] exakt. Also folgt $\ell(\text{ker } \varphi) + \ell(\text{im }\varphi) = \ell(M)$.
+            \end{proof}
+        \item Beh.: Für $\ell(M) < \infty$ gilt $\ell(L) < \ell(M)$ für jeden echten $R$-Untermodul
+            $L \subsetneqq M$.
+            \begin{proof}
+                Sei $\ell(M) = n$ und $L \subsetneqq M$ Untermodul. Ang.: $\ell(L) \ge n$. Dann
+                ex. Filtrierung von $L$ der Länge $n$:
+                \[
+                0 \subsetneqq L_1 \subsetneqq L_2 \subsetneqq \ldots \subsetneqq L_n = L
+                .\] Dann ist aber
+                \[
+                0 \subsetneqq L_1 \subsetneqq L_2 \subsetneqq \ldots \subsetneqq L \subsetneqq M
+                \] eine Filtrierung von $M$ der Länge $n+1$ $\contr$.
+            \end{proof}
+        \item Beh.: Für $\ell(M) < \infty$ und $N = M$ gilt
+            \[
+            \varphi \text{ injektiv } \iff \varphi \text{ surjektiv } \iff \varphi \text{ bijektiv}
+            .\]
+            \begin{proof}
+                (i) $\implies$ (ii): Sei $\varphi$ injektiv. Dann ist $\text{ker } \varphi = 0$. Also
+                $\ell(\text{ker } \varphi) = 0$. Damit folgt aus (a)
+                \[
+                     \ell(M) = \ell(\text{ker } \varphi) + \ell(\text{im } \varphi) =
+                     \ell(\text{im } \varphi)
+                 .\] Da $\ell(M) < \infty$ und $\text{im }\varphi$ Untermodul von $M$, aber
+                 $\ell(\text{im } \varphi) = \ell(M)$ folgt mit (b), dass $\text{im }\varphi$ kein
+                 echter Untermodul von $M$ ist. Also folgt $\text{im }\varphi = M$, also
+                 $\varphi$ surjektiv.
+
+                 (ii) $\implies$ (iii): Sei $\varphi$ surjektiv. g.z.z. $\varphi$ injektiv.
+                 Es folgt aus (a):
+                 \begin{align*}
+                     \ell(M) &= \ell(\text{im }\varphi) + \ell(\text{ker } \varphi) \\
+                     &= \ell(M) + \ell(\text{ker }\varphi)
+                 .\end{align*}
+                 Da $\ell(M) \in \N_0$ folgt $\ell(\text{ker } \varphi) = 0$. Also nach VL
+                 $\text{ker }\varphi = 0$, also $\varphi$ injektiv.
+
+                 (iii) $\implies$ (i): trivial.
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\end{document}

sose2020/num/uebungen/num10.tex

@@ -0,0 +1,262 @@
+\documentclass[uebung]{../../../lecture}
+
+\title{Einführung in die Numerik: Übungsblatt 10}
+\author{Leon Burgard, Christian Merten}
+
+\begin{document}
+
+\punkte
+
+\begin{aufgabe}
+    Beh.: Seien $n$ paarweise verschiedene Stützstellen $\{x_0, \ldots, x_{n-1}\} $ gegeben
+    und eine Permutation derselben $\{\tilde{x}_0, \ldots, \tilde{x}_{n-1}\} $. Dann gilt
+    \[
+        f[x_0, \ldots, x_{n-1}] = f[\tilde{x}_0, \ldots, \tilde{x}_{n-1}]
+    .\]
+    \begin{proof}
+        Es gilt nach VL mit der Newtondarstellung für das Interpolationspolynom
+        zu den Stützstellen $x_0, \ldots, x_{n-1}$:
+        \begin{salign*}
+            p(x) &= \sum_{i=0}^{n-1} y[x_0, \ldots, x_i] N_i(x) \\
+            &= \sum_{i=0}^{n-2} y[x_0, \ldots, x_i] N_i(x) + y[x_0, \ldots, x_{n-1}] N_{n-1}(x) \\
+            &= \mathcal{O}(x^{n-2}) + y[x_0, \ldots, x_{n-1}] \prod_{i=0}^{n-2} (x - x_i) \\
+            &= \mathcal{O}(x^{n-2}) + y[x_0, \ldots, x_{n-1}] \left(x^{n-1} + \mathcal{O}(x^{n-2})\right) \\
+            &= y[x_0, \ldots, x_{n-1}] x^{n-1} + \mathcal{O}(x^{n-2})
+        .\end{salign*}
+        Der Leitkoeffizient des Interpolationspolynoms in der Monombasis ist also
+        $y[x_0, \ldots, x_{n-1}]$. Dieser ist unabhängig von der Reihenfolge der Stützstellen. Damit
+        folgt die Behauptung.
+    \end{proof}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Beh.: Für $N \ge 2 \pi 10^{3}$ gilt $\displaystyle \max_{0 \le x \le 1} |f(x) - s(x)| < 10^{-12}$.
+    \begin{proof}
+        Es ist $f \in C^{4}([0, 1])$. Dann gilt nach VL
+        \[
+            \delta \coloneqq \max_{0 \le x \le 1} |f(x) - s(x)| \le h^{4} \max_{0 \le x \le 1} |f^{(4)}(x)|
+        .\] Mit $f(x) = \sin(2\pi x)$ folgt sofort
+        \[
+            f^{(4)}(x) = 16 \pi^{4} \sin(2 \pi x) \quad \text{also}\quad
+            \max_{0 \le x \le 1} |f^{(4)}(x)| = 16 \pi^{4}
+        .\] Mit $h = \frac{1}{N}$ ergibt sich
+        \[
+            \delta \le 16 \frac{\pi^{4}}{N^{4}} \implies N \ge 2 \pi \sqrt[4]{\delta } = 2 \pi 10^{3}
+        .\] 
+    \end{proof}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Beh.: Das komplexe trigonometrische Interpolationspolynom ist gegeben als
+    \[
+        t ^{*}(x) = \frac{1}{2} - \frac{1}{4} e^{ix} - \frac{1}{4} e^{3ix}
+    .\] 
+    \begin{proof}
+        Die Stützstellen sind als $x_j = \frac{2 \pi j}{4}$, $j = 0, \ldots, 3$ gegeben. Damit folgt
+        \begin{salign*}
+            f(x_0) &= f(0) = \min \{0, 2\} = 0 \\
+            f(x_1) &= f\left(\frac{\pi}{2}\right) = \min \left\{ \frac{1}{2}, \frac{3}{2} \right\} = \frac{1}{2} \\
+            f(x_2) &= f(\pi) = \min \{1, 1\} = 1 \\
+            f(x_3) &= f\left( \frac{3}{2}\pi \right) = \min \left\{ \frac{3}{2}, \frac{1}{2} \right\} = \frac{1}{2}
+        .\end{salign*}
+        Die Interpolationsbedingung ist erfüllt, denn
+        \begin{salign*}
+            t ^{*}(x_0) &= \frac{1}{2} - \frac{1}{4} - \frac{1}{4} = 0 = f(x_0) \\
+            t ^{*}(x_1) &= \frac{1}{2} - \frac{1}{4} \underbrace{e^{i \frac{\pi}{2}}}_{= i} - \frac{1}{4}
+            \underbrace{e^{i \frac{3}{2} \pi}}_{= -i} = \frac{1}{2} = f(x_1) \\
+            t ^{*}(x_2) &= \frac{1}{2} - \frac{1}{4} \underbrace{e^{i \pi}}_{= -1} - \frac{1}{4}
+            \underbrace{e^{i \pi}}_{= -1} = 1 = f(x_2) \\
+            t ^{*}(x_3) &= \frac{1}{2} - \frac{1}{4} \underbrace{e^{i \frac{3}{2} \pi}}_{= i} - \frac{1}{4}
+            \underbrace{e^{i \frac{3}{2} \pi}}_{= -i} = \frac{1}{2} = f(x_3)
+        .\end{salign*}
+        Aus der Eindeutigkeit des komplexen trigonometrischen Interpolationspolynoms folgt die Behauptung.
+    \end{proof}
+\end{aufgabe}
+
+\begin{aufgabe}
+    \begin{enumerate}[a)]
+        \item 
+            \begin{enumerate}[(1)]
+                \item Es ist
+                    \[
+                        f_1''(x) = 6x - 14 \implies f_1''(0) = -14 \neq 0
+                    .\] Also erfüllt $f_1$ nicht die natürlichen Randbedingungen, also $f_1 \not\in S(X)$.
+                \item Es gilt für $0 \le x < 1$:
+                    \begin{salign*}
+                        f_2(x) &= -\frac{1}{2} x^{3} \xrightarrow{x \to 1} -\frac{1}{2}\\
+                        f_2'(x) &= -\frac{3}{2} x^2 \xrightarrow{x \to 1} - \frac{3}{2} \\
+                        f_2''(x) &= - 3x \xrightarrow{x \to 1} -3 \text{ und } f_2''(0) = 0
+                        \intertext{Für $1 \le x \le 2$ gilt:}
+                        f_2(x) &= (x-1)^{3} -\frac{1}{2} x^{3} \implies f_2(1) = -\frac{1}{2} \\
+                        f_2'(x) &= 3(x-1)^2 - \frac{3}{2} x^2 \implies f_2'(1) = -\frac{3}{2} \\
+                        f_2''(x) &= 3x - 6 \implies f_2''(1) = -3 \text{ und } f_2''(2) = 0
+                    .\end{salign*}
+                    $f_2$ ist auf beiden Teilintervallen ein Polynom von Grad $3$ und damit
+                    auf den Teilintervallen beliebig oft stetig differenzierbar. Außerdem
+                    ist $f_2$ $2$ mal stetig differenzierbar an der Stelle $1$, also insgesamt
+                    $f_2 \in C^{2}([0, 2])$. Die natürlichen Randbedingungen sind außerdem erfüllt, also
+                    folgt $f_2 \in S(X)$.
+                \item Es ist
+                    \[
+                        f_3''(x) = 6x - 2 \implies f_3''(0) = -2 \neq 0
+                    .\] Also erfüllt $f_3$ nicht die natürlichen Randbedingungen, also $f_3 \not\in S(X)$.
+            \end{enumerate}
+        \item Der interpolierende Spline $s$ von $f(x) = x^{3}$ folgt mit der Darstellung der VL direkt
+            als
+            \[
+                s(x) = \begin{cases}
+                    1 + 4x + 4,5 x^2 + 1,5 x^{3} & x \in [0, 1) \\
+                    8 + 8,5(x-1) - 1,5(x-1)^{3} & x \in [1,2]
+                \end{cases}
+            .\] 
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Auszüge aus \textit{splines.cc}:
+    \begin{lstlisting}[language=C++, title=Schneller Löser für tridiagonale Matrizen, captionpos=b]
+template<typename REAL>
+void solveTriDiag(hdnum::DenseMatrix<REAL> &A, std::vector<REAL> &x, std::vector<REAL> &b) {
+    int N = b.size();
+    x[0] = A[0][0];
+    // LU Zerlegung
+    REAL l;
+    for (int j=1; j<N; j++) {
+        // berechne l faktor
+        l = A[j][j-1] / x[j-1];
+        // modifiziere diagonalelemente und rechte seite
+        x[j] = A[j][j] - l * A[j-1][j];
+        b[j] = b[j] - l * b[j-1];
+    }
+    // Loesen durch Rueckwaertseinsetzen
+    x[N-1] = b[N-1] / x[N-1];
+    for (int j=N-2; j>=0; j--) {
+        x[j] = (b[j] - A[j][j+1]*x[j+1])/x[j];
+    }
+}\end{lstlisting}
+Implementation in einer Klasse \lstinline{CubicSpline}. Die Funktion \lstinline{getCubicSpline}
+entspricht dem ersten Konstruktor.
+\begin{lstlisting}[language=C++, title=Konstruktion und Auswertung eines kubischen Splines, captionpos=b]
+template<typename REAL>
+class CubicSpline {
+    public:
+        // erstelle einen kubischen spline mit vorgegebenen stuetzstellen
+        // und werten
+        CubicSpline(std::vector<REAL> xs, std::vector<REAL> ys) {
+            calculateCoefficients(xs, ys);
+        }
+
+        // erstelle einen kubischen spline mit vorgegebenen stuetzstellen
+        // und einer zu interpolierenden funktion
+        CubicSpline(std::vector<REAL> xs, REAL(*f)(REAL)) {
+            int N = xs.size();
+            std::vector<double> ys(N);
+            for (int i=0; i<N; i++) {
+                ys[i] = f(xs[i]);
+            }
+            calculateCoefficients(xs, ys);
+        }
+
+        // erstelle einen kubischen spline an aequidistanten stuetzstellen
+        // und einer zu interpolierenden funktion
+        CubicSpline(REAL a, REAL b, int N, REAL(*f)(REAL)) {
+            std::vector<double> xs(N+1);
+            std::vector<double> ys(N+1);
+            for (int i=0; i<=N; i++) {
+                xs[i] = a + (1.0*i)/N*(b-a);
+                ys[i] = f(xs[i]);
+            }
+            calculateCoefficients(xs, ys);
+        }
+
+        // werte kubischen spline an vorgegebener stelle aus
+        REAL evaluate(REAL x) {
+            for (int i=1; i<x_s.size(); i++) {
+                if (x > x_s[i] && i < x_s.size() - 1) {
+                    continue;
+                } else {
+                    return a_0[i-1] + a_1[i-1] *(x - x_s[i]) + a_2[i-1]*std::pow(x - x_s[i], 2) + a_3[i-1]*std::pow(x-x_s[i], 3);
+                }
+            }
+            return 0;
+        }
+
+        // gebe alle interpolations polynome aus
+        void print() {
+            for(int i=0; i<x_s.size()-1; i++) {
+                printf("p_%d(x) = %4.2f + %4.2f(x - %4.2f) + %4.2f(x - %4.2f)^2 + %4.2f(x - %4.2f)^3\n",
+                       i, a_0[i], a_1[i], x_s[i], a_2[i], x_s[i], a_3[i], x_s[i]);
+            }
+        }
+
+    private:
+        // stuetzstellen
+        std::vector<REAL> x_s;
+        // koeffizienten
+        std::vector<REAL> a_0;
+        std::vector<REAL> a_1;
+        std::vector<REAL> a_2;
+        std::vector<REAL> a_3;
+
+        void calculateCoefficients(std::vector<REAL> xs, std::vector<REAL> ys) {
+            // stuetzstellen from x_0 ... to x_n
+            int n = xs.size()-1;
+            // copy stuetzstellen
+            x_s = std::vector<double>(n+1);
+            x_s = xs;
+            // setup (n-1)x(n-1) matrix for a_2
+            hdnum::DenseMatrix<REAL> A(n-1,n-1);
+            std::vector<REAL> b(n-1);
+            std::vector<REAL> x(n-1);
+            REAL h; // h_i
+            REAL h1; // h_{i+1}
+            // setup LGS for a_2
+            // A has tridiagonal structure
+            for (int i = 1; i<n; i++) {
+                h = xs[i] - xs[i-1];
+                h1 = xs[i+1] - xs[i];
+                b[i-1] = 3 * ((ys[i+1] - ys[i])/h1 - (ys[i] - ys[i-1])/h);
+                if (i > 1) {
+                    A[i-1][i-2] = h;
+                } if (i < n-1) {
+                    A[i-1][i] = h1;
+                }
+                A[i-1][i-1] = 2 * (h + h1);
+            }
+            // initialize vectors
+            a_0 = std::vector<double>(n);
+            a_1 = std::vector<double>(n);
+            a_2 = std::vector<double>(n);
+            a_3 = std::vector<double>(n);
+            solveTriDiag(A,a_2,b);
+            // natuerliche randbedingung
+            a_2[n-1] = 0;
+            // berechne restliche koeffizienten
+            for (int i = 1; i<=n; i++) {
+                h = xs[i] - xs[i-1]; // h_i
+                h1 = xs[i+1] - xs[i]; // h_{i+1}
+                a_0[i-1] = ys[i];
+                if (i == 1) { // a_2[-1] = 0
+                    a_1[i-1] = (ys[i] - ys[i-1])/h + (h/3)*(2*a_2[i-1]);
+                    a_3[i-1] = (a_2[i-1])/(3*h);
+                } else {
+                    a_1[i-1] = (ys[i] - ys[i-1])/h + h/3*(2*a_2[i-1] + a_2[i-2]);
+                    a_3[i-1] = (a_2[i-1] - a_2[i-2])/(3 * h);
+                }
+            }
+        }
+};\end{lstlisting}
+\begin{figure}[h]
+    \centering
+    \begin{tikzpicture}
+        \begin{axis}[xtick=\empty, ytick=\empty]
+            \addplot[purple] table {saurier.dat};
+        \end{axis}
+    \end{tikzpicture}
+    \caption{Rekonstruktion des Sauriers}
+    \label{fig:}
+\end{figure}
+
+\end{aufgabe}
+
+\end{document}

sose2020/num/uebungen/num8.tex

@@ -0,0 +1,214 @@
+\documentclass[uebung]{../../../lecture}
+
+\title{Einführung in die Numerik: Übungsblatt 8}
+\author{Leon Burgard, Christian Merten}
+
+\begin{document}
+
+\punkte
+
+\begin{aufgabe}
+    Sei $A \in \R^{n \times n}$ symmetrisch und positiv definit. Betrachte
+    \[
+        F\colon \R^{n} \to \R, \quad F(x) = \frac{1}{2} (Ax,x)_2 - (b,x)_2
+    .\] 
+    \begin{enumerate}[1.]
+        \item Beh.: $\nabla F(x) = Ax - b$.
+            \begin{proof}
+                Es ist
+                \begin{salign*}
+                    F(x) &= \frac{1}{2} \sum_{i,j=1}^{n} a_{ij}x_j x_i - \sum_{i=1}^{n} b_i x_i
+                    \intertext{Da $A$ symmetrisch, gilt $a_{ij} = a_{ji}$. Damit folgt}
+                    \frac{\partial F}{\partial x_i} &= \frac{1}{2} \left(2 \sum_{j=1, i\neq j}^{n} a_{ij}x_j
+                    + 2 a_{ii} x_i \right) - b_i \\
+                    &= \sum_{j=1}^{n} a_{ij} x_j - b_i \\
+                    &= (Ax)_i - b_i
+                    \intertext{Also folgt}
+                    \nabla F(x) &= Ax - b
+                .\end{salign*}
+            \end{proof}
+        \item Beh.: $x^{*}$ löst $Ax = b$ g.d. wenn $x^{*}$ das eindeutige Minimum von $F$ ist.
+            \begin{proof}
+                ,,$\implies$``: Sei $x^{*}$ Lösung von $Ax = b$. Dann ist
+                $\nabla F(x^{*}) = Ax^{*} -b = b - b = 0$. Außerdem gilt da $A$ symmetrisch
+                \[
+                    H_f(x) = \left( \frac{\partial^2F}{\partial x_i \partial x_j} \right)_{i,j=1}^{n} = A^{T} = A
+                .\] Da $A$ positiv definit, ist $x^{*}$ Minimum von $F$. Da $A$ symmetrisch
+                und positiv definit, ist $A$ regulär, also hat $\nabla F(x)$ keine weiteren Nullstellen.
+                $x^{*}$ ist also eindeutiges Minimum.
+
+                ,,$\impliedby$``: Sei $x^{*}$ Minimum von $F$. Dann gilt $\nabla F(x^{*}) = 0$, also
+                $Ax^{*} - b = 0$, d.h. $Ax^{*} = b$.
+            \end{proof}
+        \item Seien $x, p \in \R^{n}$ mit $p \neq 0$. Beh.: $g(\alpha) = F(x + \alpha p)$ nimmt
+            bei
+            \[
+                \alpha = \frac{(p, b-Ax)_2}{(p,Ap)_2}
+            \] sein Minimum an.
+            \begin{proof}
+                Es ist
+                \[
+                    g'(\alpha) = (\nabla F(x + \alpha p), p)_2 = (Ax, p)_2 + \alpha (Ap, p)_2 - (b,p)_2
+                .\] Eingesetzt ergibt sich
+                \begin{salign*}
+                    g'\left( \frac{(p, b-Ax)_2}{(p,Ap)_2} \right) &=
+                    (Ax,p)_2 + (p,b-Ax)_2 - (b,p)_2 \\
+                    &= (Ax - b, p)_2 + (b - Ax, p)_2 \\
+                    &= (0,p)_2 \\
+                    &= 0
+                .\end{salign*}
+                Weiter gilt da $A$ positiv definit und $p \neq 0$:
+                \[
+                    g''(\alpha) = (Ap, p)_2 > 0 
+                .\] Also ist $\alpha$ Minimum von $g$.
+            \end{proof}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Sei $\R \ni a \neq 0$ und
+    \[
+        f(x) = x^2 - a
+    .\] 
+    \begin{enumerate}[1.]
+        \item
+            \begin{enumerate}[(a)]
+                \item $g_R'(x) = 1 - \frac{2x}{a} \implies 0 = 1 - \frac{2x}{a} \implies x = \frac{a}{2}$,
+                    $g_R''(x) = - \frac{2}{a} < 0$. Also ist $x = \frac{a}{2}$ Maximum und
+                    einziges Extremum von $g_R$,
+                    inbes. auf $[0, a]$. Weiter ist $g\left( \frac{a}{2} \right) = \frac{a}{4} + 1$.
+
+                    Wegen $g(0) = 1 = g(a)$ folgt $g([0,a]) = [1, 1 + \frac{a}{4}]$.
+                \item Für $a > $, $\sigma = \frac{1}{a}$ und $0 < x,y < a$ gilt
+                    \begin{salign*}
+                        |g(x) - g(y)| &= | x - \frac{x^2}{a} + 1 - (y - \frac{y^2}{a} + 1)| \\
+                        &= |x-y + \frac{1}{a}(y^2 - x^2)| \\
+                        &= |x-y - \frac{1}{a}(x-y)(y+x)| \\
+                        &= |x-y| |1 - \underbrace{\frac{1}{a}(y+x)}_{< 2a}| \\
+                        &< |x-y| |-1| \\
+                        &= |x-y|
+                    .\end{salign*}
+                \item Aus (b) folgt
+                    \[
+                        q \coloneqq |1 - \frac{1}{a} (\underbrace{x^{k+1} + x^{k}}_{\to 2\sqrt{a}}) |
+                        \xrightarrow{x^{k} \to \sqrt{a}} 1 - \frac{2 \sqrt{a} }{a}
+                    .\] 
+            \end{enumerate}
+        \item Sei nun
+            \[
+                g_N(x) = x - \frac{x^2 - a}{2x}
+            .\]
+            Sei $z \in \R$ beliebig. Dann ex. mit Taylor ein $\eta_x$ zwischen $x$ und $z$ und
+            ein $\eta_y$ zwischen $y$ und $z$, s.d.
+            \begin{salign*}
+                g_N(x) &= g_N'(z)(x - z) + \underbrace{g_N''(\eta_x)(x - z)^2}_{\text{Restglied}} \\
+                g_N(y) &= g_N'(z)(y - z) + \underbrace{g_N''(\eta_y)(y - z)^2}_{\text{Restglied}} \\
+                \intertext{Damit folgt}
+                g_N(y) - g_N(y) &= g_N'(z)(y-y) + g_N''(\eta_y)(y - z)^2 + g_N''(\eta_y)(y - z)^2
+            .\end{salign*}
+            Es gilt weiter
+            \begin{align*}
+            g_N'(x) &= 1 - \frac{4x^2 - 2x^2 + 2a}{4x^2} = 1 - \frac{x^2 + a}{2x^2} = \frac{1}{2} - \frac{a}{2x^2} \\
+            g_N''(x) &= \frac{a}{x^{3}}
+            .\end{align*}
+            Mit $z = \frac{x+y}{2}$ folgt
+            \begin{salign*}
+                |g(x) - g(y)| &= \left| \left( \frac{1}{2} - \frac{2a}{(x+y)^2} \right) (x-y) + \frac{a(x-y)^2}{4} \left( \frac{1}{\eta_x^{3}} + \frac{1}{\eta_{y}^{3}} \right)  \right| \\
+                &= |x - y| \left| \frac{1}{2} - \frac{2a}{(x+y)^2} + \frac{a|x-y|}{4} \left( \frac{1}{\eta_{x}^{3}} + \frac{1}{\eta_y^{3}} \right)  \right|
+            .\end{salign*}
+            Z.z.: $\exists \epsilon > 0$, s.d. für $|x - \sqrt{a}|, |y - \sqrt{a}| < \epsilon$, $\left| \frac{1}{2} - \frac{2a}{(x+y)^2} + \frac{a|x-y|}{4} \left( \frac{1}{\eta_{x}^{3}} + \frac{1}{\eta_y^{3}} \right)  \right| < 1$ gilt.
+
+            Für $x \to \sqrt{a} $ und $y \to \sqrt{a}$ folgt $\eta_x \to \sqrt{a} $ und $\eta_y \to \sqrt{a} $.
+            Damit folgt
+            \begin{salign*}
+                \left| \frac{1}{2} - \frac{2a}{\underbrace{(x+y)^2}_{\to 4 \sqrt{a} }} + \frac{a\overbrace{|x-y|}^{\to 0}}{4}
+                \underbrace{\left( \frac{1}{\eta_{x}^{3}} + \frac{1}{\eta_y^{3}} \right)}_{\to \frac{1}{2 \sqrt{a}^{3}}}  \right| \longrightarrow 0
+            .\end{salign*}
+            Also für $\epsilon$ klein genug, folgt $|g(x) - g(y)| < |x-y|$ für
+            $|x - \sqrt{a}|, |y - \sqrt{a}| < \epsilon$.
+
+        \item Es gilt für $0 < x^{k} \neq \sqrt{a}$:
+            \[
+                x^{k+1} = g_N(x^{k}) = x^{k} - \frac{(x^{k})^2 - a}{2x^{k}}
+            .\] 
+            Es gilt damit
+            \begin{alignat*}{3}
+                &&0 &< (\underbrace{x^{k})^{2} - a}_{\neq 0})^2
+                = (x^{k})^{4} - 2(x^{k})^2 a + a^2 \\
+                &\implies& 4 (x^{k})^2 a &< (x^{k})^{4} + 2(x^{k})^2a + a^2 \\
+                &\implies& 2 x^{k} \sqrt{a}  &< (x^{k})^2 + a
+                = 2 (x^{k})^2 - (x^{k})^2 + a\\
+                &\implies& \sqrt{a} &< x^{k} - \frac{(x^{k})^2 - a}{2x^{k}}
+                = x^{k+1} \qquad (*)
+            .\end{alignat*}
+            Für $x^{k} > \sqrt{a} $ gilt zudem
+            \begin{align*}
+                x^{k+1} &= x^{k} - \underbrace{\frac{(x^{k})^2 - a}{2 x^{k}}}_{> 0} \\
+                &< x^{k}
+            .\end{align*}
+
+            Damit folgt für $x^{k} > \sqrt{a} $ konvergiert $x^{k+1}$ monoton gegen $\sqrt{a} $. Falls
+            $x^{k} < \sqrt{a} $, dann ist wegen ($*$) $x^{k+1} > \sqrt{a} $. Dann tritt wieder der erste
+            Fall ein und es liegt ebenfalls Konvergenz vor.
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    Sei $f\colon \R^{n} \to \R^{n}$. Betrachte
+    \[
+        F(x) = \Vert f(x) \Vert_2^2
+    \] und
+    \[
+        H(\alpha) = \Vert f(x^{k}) + \alpha J_f(x^{k})p^{k}\Vert_2^2
+    .\] Es gilt
+    \begin{align*}
+        H'(\alpha) &= 2 \left[ f(x^{k}) + \alpha J_f(x^{k})p^{k} \right]^{T} J_f(x^{k})p^{k} \\
+                   &= 2 \left[ (fx^{k}, J_f(x^{k})p^{k})_2 + \alpha (J_f(x^{k}) p^{k}, J_f(x^{k}) p^{k})_2 \right]
+                   \intertext{$\alpha_{opt}$ eingesetzt ergibt}
+                   H'(\alpha_{opt}) &= 2 \left[ (f(x^{k}, J_f(x^{k})p^{k})_2 - (f(x^{k}), J_f(x^{k}) p^{k})_2 \right]  \\
+                   &= 0
+        \intertext{Weiter ist wegen $p^{k} \neq 0$}
+        H''(\alpha) &= (J_f(x^{k})p^{k}, J_f(x^{k})p^{k})_2 \\
+                    &> 0
+    .\end{align*}
+    Also hat $H$ bei $\alpha_{opt}$ ein Minimum.
+
+    Iterationen:
+    \begin{enumerate}[1.]
+        \item Relaxation:
+            \[
+                x^{k+1} = x^{k} + \alpha_{opt} f(x^{k})
+            .\] 
+        \item Gradientenverfahren: Es gilt
+            \[
+                \frac{\partial F}{\partial x_j} = \sum_{i=1}^{n} 2 f_i(x) \frac{\partial f_i}{\partial x_j}
+                = 2 \left( f(x), (J_f(x))_{j-\text{te Spalte}}  \right)_2
+                \implies \nabla F = 2 J_f(x^{k})^{T} f(x^{k})
+            .\] Damit folgt
+            \[
+                x^{k+1} = x^{k} - 2 \alpha_{opt} J_f(x^{k})^{T} f(x^{k})
+            .\]
+        \item Newton-Verfahren:
+            \[
+                x^{k+1} = x^{k} + \alpha_{opt} J_f^{-1}(x^{k}) f(x^{k})
+            .\] 
+    \end{enumerate}
+\end{aufgabe}
+
+\newpage
+\begin{aufgabe}
+    Siehe \textit{prog\_nonlinear\_solvers\_methods.cc} und \textit{prog\_nonlinear\_solvers\_fractal.cc}.
+
+    Nullstellen mit Newtonverfahren sie Programmcode.
+    Gewählte Parameter für Relaxationsverfahren:
+    Startpunkt $(2,1)^{T}$, $\sigma = 0.35$.
+    Damit konvergiert das Verfahren in $49$ Iterationsschritten mit einer Abweichung von
+    $\Vert f(x_i) \Vert_2 < 10^{-15}$.
+    \begin{figure}[h!]
+        \includegraphics[width=.5\textwidth]{raster_changed.pdf}
+        \includegraphics[width=.5\textwidth]{4-root-polynomial.pdf}
+        \caption{Links: Verändertes Raster, Rechts: Polynom $x^{4} - 3x^{3} + 5x + 3$}
+    \end{figure}
+\end{aufgabe}
+
+\end{document}

sose2020/num/uebungen/num9.tex

@@ -0,0 +1,211 @@
+\documentclass[uebung]{../../../lecture}
+
+\title{Einführung in die Numerik: Übungsblatt 9}
+\author{Leon Burgard, Christian Merten}
+
+\usepackage[]{subcaption}
+
+\begin{document}
+
+\punkte
+
+\begin{aufgabe}
+    \begin{enumerate}[a)]
+        \item Es ergibt sich durch Ausrechnen:
+            \begin{salign*}
+                a_0 &= y_0 = \frac{1}{2} \\
+                a_1 &= \frac{y_1 - a_0 N_0(t_1)}{N_1(t_1)} = \frac{1 - \frac{1}{2}}{1 - \frac{1}{4}} = \frac{2}{3} \\
+                a_2 &= \frac{y_2 - a_0 N_0(t_2) - a_1N_1(t_2)}{N_2(t_2)} = -\frac{4}{45}
+                \intertext{Damit folgt}
+                p_2(t) &= \frac{1}{2} + \frac{2}{3}\left( t - \frac{1}{4} \right) - \frac{4}{45} \left( t - \frac{1}{4} \right) (t- 1)
+            .\end{salign*}
+        \item Es folgt für $t_3 = 9$ $y_3 = 3$, also
+            \begin{salign*}
+                a_3 &= \frac{y_3 - a_0N_0(t_3) - a_1N_1(t_3) - a_2 N_2(t_3)}{N_3(t_3)}
+                = \frac{13}{1575}
+                \intertext{Damit folgt}
+                p_3(t) &= \frac{1}{2} + \frac{2}{3}\left( t - \frac{1}{4} \right) - \frac{4}{45} \left( t - \frac{1}{4} \right) (t- 1) + \frac{13}{1575} \left( t - \frac{1}{4} \right) (t-1)(t-4)
+            .\end{salign*}
+        \item Graph:\\
+            \begin{tikzpicture}
+                \begin{axis}[default 2d plot,
+                             xmin=0,xmax=10,
+                             legend pos=outer north east]
+                    \addplot[domain=0:10, smooth,green]{0.5 + 2/3*(x-1/4) - 4/45*(x-1/4)*(x-1)};
+                    \addlegendentry{$p_2(t)$}
+                    \addplot[domain=0:10, smooth, blue]{0.5 + 2/3*(x-1/4) - 4/45*(x-1/4)*(x-1)+13/1575*(x-1/4)*(x-1)*(x-4)};
+                    \addlegendentry{$p_3(t)$}
+                    \addplot[domain=0:10, smooth, red]{sqrt(x)};
+                    \addlegendentry{$\sqrt{t}$}
+                \end{axis}
+            \end{tikzpicture}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    \begin{enumerate}[a)]
+        \item Bezeichne:
+            \begin{align*}
+                &r_{i,0}(x) \coloneqq y_i \\
+                &r_{i,k}(x) \coloneqq \frac{(x-x_i) p_{i+1, k-1}(x) - (x- x_{i+k})p_{i,k-1}(x)}{x_{i+k}-x_i}
+            .\end{align*}
+            Z.z.: $p_{i,0}(x) = r_{i,0}(x)$ und $p_{i,k}(x) = r_{i,k}(x)$.
+
+            $r_{i,0}$ bzw. $r_{i,k}$ sind Polynome vom Grad $0$ bzw. $k$. D.h. es genügt zu zeigen,
+            dass sie die Interpolationseigenschaft erfüllen. Die Behauptung folgt dann aus der
+            Eindeutigkeit des Interpolationspolynoms.
+
+            Für $r_{i,0}(x)$ ist die Interpolationseigenschaft trivialerweise für die eine Stützstelle
+            $x_i$ erfüllt, denn $r_{i,0}(x_i) = y_i$.
+
+            Für $r_{i,k}$ gilt für $i \le j \le i+k$:
+            \begin{salign*}
+                r_{i,k}(x_{j}) &= \frac{(x_j-x_i) p_{i+1, k-1}(x_j) - (x_j- x_{i+k})p_{i,k-1}(x_j)}{x_{i+k}-x_i} \\
+                &\stackrel{(*)}{=} \frac{(x_j - x_i) y_j - (x_j - x_{i+k})y_j}{x_{i+k}-x_i} \\
+                &= y_j \frac{x_j - x_i - x_j + x_{i+k}}{x_{i+k}-x_i} \\
+                &= y_j \frac{x_{i+k} - x_i}{x_{i+k}-x_i} \\
+                &= y_j
+            .\end{salign*}
+            $(*)$: Falls $j = i$, dann ist $p_{i+1,k-1}(x_j)$ i.A. nicht $y_j$, aber dann ist
+            $(x_j - x_i) = (x_i - x_i) = 0$, also gilt dennoch $(x_j - x_i) p_{i+1,k-1}(x_j) = (x_j - x_i)y_j$.
+            Analog für $j = i+k$.
+        \item Durch Berechnung von $p_{0,3}(61.7)$ mit dem Schema aus (a) erhält man die Tageslänge
+            am Ort $E$ mit $19$h $29,55$m.
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    \begin{enumerate}[a)]
+        \item
+            \begin{itemize}
+                \item Für die Koeffizienten $a_i$ gilt $a_i = y_i$. Also keine Operationen nötig.
+                \item Auswertung von $L_i^{(n)}(\xi) = \prod_{j=0,j\neq i}^{n} \frac{(\xi-x_j)}{x_i - x_j} $:
+                    $n$ Faktoren mit $3$ Operationen plus $n-1$ Multiplikationen für das Produkt. Gesamt:
+                    $3n + n-1 = 4n-1$.
+
+                    Auswertung von $p(\xi)$: $n+1$ Summanden mit $4n-1$ Operationen plus Multiplikation
+                    mit $y_i$, ergibt $(n+1)\cdot (4n-1+1) = 4n^2$. Mit zusätzlich $n$ Additionen
+                    für die Auswertung der Summe ergibt sich insgesamt $4n^2 + n = \mathcal{O}(n^2)$.
+            \end{itemize}
+        \item 
+            \begin{itemize}
+                \item 
+            Berechnung der Koeffizienten erfordert die Lösung eines LGS mit unterer Dreicksmatrix.
+            Dies erfordert $\mathcal{O}(n^2)$ Operationen.
+        \item Auswertung von $N_i(\xi) = \prod_{j=0}^{i-1} (\xi - x_j) $ erfordert $1$ Addition pro Faktor und
+            insgesamt $i-1$ Multiplikationen für das Produkt, also insgesamt: $2i - 1$.
+
+            Auswertung von $p(\xi)$ erfordert entsprechend die Auswertung von $N_i(\xi)$ und die
+            Multiplikation mit dem Koeffizienten und Summation über alle $(n+1)$ Summanden. Ergibt also
+            insgesamt mit kleinem Gauß $(n+1)(n+2) = n^2 + 3n + 2 = \mathcal{O}(n^2)$.
+            \end{itemize}
+        \item 
+            \begin{itemize}
+                \item Berechnung der Koeffizienten erfordert die Lösung eines vollen LGS, also
+            $\mathcal{O}(n^{3})$ Operationen.
+        \item Auswertung eines Summanden: $a_i t ^{i}$ erfordert $i-1 + 1 = i$ Multiplikationen.
+
+            Auswertung von $p(x)$ erfordert das Summieren von $n+1$ Summanden, also $n$ zusätzliche Additionen.
+            Insgesamt folgt also wieder mit kleinem Gauß $\frac{(n+1)(n+2)}{2} + n = \frac{n^2 + 3n + 2}{2} + n = \frac{n^2 + 5n +4}{2} = \mathcal{O}(n^2)$.
+            \end{itemize}
+        \item Auswertung von $p_{i,k}$ im Neville Schema erfordert
+            \begin{align*}
+                N(k) &= 2 + N(k-1) + 1 + 1 + 1 + N(k-1) + 1 + 1 \\
+                     &= 7 + 2 N(k-1) \\
+                     &= 7 + 2 \cdot 7 + 4 \cdot N(k-2) = \ldots = \sum_{j=0}^{k-1} 7 \cdot 2^{j} \\
+                     &= 7 \frac{2^{k} - 1}{2 - 1} \\
+                     &= 7 (2^{k} - 1) \\
+                     &= \mathcal{O}(2^{k})
+            .\end{align*}
+    \end{enumerate}
+\end{aufgabe}
+
+\begin{aufgabe}
+    \begin{enumerate}[a)]
+        \item Auszug aus \textit{polynom.cc}
+    \begin{lstlisting}[language=C++, title=Auswertung des Interpolationspolynoms für vorgegebene Stüztstellen, captionpos=b]
+// Auswertung von p_{i,k}(t) mit Neville Schema bei t=x
+template<typename REAL>
+REAL evaluateNeville(REAL x, std::vector<REAL> &xs, std::vector<REAL> &ys, int i, int k) {
+    if(k == 0) {
+        return ys[i];
+    } else {
+        // nevile rekursionsformel
+        return ((x - xs[i])*evaluateNeville(x, xs, ys,i+1,k-1) - (x - xs[i+k])*evaluateNeville(x, xs, ys, i, k-1))/(xs[i+k]-xs[i]);
+    }
+}
+
+// Auswertung eines Interpolationspolynoms p(t) bei t=x
+template<typename REAL>
+REAL evaluate(REAL x, std::vector<REAL> &xs, std::vector<REAL> &ys) {
+    // nutze neville verfahren mit p(x) = p_{0,n}(x)
+    evaluateNeville(x, xs, ys, 0, xs.size()-1);
+}\end{lstlisting}
+\item Auszug aus \textit{polynom.cc}
+\begin{lstlisting}[language=C++, title=Auswertung von I-Polynomen für äquidistante Stützstellen, captionpos=b]
+// Auswertung eines Interpolationspolynoms einer Funktion bei vorgegebenen Stuetzstellen
+template <typename REAL>
+REAL evaluateFunction(REAL x, std::vector<REAL> &xs, REAL(*f)(REAL)) {
+    std::vector<double> ys(xs.size());
+    for (int i = 0; i < xs.size(); i++) {
+        // berechne stuetzstellen
+        ys[i] = f(xs[i]);
+    }
+    // verwende polynominterpolation
+    return evaluate(x, xs, ys);
+}
+
+// Auswertung eines Interpolationspolynoms einer Funktion bei aequidistanten Stuetzstellen
+template <typename REAL>
+REAL evaluateFunctionEqualDist(REAL x, REAL a, REAL b, REAL h, REAL(*f)(REAL)) {
+    std::vector<double> xs(std::floor((b-a)/h));
+    std::vector<double> ys(xs.size());
+    for (int i = 0; i < xs.size(); i++) {
+        // berechne stuetzstellen
+        xs[i] = a + i*h;
+        // und funktionswerte
+        ys[i] = f(xs[i]);
+    }
+    // werte polynom aus
+    return evaluate(x, xs, ys);
+}\end{lstlisting}
+\begin{figure}[h]
+    \begin{subfigure}[b]{.5\linewidth}
+    \begin{tikzpicture}
+        \begin{axis}[default 2d plot, xmin=-1, xmax=1]
+            \addplot[green] table {f1_5.dat};
+            \addlegendentry{$n=5$}
+            \addplot[orange] table {f1_10.dat};
+            \addlegendentry{$n=10$}
+            \addplot[blue] table {f1_20.dat};
+            \addlegendentry{$n=20$}
+            \addplot[red, samples=100] {1/(1+x^2)};
+            \addlegendentry{$\frac{1}{1+x^2}$}
+        \end{axis}
+    \end{tikzpicture}
+    \caption{$f_1 = \frac{1}{1+x^2}$}
+    \end{subfigure}
+    \begin{subfigure}[b]{.5\linewidth}
+    \begin{tikzpicture}
+        \begin{axis}[default 2d plot, xmin=-0.5, xmax=0.5, legend pos=outer north east,
+                restrict y to domain=-1:5]
+            \addplot[green] table {f2_5.dat};
+            \addlegendentry{$n=5$}
+            \addplot[orange] table {f2_10.dat};
+            \addlegendentry{$n=10$}
+            \addplot[blue] table {f2_20.dat};
+            \addlegendentry{$n=20$}
+            \addplot[red, samples=5000] {sqrt(abs(x))};
+            \addlegendentry{$\sqrt{|x|} $}
+        \end{axis}
+    \end{tikzpicture}
+    \caption{$f_2 = \sqrt{|x|} $}
+    \end{subfigure}
+\end{figure}
+\item Für $\frac{1}{1+x^2}$ funktioniert die Interpolation mit äquidistanten Stützstellen sehr gut.
+    Für $\sqrt{|x|} $ entstehen durch die nicht differenzierbare Stelle bei $x=0$ sehr große Abweichungen,
+    die zu den Rändern mit wachsendem Polynomgrad sogar zunehmen.
+    \end{enumerate}
+\end{aufgabe}
+
+\end{document}

sose2020/num/uebungen/polynom.cc

@@ -0,0 +1,75 @@
+#include <iostream>
+#include <vector>
+#include <math.h>
+
+// Auswertung von p_{i,k}(t) mit Neville Schema bei t=x
+template<typename REAL>
+REAL evaluateNeville(REAL x, std::vector<REAL> &xs, std::vector<REAL> &ys, int i, int k) {
+    if(k == 0) {
+        return ys[i];
+    } else {
+        // nevile rekursionsformel
+        return ((x - xs[i])*evaluateNeville(x, xs, ys,i+1,k-1) - (x - xs[i+k])*evaluateNeville(x, xs, ys, i, k-1))/(xs[i+k]-xs[i]);
+    }
+}
+
+// Auswertung eines Interpolationspolynoms p(t) bei t=x
+template<typename REAL>
+REAL evaluate(REAL x, std::vector<REAL> &xs, std::vector<REAL> &ys) {
+    // nutze neville verfahren mit p(x) = p_{0,n}(x)
+    evaluateNeville(x, xs, ys, 0, xs.size()-1);
+}
+
+// Auswertung eines Interpolationspolynoms einer Funktion bei vorgegebenen Stuetzstellen
+template <typename REAL>
+REAL evaluateFunction(REAL x, std::vector<REAL> &xs, REAL(*f)(REAL)) {
+    std::vector<double> ys(xs.size());
+    for (int i = 0; i < xs.size(); i++) {
+        // berechne stuetzstellen
+        ys[i] = f(xs[i]);
+    }
+    // verwende polynominterpolation
+    return evaluate(x, xs, ys);
+}
+
+// Auswertung eines Interpolationspolynoms einer Funktion bei äquidistanten Stützstellen
+template <typename REAL>
+REAL evaluateFunctionEqualDist(REAL x, REAL a, REAL b, REAL h, REAL(*f)(REAL)) {
+    std::vector<double> xs(std::floor((b-a)/h));
+    std::vector<double> ys(xs.size());
+    for (int i = 0; i < xs.size(); i++) {
+        // berechne stuetzstellen
+        xs[i] = a + i*h;
+        // und funktionswerte
+        ys[i] = f(xs[i]);
+    }
+    // werte polynom aus
+    return evaluate(x, xs, ys);
+}
+
+// beispiel funktionen
+template <typename REAL>
+REAL f1(REAL x) {
+    return 1/(1+std::pow(x,2));
+}
+
+template <typename REAL>
+REAL f2(REAL x) {
+    return std::sqrt(std::abs(x));
+}
+
+int main() {
+    // polynom grad
+    int n = 5;
+    // abstand zwischen stützstellen
+    double h = 2.0 / n;
+
+    // schrittweite
+    double dx = 2.0 / 1000;
+    double x = 0;
+    for(int i = 0; i < 1000; i++) {
+        x = -1.0 + i*dx;
+        // werte polynom mit äquidistanten stuetzstellen zwischen -1 und 1 mit abstand h bei t=x aus
+        std::cout << x << " " << evaluateFunctionEqualDist(x, -1.0, 1.0, h, f2) << std::endl;
+    }
+}

sose2020/num/uebungen/prog_nonlinear_solvers_fractal.cc

@@ -0,0 +1,91 @@
+#include <iostream>
+#include <vector>
+#include "hdnum.hh"
+
+
+template<class N>
+class PolynomialProblem
+{
+public:
+  // Exportiere Größentyp
+  typedef std::size_t size_type;
+
+  // Exportiere Zahlentyp
+  typedef N number_type;
+
+  // Dimension der untenstehenden Funktion
+  std::size_t size () const
+  {
+    return 1;
+  }
+
+  // Funktionsauswertung
+  void F (const hdnum::Vector<N>& x, hdnum::Vector<N>& result) const
+  {
+    result[0] = pow(x[0], 4) - 3.0*pow(x[0], 3) + 5.0*x[0] + 3.0;
+  }
+
+  // Jacobimatrix
+  void F_x (const hdnum::Vector<N>& x, hdnum::DenseMatrix<N>& result) const
+  {
+    result[0][0] = 4.0*pow(x[0], 3) - 9.0*pow(x[0], 2) + 5.0;
+  }
+};
+
+
+int main ()
+{
+  typedef std::complex<double> Number; // Der Zahlentyp soll hier komplex sein
+
+  typedef PolynomialProblem<Number> Problem;
+  Problem problem;
+
+
+  // Wir schauen Startpunkte auf einem Raster an, das später in ein Bild umgesetzt werden soll
+  for (double start_value_i = -5.0; start_value_i <= 5.0; start_value_i += 1e-2) {
+
+    for (double start_value = -5.0; start_value <= 5.0; start_value += 1e-2) {
+
+      hdnum::Vector<Number> u(problem.size()); // Vektor für Startpunkt bzw Lösung
+      u[0] = Number(start_value, start_value_i); // Startpunkt
+
+      hdnum::Newton newton;
+      newton.set_maxit(20);
+      newton.set_verbosity(0);
+      newton.set_reduction(1e-10);
+      newton.set_abslimit(1e-20);
+      newton.set_linesearchsteps(3);
+
+      newton.solve(problem,u); // Lösen
+
+      double id = 0;
+      if(newton.has_converged()) {
+
+        // Falls unser Newton-Löser konvergiert ist, stellen wir fest welche Nullstelle
+        // Nullstelle wir getroffen haben und legen einen Index für jede Nullstelle fest.
+
+        if (u[0].real() < 0 && u[0].imag() < 0)
+          id = 1;
+        else if (u[0].real() < 0 && u[0].imag() > 0)
+          id = 2;
+        else if (u[0].real() > 0 && u[0].imag() < 0)
+          id = 3;
+        else if (u[0].real() > 0 && u[0].imag() > 0)
+          id = 4;
+        else
+          std::cout << "Unbekannte Nullstelle!" << std::endl;
+
+        // Damit auch der "Abstand" zur Nullstelle (im Sinne von benötigten Iterationen
+        // um sie zu erreichen) sichtbar wird, addieren wir noch die Iterationszahl
+        // um einen Faktor abgeschwächt
+        id += .1 * (double)newton.iterations();
+      }
+
+      std::cout << id << ",";
+    }
+
+    std::cout << std::endl;
+  }
+
+  return 0;
+}

sose2020/num/uebungen/prog_nonlinear_solvers_fractal.py

@@ -0,0 +1,7 @@
+import numpy as np
+import matplotlib.pyplot as plt
+
+data = np.genfromtxt('out', delimiter=",")
+
+plt.imshow(data, interpolation='nearest', cmap='viridis')
+plt.savefig('out.pdf')

sose2020/num/uebungen/prog_nonlinear_solvers_fractal2.cc

@@ -0,0 +1,89 @@
+#include <iostream>
+#include <vector>
+#include "hdnum.hh"
+
+
+template<class N>
+class PolynomialProblem
+{
+public:
+  // Exportiere Größentyp
+  typedef std::size_t size_type;
+
+  // Exportiere Zahlentyp
+  typedef N number_type;
+
+  // Dimension der untenstehenden Funktion
+  std::size_t size () const
+  {
+    return 1;
+  }
+
+  // Funktionsauswertung
+  void F (const hdnum::Vector<N>& x, hdnum::Vector<N>& result) const
+  {
+    result[0] = x[0]*x[0]*x[0] - 2.0*x[0] + 2.0;
+  }
+
+  // Jacobimatrix
+  void F_x (const hdnum::Vector<N>& x, hdnum::DenseMatrix<N>& result) const
+  {
+    result[0][0] = 3.0*x[0]*x[0] - 2.0;
+  }
+};
+
+
+int main ()
+{
+  typedef std::complex<double> Number; // Der Zahlentyp soll hier komplex sein
+
+  typedef PolynomialProblem<Number> Problem;
+  Problem problem;
+
+
+  // Wir schauen Startpunkte auf einem Raster an, das später in ein Bild umgesetzt werden soll
+  for (double start_value_i = -5.0; start_value_i <= 5.0; start_value_i += 1e-3) {
+
+    for (double start_value = -5.0; start_value <= 5.0; start_value += 1e-3) {
+
+      hdnum::Vector<Number> u(problem.size()); // Vektor für Startpunkt bzw Lösung
+      u[0] = Number(start_value, start_value_i); // Startpunkt
+
+      hdnum::Newton newton;
+      newton.set_maxit(20);
+      newton.set_verbosity(0);
+      newton.set_reduction(1e-10);
+      newton.set_abslimit(1e-20);
+      newton.set_linesearchsteps(3);
+
+      newton.solve(problem,u); // Lösen
+
+      double id = 0;
+      if(newton.has_converged()) {
+
+        // Falls unser Newton-Löser konvertiert ist, stellen wir fest welche Nullstelle
+        // Nullstelle wir getroffen haben und legen einen Index für jede Nullstelle fest.
+
+        if (u[0].real() < 0)
+          id = 1;
+        else if (u[0].imag() < 0)
+          id = 2;
+        else if (u[0].imag() > 0)
+          id = 3;
+        else
+          std::cout << "Unbekannte Nullstelle!" << std::endl;
+
+        // Damit auch der "Abstand" zur Nullstelle (im Sinne von benötigten Iterationen
+        // um sie zu erreichen) sichtbar wird, addieren wir noch die Iterationszahl
+        // um einen Faktor abgeschwächt
+        id += .1 * (double)newton.iterations();
+      }
+
+      std::cout << id << ",";
+    }
+
+    std::cout << std::endl;
+  }
+
+  return 0;
+}

sose2020/num/uebungen/prog_nonlinear_solvers_methods.cc

@@ -0,0 +1,100 @@
+#include <iostream>
+#include <vector>
+#include "hdnum.hh"
+
+template<class N>
+class EllipseProblem
+{
+public:
+  // Exportiere Größentyp
+  typedef std::size_t size_type;
+
+  // Exportiere Zahlentyp
+  typedef N number_type;
+
+  // Dimension der untenstehenden Funktion
+  std::size_t size () const
+  {
+    return 2;
+  }
+
+  // Funktionsauswertung
+  void F (const hdnum::Vector<N>& x, hdnum::Vector<N>& result) const
+  {
+    result[0] = x[0] * x[1] + 2*x[0] - x[1] - 2;
+    result[1] = x[0] * x[1] - x[0] + x[1] -3;
+  }
+
+  // Jacobimatrix
+  void F_x (const hdnum::Vector<N>& x, hdnum::DenseMatrix<N>& result) const
+  {
+    result[0][0] = x[1] + 2;
+    result[0][1] = x[0] - 1;
+    result[1][0] = x[1] - 1;
+    result[1][1] = x[0] + 1;
+  }
+};
+
+int main ()
+{
+  typedef double Number; // Zahlentyp
+
+
+  typedef EllipseProblem<Number> Problem;
+  Problem problem;
+
+
+  hdnum::Vector<Number> u(problem.size()); // Vektor für Startpunkt bzw Lösung
+  hdnum::Vector<Number> result(problem.size()); // Vektor für Funktionswerte
+
+  // Newton
+  hdnum::Newton newton;
+  newton.set_maxit(20);
+  newton.set_verbosity(10);
+  newton.set_reduction(1e-10);
+  newton.set_abslimit(1e-20);
+  newton.set_linesearchsteps(2);
+
+  // 1. Quadrant
+  u[0] = 0.0; u[1] = 1.0;
+  newton.solve(problem,u);
+  std::cout << "Nullstelle im 1. Quadrant: " <<  std::setprecision(15) << u << std::endl;
+  problem.F(u, result);
+  std::cout << "Funktionswert: " <<  std::setprecision(15) << result << std::endl;
+
+  // 2. Quadrant
+  u[0] = -2.0; u[1] = 1.0;
+  newton.solve(problem,u);
+  std::cout << "Nullstelle im 2. Quadrant: " <<  std::setprecision(15) << u << std::endl;
+  problem.F(u, result);
+  std::cout << "Funktionswert: " <<  std::setprecision(15) << result << std::endl;
+
+  // 3. Quadrant
+  u[0] = -2.0; u[1] = -1.0;
+  newton.solve(problem,u);
+  std::cout << "Nullstelle im 3. Quadrant: " <<  std::setprecision(15) << u << std::endl;
+  problem.F(u, result);
+  std::cout << "Funktionswert: " <<  std::setprecision(15) << result << std::endl;
+
+  // 4. Quadrant
+  u[0] = 2.0; u[1] = -1.0;
+  newton.solve(problem,u);
+  std::cout << "Nullstelle im 4. Quadrant: " <<  std::setprecision(15) << u << std::endl;
+  problem.F(u, result);
+  std::cout << "Funktionswert: " <<  std::setprecision(15) << result << std::endl;
+
+  // Relaxation
+  hdnum::Banach banach;
+  banach.set_maxit(5000);                  // set parameters
+  banach.set_verbosity(2);
+  banach.set_reduction(1e-15);
+  banach.set_abslimit(1e-20);
+  banach.set_sigma(0.375);
+
+  u[0] = 2.0; u[1] = 1.0; // Startwert
+  banach.solve(problem,u);
+
+   std::cout << "Ergebnis: " <<  std::setprecision(15) << u << std::endl;
+
+  return 0;
+}

sose2020/num/uebungen/splines.cc

@@ -0,0 +1,161 @@
+#include <vector>
+#include "hdnum.hh"    // hdnum header
+
+template<typename REAL>
+void solveTriDiag(hdnum::DenseMatrix<REAL> &A, std::vector<REAL> &x, std::vector<REAL> &b) {
+    int N = b.size();
+    x[0] = A[0][0];
+    // LU Zerlegung
+    REAL l;
+    for (int j=1; j<N; j++) {
+        // berechne l faktor
+        l = A[j][j-1] / x[j-1];
+        // modifiziere diagonalelemente und rechte seite
+        x[j] = A[j][j] - l * A[j-1][j];
+        b[j] = b[j] - l * b[j-1];
+    }
+    // Loesen durch Rueckwaertseinsetzen
+    x[N-1] = b[N-1] / x[N-1];
+    for (int j=N-2; j>=0; j--) {
+        x[j] = (b[j] - A[j][j+1]*x[j+1])/x[j];
+    }
+}
+
+template<typename REAL>
+class CubicSpline {
+    public:
+        // erstelle einen kubischen spline mit vorgegebenen stuetzstellen
+        // und werten
+        CubicSpline(std::vector<REAL> xs, std::vector<REAL> ys) {
+            calculateCoefficients(xs, ys);
+        }
+
+        // erstelle einen kubischen spline mit vorgegebenen stuetzstellen
+        // und einer zu interpolierenden funktion
+        CubicSpline(std::vector<REAL> xs, REAL(*f)(REAL)) {
+            int N = xs.size();
+            std::vector<double> ys(N);
+            for (int i=0; i<N; i++) {
+                ys[i] = f(xs[i]);
+            }
+            calculateCoefficients(xs, ys);
+        }
+
+        // erstelle einen kubischen spline an aequidistanten stuetzstellen
+        // und einer zu interpolierenden funktion
+        CubicSpline(REAL a, REAL b, int N, REAL(*f)(REAL)) {
+            std::vector<double> xs(N+1);
+            std::vector<double> ys(N+1);
+            for (int i=0; i<=N; i++) {
+                xs[i] = a + (1.0*i)/N*(b-a);
+                ys[i] = f(xs[i]);
+            }
+            calculateCoefficients(xs, ys);
+        }
+
+        // werte kubischen spline an vorgegebener stelle aus
+        REAL evaluate(REAL x) {
+            for (int i=1; i<x_s.size(); i++) {
+                if (x > x_s[i] && i < x_s.size() - 1) {
+                    continue;
+                } else {
+                    return a_0[i-1] + a_1[i-1] *(x - x_s[i]) + a_2[i-1]*std::pow(x - x_s[i], 2) + a_3[i-1]*std::pow(x-x_s[i], 3);
+                }
+            }
+            return 0;
+        }
+
+        // gebe alle interpolations polynome aus
+        void print() {
+            for(int i=0; i<x_s.size()-1; i++) {
+                printf("p_%d(x) = %4.2f + %4.2f(x - %4.2f) + %4.2f(x - %4.2f)^2 + %4.2f(x - %4.2f)^3\n",
+                       i, a_0[i], a_1[i], x_s[i], a_2[i], x_s[i], a_3[i], x_s[i]);
+            }
+        }
+
+    private:
+        // stuetzstellen
+        std::vector<REAL> x_s;
+        // koeffizienten
+        std::vector<REAL> a_0;
+        std::vector<REAL> a_1;
+        std::vector<REAL> a_2;
+        std::vector<REAL> a_3;
+
+        void calculateCoefficients(std::vector<REAL> xs, std::vector<REAL> ys) {
+            // stuetzstellen from x_0 ... to x_n
+            int n = xs.size()-1;
+            // copy stuetzstellen
+            x_s = std::vector<double>(n+1);
+            x_s = xs;
+            // setup (n-1)x(n-1) matrix for a_2
+            hdnum::DenseMatrix<REAL> A(n-1,n-1);
+            std::vector<REAL> b(n-1);
+            std::vector<REAL> x(n-1);
+            REAL h; // h_i
+            REAL h1; // h_{i+1}
+            // setup LGS for a_2
+            // A has tridiagonal structure
+            for (int i = 1; i<n; i++) {
+                h = xs[i] - xs[i-1];
+                h1 = xs[i+1] - xs[i];
+                b[i-1] = 3 * ((ys[i+1] - ys[i])/h1 - (ys[i] - ys[i-1])/h);
+                if (i > 1) {
+                    A[i-1][i-2] = h;
+                } if (i < n-1) {
+                    A[i-1][i] = h1;
+                }
+                A[i-1][i-1] = 2 * (h + h1);
+            }
+            // initialize vectors
+            a_0 = std::vector<double>(n);
+            a_1 = std::vector<double>(n);
+            a_2 = std::vector<double>(n);
+            a_3 = std::vector<double>(n);
+            solveTriDiag(A,a_2,b);
+            // natuerliche randbedingung
+            a_2[n-1] = 0;
+            // berechne restliche koeffizienten
+            for (int i = 1; i<=n; i++) {
+                h = xs[i] - xs[i-1]; // h_i
+                h1 = xs[i+1] - xs[i]; // h_{i+1}
+                a_0[i-1] = ys[i];
+                if (i == 1) { // a_2[-1] = 0
+                    a_1[i-1] = (ys[i] - ys[i-1])/h + (h/3)*(2*a_2[i-1]);
+                    a_3[i-1] = (a_2[i-1])/(3*h);
+                } else {
+                    a_1[i-1] = (ys[i] - ys[i-1])/h + h/3*(2*a_2[i-1] + a_2[i-2]);
+                    a_3[i-1] = (a_2[i-1] - a_2[i-2])/(3 * h);
+                }
+            }
+        }
+};
+
+double f1(double x) {
+    return std::pow(x,3);
+}
+
+int main() {
+    // std::vector<double> xs = {0, 1, 2};
+    // CubicSpline<double> phi(xs, f1);
+    // phi.print();
+
+    // saurier fundstellen
+    std::vector<double> xs = {3.75, 3.75, 2.25, 1.25, 0.25, 0.75, 4.00, 5.50, 6.25, 9.00, 12.5, 12.75, 12.25};
+    std::vector<double> ys = {0.25, 1.50, 3.25, 4.25, 4.65, 4.83, 2.50, 3.25, 3.65, 3.00, 1.25, 2.150, 3.500};
+
+    std::vector<double> ts(13);
+    ts[0] = 0;
+    for (int i = 1; i<=12; i++) {
+        ts[i] = ts[i-1] + std::sqrt(std::pow(xs[i] - xs[i-1], 2) + std::pow(ys[i] - ys[i-1], 2));
+    }
+
+    CubicSpline<double> phi(ts, xs);
+    CubicSpline<double> psi(ts, ys);
+
+    double xi;
+    for (int j = 0; j<=100; j++) {
+        xi = j*ts[12] / 100;
+        std::cout << phi.evaluate(xi) << " " << psi.evaluate(xi) << std::endl;
+    }
+}

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)