Skip to main content
. Author manuscript; available in PMC: 2023 Jul 18.
Published in final edited form as: Am Stat. 2021 Jan 31;75(4):403–413. doi: 10.1080/00031305.2020.1865198

Algorithm 1.

Metropolis-Hastings

1:
procedure MH(θ(0), f(θ), q(θ(1) | θ(2)), N)
2:
Calculate f(θ(0))
3:
for t = 1,..., N do
4:
θPROPq(θPROP | θ(t−1))
5:
uU(0,1)
6:
α=min(1,f(θPROP)q(θ(t1)θPROP)f(θ(t1))q(θPROPθ(t1)))
7:
If α < u, then θ(t)θPROP. Otherwise, θ(t)θ(t−1)
8:
end for
9:
return θ(1)θ(N)
10:
end procedure