plot poisson likelihood function in r