Дані дослідження сну

Дослідники залучили 18 учасників до дослідження позбавлення сну. Спостережувані дані sleep_study завантажено в робочий простір. Вони містять час реакції day_0 та час реакції day_3 після 3 ночей із дефіцитом сну для кожного subject.

Ви визначите та дослідите diff_3 — спостережувану різницю в часі реакції для кожного учасника. Для цього знадобляться функції mutate() і summarize(). Наприклад, ось так можна додати змінну day_0_s — час реакції day_0 у секундах — до sleep_study:

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

Потім можна застосувати summarize() до значень day_0_s, наприклад, щоб отримати мінімум і максимум:

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

Ця вправа є частиною курсу

Баєсівське моделювання з RJAGS

Переглянути курс

Інструкції до вправи

Перегляньте перші 6 рядків sleep_study.
Додайте в sleep_study нову змінну diff_3 — різницю між часами реакції day_3 та day_0.
Використайте ggplot() із шаром geom_histogram() для побудови гістограми даних diff_3.
За допомогою summarize() обчисліть середнє значення та стандартне відхилення спостережень diff_3.

Інтерактивна практична вправа

Спробуйте виконати цю вправу, доповнивши цей зразок коду.

# 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(___, ___)

Редагувати та запускати код