make_sampler: make_sampler
Description
Creates a sampler function which finds a new point with a higher log likelihood.
Usage
make_sampler(d, s, sample_theta)
Arguments
s
Number of mcmc walker steps
Value
Sampler function which tries to find a point with a higher likelihood than the given point