Tidak, perhitungan Anda tidak benar, karena:
Sebuah) b1 dan b3 mungkin berkorelasi dalam distribusi posterior, dan
b) bahkan jika tidak, itu bukan cara Anda menghitungnya (pikirkan hukum angka besar).
Tapi jangan takut, ada cara yang sangat mudah untuk melakukan ini di WinBUGS. Cukup tentukan variabel baru:
b1b3 <- b1 + b3
dan memonitor nilainya.
EDIT:
Untuk penjelasan yang lebih baik tentang poin pertama saya, misalkan posterior memiliki distribusi normal multivariat bersama (tidak dalam hal ini, tetapi berfungsi sebagai ilustrasi yang bermanfaat). Lalu parameternyabsaya memiliki distribusi N(μsaya,σ2saya), dan interval yang kredibel adalah 95% (μsaya- 1,96σsaya,μsaya+ 1,96σsaya) - perhatikan bahwa ini hanya tergantung pada mean dan varians.
Sekarang b1+b3 akan memiliki distribusi N(μ1+μ3,σ21+ 2ρ13σ1σ3+σ23). Perhatikan bahwa istilah varians (dan karenanya interval kredibel 95%) melibatkan istilah korelasiρ13 yang tidak dapat ditemukan dari interval untuk b1 atau b3.
(Poin saya tentang hukum angka besar adalah bahwa standar deviasi dari jumlah 2 variabel acak independen lebih kecil dari jumlah standar deviasi.)
Adapun cara menerapkannya di WinBUGS, sesuatu seperti ini adalah apa yang ada dalam pikiran saya:
model {
a ~ dXXXX
b1 ~ dXXXX
b2 ~ dXXXX
b3 ~ dXXXX
b1b3 <- b1 + b3
for (i in 1:N) {
logit(p[i]) <- a + b1*x[i] + b2*w[i] + b3*x[i]*w[i]
y[i] ~ dbern(p[i])
}
}
Pada setiap langkah sampler, simpul b1b3
akan diperbarui dari b1
dan b3
. Tidak memerlukan prior karena hanya fungsi deterministik dari dua node lainnya.