### First data set
param <- c(0, 0.5, 1, 0)
x <- c(-0.14887719759517, 0.234196605395883, -0.927104950991802, -1.59462610362820, 
0.0906664021005896, -0.503857782970725, 0.90857386548621, -1.58929267755841, 
-0.501152133244603, -2.86250923997788, 1.72031304768046, 1.8938352659248, 
-0.125357101704548, 1.30029494339533, -1.09070079180221, 0.305010691952047, 
-3.32293150979905, -0.256638438225928, 2.02558712704952, -0.102363528558932, 
0.748276394665002, -2.54113631327755, 0.833956814941127, -0.400902272052528, 
0.58101234770231, -2.37189987242009, 1.16743171181489, -0.744753743010745, 
-0.704231295818951, 0.522225484755935, -6.61330750778118, -0.440016143647914, 
-3.64078707906114, 2.50767162323373, 0.394515638585125, -3.977243683742, 
-0.134381170880903, -1.7178805740087, 1.89095454791587, 0.933859276781305, 
-0.496202860793791, 0.509955318861169, -5.21391975902034, 0.577389290461784, 
0.192488108522955, 0.322569343999312, -2.23847384848493, -0.745600243103129, 
-0.512044993932156, -0.944068377194424, -0.739784911801382, -3.70930566465099, 
-0.232535073557389, 0.183564747928256, -2.54571643821868, -2.91190811877127, 
-0.838839644490992, -0.780829597138256, -1.29800112474878, 2.04613065431706, 
-0.612132371559579, 1.49816543720656, 1.15585194697680, -0.993657866249696, 
0.14001499709872, 1.32488505654799, -0.00122626525656964, 0.677760282997698, 
0.609962399443828, -0.18837795408567, 0.603814649356537, 0.228838162254852, 
-0.0111411745461611, -1.37334185405042, 0.804634544933693, -0.177908363978203, 
-2.32224201765632, 0.107051723786010, 2.03228981567552, -1.82939318361917, 
0.175294611295952, -1.95091135929412, -0.0910703425706018, 0.62327275639139, 
0.667393614478449, -0.926049718826275, -0.636399505323566, -4.42476328855714, 
-1.86113146477699, -1.52000106063233, 1.04955987053898, -2.83531493221755, 
-0.495217058304489, 0.43763235294332, 1.96409969157263, 2.00477312502764, 
0.0111310099926665, 0.848019230424021, -1.83799453608546, -1.87224196034855
)


### Second data set
param <- c(0, 0.5, 1, 0)

c(0.445497471621978, -0.456358624000055, 0.637028752053226, -0.125976376013858, 
0.688504916892078, -0.11674274581748, 0.516067919914526, -0.993979613444905, 
-1.27303582891795, -0.810007319040049, 0.42016104671064, 1.12725600504133, 
-0.398040645435646, -0.553998344399515, -2.21263413585504, -5.06256469619506, 
-0.936702147605817, 2.42649624195205, 0.493678138700065, -1.53850692126568, 
0.136143055807848, -0.322910002532037, -1.00703471701903, -0.186008713687978, 
2.25229853579181, -2.39045798780094, -1.19516990680390, -0.470208296139577, 
0.401094893923237, 1.77508279446863, 0.0823227376025233, -1.11566325156469, 
-1.89236323599721, -0.190614355077265, 3.16296458573999, -1.07737125544819, 
-0.051435046594261, 0.728420806671098, 1.18795211500080, -2.19757041028149, 
-3.37481368765414, -1.67060207353476, -0.17514489715454, 6.45709635717285, 
1.50703272845274, -0.0093687716781904, 0.303734916917915, -0.173406934381967, 
-0.426726198571354, 1.37433217240267, 1.07215109115648, 0.284707138331279, 
1.18123803900903, -0.427580720488266, 0.432582913450876, 1.32290244067380, 
2.09260554848526, -0.783982575035292, 0.265319090816755, 0.649744926443263, 
-1.48409751462602, -0.173449123486848, 2.26243859706695, 2.23354809184173, 
-0.638023621349788, -0.62350961761865, -3.10356096704235, 0.83072414403625, 
-0.368668870704513, 0.875305215491646, -2.71904563033464, -0.86897099556634, 
-1.89991451805862, 1.69963898672631, 0.0828251899026418, -0.0736436991404641, 
-0.126112261657815, -0.204253846538677, -0.524981448007698, -0.207155087268370, 
-0.237865460024031, -1.93765797955688, 1.55789441869382, 1.61189033075829, 
0.0933490246415012, 0.165202612918535, 0.0348270460828204, 1.55673775705774, 
-0.935106852458771, 0.168665396052174, -0.0471548657245841, -2.55095362739662, 
-1.60863904508829, 0.514897284530819, -0.0770664377343338, 0.917737791480454, 
-1.63022892534466, -0.214676290655873, 0.552221675836589, -0.0179606291259893
)