# Load the P for Example 2 from Myers, Ahn, Lu, Celimli, and Zopluoglu (2016).
data(P_esem)
# Load 200 replications of the estimated eta on x regression
# coefficient matrix provided by replication
# numbers 1 through 100 and 4701 through 4800 in Example 2 from
# Myers, Ahn, Lu, Celimli, and Zopluoglu (2016).
data(sample_gamma_esem)
# Specify the following arguments within the correct_gamma function for Example 2 from
# Myers, Ahn, Lu, Celimli, and Zopluoglu (2016).
correct_gamma(P_data=P_esem, rep=200, n.eta=4, sample_gamma=sample_gamma_esem)
Run the code above in your browser using DataLab