Перевірка гіпотез у R
Richie Cotton
Data Evangelist at DataCamp


$H_{0}$: Середня компенсація (USD) однакова для тих, хто вперше кодував у дитинстві, і тих, хто вперше кодував у дорослому віці.
$H_{A}$: Середня компенсація (USD) вища для тих, хто вперше кодував у дитинстві, порівняно з тими, хто вперше кодував у дорослому віці.
Використайте правосторонній тест.
$\alpha = 0.1$
Якщо $p \le \alpha$, відхиляємо $H_{0}$.
p_value <- pnorm(z_score, lower.tail = FALSE)
numerator <- xbar_child - xbar_adult
denominator <- sqrt(s_child ^ 2 / n_child + s_adult ^ 2 / n_adult)
t_stat <- numerator / denominator
2.4046
degrees_of_freedom <- n_child + n_adult - 2
2578
p_value <- pt(t_stat, df = degrees_of_freedom, lower.tail = FALSE)
0.008130
Перевірка гіпотез у R