library(tidyverse)
penguins-regr02b
Aufgabe
Beantworten Sie folgende Forschungsfrage:
Gibt es einen substanziellen Zusammenhang von Flossenlänge (Flipper, mm, UV) und Gewicht (g, AV) bei Pinguinen?
“Substanziell” bedeutet dabei das Gegenteil von “vernachlässigbar gering”.
Nutzen Sie die folgende Analyse für Ihre Antwort.
Wir rufen Stan:
🧑🏫 Hey, Stan, komm mal rüber! Wir haben da eine Frage an dich.
🤖 Beep, beep, beep! Bitte nur gute Fragen.
Setup:
library(rstanarm)
library(easystats)
library(tidyverse)
library(palmerpenguins)
data(penguins)
Modell:
<- stan_glm(body_mass_g ~ flipper_length_mm,
m_flipper seed = 42,
refresh = 0,
data = penguins)
Parameter:
parameters(m_flipper)
Parameter | Median | CI | CI_low | CI_high | pd | Rhat | ESS | Prior_Distribution | Prior_Location | Prior_Scale |
---|---|---|---|---|---|---|---|---|---|---|
(Intercept) | -5771.7885 | 0.95 | -6375.28649 | -5173.68397 | 1 | 1.000452 | 3709.888 | normal | 4201.754 | 2004.8863 |
flipper_length_mm | 49.6391 | 0.95 | 46.65749 | 52.68221 | 1 | 1.000448 | 3760.327 | normal | 0.000 | 142.5777 |
Rope:
rope(m_flipper)
Parameter | CI | ROPE_low | ROPE_high | ROPE_Percentage | Effects | Component |
---|---|---|---|---|---|---|
(Intercept) | 0.95 | -80.19545 | 80.19545 | 0 | fixed | conditional |
flipper_length_mm | 0.95 | -80.19545 | 80.19545 | 1 | fixed | conditional |
Hier wird ein Bereich von ±80 Gramm als “vernachlässigbar” (nicht substanziell) angesehen. Diese Voreinstellung sollte nur als grobe Orientierung dienen und sollte an die spezifische Forschungsfrage angepasst werden. Ihr Fachwissen sollte besser sein als dieser Default-Wert.
Visualisierung:
plot(rope(m_flipper))
Lösung
Hier ist also keine klare Aussage zur Frage, ob der Effekt vernachlässigbar klein ist oder größer, möglich.
Categories:
- lm
- bayes
- rope
- string