sample1 = eigp_sampling(200,eta = 1.1,theta = 3)
eta1 = mle_search_eigp(data = sample1)$eta
theta1 = mle_search_eigp(data = sample1)$theta
theta0 = mle_iter_eigp(data = sample1,eta = 1)
LRT_eigp(sample1,theta0,theta1,eta1)
Run the code above in your browser using DataLab