auto_penalize function

Penalize a likelihood function with a guessed penalty function