Как вы генерируете 50 наблюдений за 10 chi ^ 2 (это \ chi square ") распределенными переменными с 50 степенями свободы?

Question

Я пытаюсь произвести 50 наблюдений за 10 chi ^ 2 распределенными переменными с 50 степенями свободы.Затем я должен создать новую переменную, которая является средним значением каждой из этих 10 распределенных переменных, и создать гистограмму этой переменной (это будет выборка из 10 наблюдений).Есть идеи?

Answer 1

rchisq(10, 50) сгенерирует 10 случайных чисел с 50 степенями свободы от распределения хи-квадрат.Мы можем сделать 50 повторений этого, а затем взять среднее значение каждого.Или мы можем просто создать 50 * 10 наблюдений и разбить их на наборы по 10. После этого просто запустите hist для гистограммы.

obs <- matrix(rchisq(50 * 10, 50), nrow = 10)
hist(colMeans(obs))