Maximise loglik + log sqrt(I(theta)). The weight is NOT a prior:
Warm (1989) chooses it so the O(1/n) BIAS of the ML estimator is
removed to first order. It also makes perfect patterns finite –
sqrt(I) tends to zero in both tails, so the weighted objective
turns over where the raw likelihood does not, giving the existence
property MAP buys with a prior, without one.
Usage
morie_psy_wle_theta(y, a = NULL, b = NULL, c = NULL, bounds = c(-6, 6))