До сих пор я сделал следующее:
Total = 3^(70) + 2^(100) + 3^(30)
fi_prop = 3^(70)/Total
sec_prop = 2^(100)/Total
thir_prop = 3^(30)/Total
PROP = round(c(fi_prop, sec_prop, thir_prop), digits = 10)
print(PROP)
##Drawing random samples
Beta_draw_pos = rbeta(10000, s1-1, n1-s1-1)
thetaX = c(0.25, 0.5, 0.75)
px = c(fi_prop, sec_prop, thir_prop )
Discrete_draw_pos = sample(thetaX, size = 10000, replace = TRUE, prob = px)
Мой вопрос задает: пусть тэта будет вектором розыгрышей одного из потомков. Код rbinom (10000,1, theta) генерирует прогнозируемые отрисовки для одного дополнительного наблюдения из процесса генерации данных. Используйте таблицу, чтобы суммировать эти прогнозируемые розыгрыши для бета и дискретного апостериора для.
Как мне нарисовать тэту от одного из моих постеров. Означает ли это, что я выбираю их случайным образом?