plot log likelihood function in r