Данные исследования сна

Исследователи привлекли 18 участников к исследованию депривации сна. Наблюдаемые данные sleep_study уже загружены в рабочую среду. Они содержат время реакции day_0 и время реакции day_3 после трёх ночей без сна для каждого испытуемого (subject).

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

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

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