Likelihood Ratio Test In R