Likelihood

This is a function that will find the likelihood function for a given
function in R. Please replace the value vector, likelihood function and
theta values desiresd.