DES_12.qmd

---
title: "Datenerhebung und Statistik"
subtitle: "Zwölfter Termin"
format: 
  revealjs:
    theme: fom.scss
    logo: fom.jpg
    footer: "DES | Karsten Lübke"
    chalkboard: true
---

## Zur Erinnerung

📛 Stellen Sie bitte ein Namensschild auf.

🤷 Stellen Sie Fragen.

💪 [https://tweedback.de/zp69](https://tweedback.de/zp69)

<br> Hinweise zu den **Prüfungsleistungen** finden Sie in der **Projektgruppe** zur Vorlesung. Vergessen Sie nicht sich anzumelden!

Die **Studienbriefe** strukturieren Ihre Vor- und Nacharbeit.



## Wie geht es Ihnen heute auf der Jammerlappen-Skala?

![](img/Jammerlappen.jpg){fig-align="center" width="50%"}


::: aside
Quelle: [@dnlmnhrdt](https://twitter.com/dnlmnhrdt/status/1328774026014183426)
:::



## UN Ziel 12: Responsible consumption and production

::: center

<iframe src="https://upgrader.gapminder.org/q/58/embed?hasBorder=true&hasOpenSansFont=false" title="70% of people get this question wrong" width="100%" height="500" style="border:none;"></iframe>

:::


## Heutiges Thema &#127979;

- Schwerpunkt heute: Inferenzstatistik

Einstieg: [https://fomshinyapps.shinyapps.io/Sampling/](https://fomshinyapps.shinyapps.io/Sampling/)

## Was Sie lernen &#x1F469;&#x200D;&#x1F3EB; 

- Dass wir über die Daten hinaus gehen wollen und können -- dabei aber unsicher sind. Was ein Punktschätzer ist. Was ein Standardfehler angibt und was Konfidenzintervalle (nicht) sind.

::: {.center}
<iframe src="https://giphy.com/embed/MRsWGk355jTJXeQfvf" width="320" height="180" frameBorder="0" class="giphy-embed" allowFullScreen></iframe>
:::

::: {.aside}
[via GIPHY](https://giphy.com/gifs/abcnetwork-MRsWGk355jTJXeQfvf)
:::

## Wiedereinstieg Inferenz

- Der uns interessierende Wert in der **(Ziel-)Population** wird [(wahrer) Wert des Parameter]{.blue} genannt: $\color{blue}{\beta, \mu, \pi, \ldots}$

- Der auf Basis einer **Stichprobe** berechnete Wert wird [Schätzwert]{.green} genannt. $\color{green}{\hat{\beta}, \hat{\mu}=\bar{y}, \hat{\pi}=p,\ldots}$


$$\color{green}{Schätzwert} = \color{blue}{Wert\,Parameter} + Verzerrung + Rauschen$$

::: {.aside}
[Bueno de Mesquita und Fowler (2021)](https://press.princeton.edu/books/paperback/9780691214351/thinking-clearly-with-data): Estimate = Estimand + Bias + Noise
:::

## Punktschätzung -- Unverzerrt

::: {.columns}

:::: {.column width="50%"}
![](img/Meme_Unsicherheit.jpg){fig-align="center" width="75%"}
::::

:::: {.column width="50%"}
![](img/Estimate.gif){fig-align="center" width="100%"}
::::
:::

## Punktschätzung -- Verzerrt

::: {.columns}

:::: {.column width="50%"}
<br>
![](img/Meme_Bias.jpg){fig-align="center" width="95%"}
::::

:::: {.column width="50%"}
![](img/Estimate-Biased.gif){fig-align="center" width="100%"}
::::
:::

## Bootstrapping

![](img/Schema_Bootstrap.png){fig-align="center" width="85%"}

::: {.aside}
Quelle: Allen Downey: [tinyurl.com/inference3](https://tinyurl.com/inference3)
:::

## Konfidenzintervall

::: {.columns}

:::: {.column width="50%"}
![](img/Meme_Konfidenzintervall.jpg){fig-align="center" width="75%"}
::::

:::: {.column width="50%"}
![](img/Confidence.gif){fig-align="center" width="100%"}
::::
:::


## Fallstudie &#x1F4BB;

- Lokal: RStudio durch klick auf `DES_WiSe22.Rproj` starten oder RStudio aufrufen, das letzte Projekt müsste automatisch geladen werden.

- RStudio Cloud: In **Ihr** Projekt einloggen.  

- Öffnen Sie die Fallstudie `Entfernung.Rmd`.

## &#127908; Konfidenzintervall

::: {.center}
<iframe src="https://www.causeweb.org/cause/resources/fun/songs/call-it-maybe" title="" width="100%" height="500" style="border:none;"></iframe>
:::

::: {.aside}
Quelle: [https://www.causeweb.org/cause/resources/fun/songs/call-it-maybe](https://www.causeweb.org/cause/resources/fun/songs/call-it-maybe)
:::