Dane z badania snu

W badaniu dotyczącym deprywacji snu wzięło udział 18 uczestników. Zebrane dane sleep_study są już wczytane do środowiska. Zawierają one czasy reakcji zmierzone w dniu zerowym (day_0) oraz po trzech nocach bez snu (day_3) dla każdego uczestnika (subject).

Zdefiniujesz i przeanalizujesz zmienną diff_3, czyli obserwowaną różnicę czasów reakcji dla każdego uczestnika. Będziesz do tego potrzebować funkcji mutate() i summarize(). Poniższy przykład pokazuje, jak dodać do sleep_study zmienną day_0_s – czasy reakcji z day_0 wyrażone w sekundach:

sleep_study <- sleep_study %>% 
    mutate(day_0_s = day_0 * 0.001)

Następnie możesz użyć summarize() na wartościach day_0_s, np. by uzyskać ich minimum i maksimum:

sleep_study  %>% 
    summarize(min(day_0_s), max(day_0_s))

To ćwiczenie jest częścią kursu

Modelowanie bayesowskie z RJAGS

Zobacz kurs

Instrukcje do ćwiczenia

Wyświetl pierwsze 6 wierszy zbioru sleep_study.
Zdefiniuj nową zmienną diff_3 w sleep_study jako różnicę czasów reakcji day_3 minus day_0.
Użyj ggplot() z warstwą geom_histogram(), aby stworzyć histogram danych diff_3.
Użyj summarize(), aby obliczyć średnią i odchylenie standardowe obserwacji diff_3.

Interaktywne ćwiczenie praktyczne

Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.

# Check out the first 6 rows of sleep_study


# Define diff_3
sleep_study <- sleep_study %>% 
    mutate(diff_3 = ___)
 
# Histogram of diff_3    
ggplot(___, aes(x = ___)) + 
    geom_histogram(binwidth = 20, color = "white")

# Mean and standard deviation of diff_3
sleep_study %>% 
    summarize(___, ___)

Edytuj i uruchom kod