# R script for Peak Model
#  -- generated by MACS
p <- c(0.0337936075069,0.0418490604591,0.0463679730909,0.0532445792696,0.0595317620616,0.0626753534576,0.0640506746933,0.0642471491556,0.0636577257688,0.0634612513066,0.0616929811463,0.0601211854483,0.0609070832973,0.0585493897503,0.0569775940523,0.0548163749676,0.0550128494298,0.0546199005053,0.0532445792696,0.0514763091093,0.0502974623358,0.0461714986286,0.0459750241664,0.0453856007796,0.0477432943266,0.0473503454021,0.0467609220154,0.0467609220154,0.0475468198644,0.0489221411001,0.0508868857226,0.0534410537318,0.0546199005053,0.0571740685146,0.0575670174391,0.0583529152881,0.0565846451278,0.0546199005053,0.0546199005053,0.0567811195901,0.0548163749676,0.0579599663636,0.0571740685146,0.0557987472788,0.0536375281941,0.0520657324961,0.0532445792696,0.0561916962033,0.0571740685146,0.0534410537318,0.0546199005053,0.0518692580338,0.0502974623358,0.0510833601848,0.0501009878736,0.0506904112603,0.0502974623358,0.0502974623358,0.0491186155623,0.0504939367981,0.0528516303451,0.0544234260431,0.0552093238921,0.0550128494298,0.0542269515808,0.0530481048073,0.0536375281941,0.0516727835716,0.0508868857226,0.0504939367981,0.0489221411001,0.0471538709399,0.0455820752419,0.0445997029306,0.0457785497041,0.0479397687889,0.0483327177134,0.0483327177134,0.0489221411001,0.0491186155623,0.0493150900246,0.0475468198644,0.0483327177134,0.0491186155623,0.0502974623358,0.0493150900246,0.0475468198644,0.0493150900246,0.0489221411001,0.0504939367981,0.0514763091093,0.0532445792696,0.0559952217411,0.0561916962033,0.0550128494298,0.0557987472788,0.0559952217411,0.0546199005053,0.0567811195901,0.0544234260431,0.0524586814206,0.0526551558828,0.0514763091093,0.0518692580338,0.0510833601848,0.0502974623358,0.0514763091093,0.0506904112603,0.0493150900246,0.0499045134113,0.0501009878736,0.0499045134113,0.0491186155623,0.0463679730909,0.0473503454021,0.0493150900246,0.0479397687889,0.0499045134113,0.0502974623358,0.0508868857226,0.0526551558828,0.0530481048073,0.0530481048073,0.0557987472788,0.0556022728166,0.0534410537318,0.0538340026563,0.0518692580338,0.0508868857226,0.0520657324961,0.0512798346471,0.0518692580338,0.0518692580338,0.0504939367981,0.0512798346471,0.0522622069583,0.0528516303451,0.0546199005053,0.0542269515808,0.0534410537318,0.0530481048073,0.0524586814206,0.0526551558828,0.0524586814206,0.0520657324961,0.0504939367981,0.0504939367981,0.0495115644868,0.0487256666379,0.0487256666379,0.0495115644868,0.0485291921756,0.0483327177134,0.0493150900246,0.0501009878736,0.0491186155623,0.0502974623358,0.0485291921756,0.0483327177134,0.0489221411001,0.0483327177134,0.0495115644868,0.0493150900246,0.0477432943266,0.0463679730909,0.0473503454021,0.0475468198644,0.0510833601848,0.0528516303451,0.0510833601848,0.0518692580338,0.0510833601848,0.0530481048073,0.0550128494298,0.0563881706656,0.0571740685146,0.0587458642126,0.0561916962033,0.0557987472788,0.0559952217411,0.0546199005053,0.0534410537318,0.0516727835716,0.0508868857226,0.0487256666379,0.0485291921756,0.0447961773929,0.0463679730909,0.0449926518551,0.0434208561571,0.0442067540061,0.0444032284684,0.0465644475531,0.0465644475531,0.0493150900246,0.0504939367981,0.0520657324961,0.0520657324961,0.0544234260431,0.0567811195901,0.0587458642126,0.0579599663636,0.0554057983543,0.0540304771186,0.0514763091093,0.0508868857226,0.0508868857226,0.0489221411001,0.0483327177134,0.0461714986286,0.0449926518551,0.0477432943266,0.0504939367981,0.0516727835716,0.0514763091093,0.0504939367981,0.0510833601848,0.0534410537318,0.0524586814206,0.0542269515808,0.0538340026563,0.0528516303451,0.0526551558828,0.0532445792696,0.0552093238921,0.0571740685146,0.0577634919013,0.0575670174391,0.0589423386748,0.0607106088351,0.0603176599106,0.0607106088351,0.0618894556086,0.0626753534576,0.0630683023821,0.0626753534576,0.0607106088351,0.0616929811463,0.0597282365238,0.0591388131371,0.0599247109861,0.0589423386748,0.0565846451278,0.0577634919013,0.0575670174391,0.0605141343728,0.0620859300708,0.0607106088351,0.0620859300708,0.0626753534576,0.0613000322218,0.0618894556086,0.0622824045331,0.0607106088351,0.0605141343728,0.0567811195901,0.0559952217411,0.0563881706656,0.0546199005053,0.0536375281941,0.0563881706656,0.0575670174391,0.0567811195901,0.0552093238921,0.0542269515808,0.0544234260431,0.0536375281941,0.0544234260431,0.0557987472788,0.0538340026563,0.0532445792696,0.0532445792696,0.0538340026563,0.0548163749676,0.0557987472788,0.0571740685146,0.0579599663636,0.0573705429768,0.0577634919013,0.0603176599106,0.0583529152881,0.0571740685146,0.0567811195901,0.0579599663636,0.0599247109861,0.0595317620616,0.0573705429768,0.0571740685146,0.0579599663636,0.0554057983543,0.0573705429768,0.0589423386748,0.0609070832973,0.0587458642126,0.0561916962033,0.0554057983543,0.0569775940523,0.0563881706656,0.0579599663636,0.0626753534576,0.0611035577596,0.0626753534576,0.0636577257688,0.0673907405515,0.0691590107118,0.0715167042588,0.0736779233435,0.0754461935038,0.0738743978058,0.0723026021078,0.0726955510323,0.074070872268,0.0736779233435,0.0730884999568,0.0744638211925,0.0752497190415,0.074856770117,0.0746602956548,0.0752497190415,0.0754461935038,0.075642667966,0.0738743978058,0.0734814488813,0.074070872268,0.0728920254945,0.0715167042588,0.071713178721,0.07249907657,0.0734814488813,0.0734814488813,0.0758391424283,0.0750532445793,0.0766250402773,0.075642667966,0.0766250402773,0.0760356168905,0.0746602956548,0.077214463664,0.0762320913528,0.0776074125885,0.0752497190415,0.076428565815,0.073284974419,0.0742673467303,0.0754461935038,0.078000361513,0.08035805506,0.079572157211,0.079572157211,0.0781968359753,0.0799651061355,0.0776074125885,0.0815369018335,0.081929850758,0.081143952909,0.0797686316733,0.0799651061355,0.0799651061355,0.0809474784468,0.0836981209182,0.084287544305,0.085859340003,0.0823227996825,0.08035805506,0.0797686316733,0.0813404273713,0.0836981209182,0.0840910698427,0.0856628655407,0.081929850758,0.0799651061355,0.083501646456,0.08821703355,0.0903782526347,0.091360624946,0.08821703355,0.0870381867765,0.0852699166162,0.0852699166162,0.0880205590877,0.0915570994082,0.0888064569367,0.0870381867765,0.0870381867765,0.0868417123142,0.091360624946,0.0917535738705,0.0907712015592,0.0917535738705,0.0915570994082,0.0895923547857,0.0884135080122,0.0884135080122,0.0878240846255,0.0862522889275,0.0836981209182,0.0821263252202,0.0852699166162,0.0848769676917,0.083501646456,0.0823227996825,0.0844840187672,0.0817333762957,0.0829122230692,0.082715748607,0.0854663910785,0.0848769676917,0.0833051719937,0.0799651061355,0.0825192741447,0.082715748607,0.0807510039845,0.0836981209182,0.0833051719937,0.0840910698427,0.0817333762957,0.082715748607,0.085859340003,0.0895923547857,0.0856628655407,0.0884135080122,0.092146522795,0.092932420644,0.0915570994082,0.0935218440307,0.094504216342,0.0941112674175,0.0941112674175,0.0948971652665,0.0986301800492,0.100005501285,0.100594924672,0.101773771445,0.106292684077,0.104131464992,0.104131464992,0.105310311766,0.10393499053,0.102559669294,0.101184348058,0.101184348058,0.0998090268227,0.0994160778982,0.0996125523604,0.104524413917,0.105113837303,0.106882107464,0.107668005313,0.109829224397,0.113758713642,0.112776341331,0.113758713642,0.115723458265,0.114348137029,0.11533050934,0.116705830576,0.117295253963,0.118867049661,0.12142121767,0.120242370897,0.121224743208,0.120242370897,0.118670575199,0.119063524123,0.118867049661,0.11965294751,0.123385962293,0.122207115519,0.122010641057,0.127315451538,0.127708400462,0.131244940783,0.132423787556,0.132620262018,0.134192057716,0.139103919273,0.134585006641,0.141658087282,0.143426357442,0.140086291584,0.14499815314,0.146962897763,0.149910014696,0.153643029479,0.154035978404,0.150106489159,0.154232452866,0.152660657168,0.155214825177,0.158358416573,0.160519635658,0.165627971676,0.165038548289,0.167396241836,0.171129256619,0.177809388336,0.183900096665,0.185275417901,0.183507147741,0.190776702844,0.189794330533,0.188222534835,0.194116768702,0.194313243165,0.194509717627,0.195295615476,0.194313243165,0.199225104721,0.207673506598,0.207673506598,0.210424149069,0.216121908474,0.222212616804,0.226928003898,0.230071595294,0.232625763303,0.240877690718,0.244217756576,0.244217756576,0.24893314367,0.249915515981,0.250897888292,0.247557822434,0.254434428613,0.25856039232,0.265240524037,0.265829947423,0.272117130215,0.278011364083,0.280762006554,0.287835087195,0.294122269987,0.300998876166,0.306696635571,0.31180497159,0.313180292826,0.317502730995,0.32143222024,0.328505300881,0.33105946889,0.334006585824,0.337543126144,0.339704345229,0.337739600607,0.340293768616,0.344223257861,0.341865564314,0.340293768616,0.335185432597,0.334596009211,0.335774855984,0.332238315664,0.332238315664,0.336364279371,0.33538190706,0.33538190706,0.340293768616,0.343044411087,0.34068671754,0.341079666465,0.345795053559,0.352082236351,0.353457557587,0.349724542804,0.346580951408,0.34677742587,0.338721972918,0.336364279371,0.338329023993,0.334596009211,0.327129979645,0.316520358684,0.312787343901,0.314752088524,0.315930935297,0.307679007883,0.310626124816,0.306500161109,0.306107212185,0.304535416487,0.305124839873,0.305321314336,0.300605927242,0.292746948752,0.289210408431,0.287442138271,0.282923225639,0.278011364083,0.275064247149,0.275457196074,0.269955911131,0.268777064357,0.271527706829,0.26465110065,0.257774494471,0.25070141383,0.240288267331,0.231053967605,0.219658448795,0.206691134286,0.196867411174,0.182328300967,0.167003292912,0.160912584582,0.151678284857,0.144212255291,0.141265138357,0.134192057716,0.128887247236,0.12142121767,0.11788467735,0.117491728425,0.115134034878,0.110418647784,0.10747153085,0.105506786228,0.10216672037,0.102952618219,0.0988266545114,0.100791399134,0.0972548588135,0.0941112674175,0.0919500483327,0.089002931399,0.0884135080122,0.0895923547857,0.0862522889275,0.084287544305,0.0838945953805,0.0821263252202,0.0799651061355,0.0793756827488,0.0815369018335,0.081929850758,0.0831086975315,0.0807510039845,0.0817333762957,0.0801615805978,0.0768215147395,0.0736779233435,0.0730884999568,0.07249907657,0.067783689476,0.068569587325,0.065425995929,0.0650330470046,0.0648365725423,0.0632647768443,0.0658189448535,0.0683731128628,0.0697484340985,0.0673907405515,0.0666048427025,0.0660154193158,0.067783689476,0.0652295214668,0.0646400980801,0.0642471491556,0.0624788789953,0.0620859300708,0.0601211854483,0.0611035577596,0.0628718279198,0.0616929811463,0.0605141343728,0.0613000322218,0.0614965066841,0.0620859300708,0.0634612513066,0.0644436236178,0.065425995929,0.0652295214668,0.0646400980801,0.067783689476,0.0675872150138,0.068569587325,0.0671942660893,0.0668013171648,0.0668013171648,0.0673907405515,0.069355485174,0.0703378574853,0.0726955510323,0.0707308064098,0.071713178721,0.0705343319475,0.070927280872,0.071713178721,0.0707308064098,0.0687660617873,0.0668013171648,0.0671942660893,0.0636577257688,0.0638542002311,0.0636577257688,0.0638542002311,0.0634612513066,0.0646400980801,0.0658189448535,0.066997791627,0.0671942660893,0.0660154193158,0.0658189448535,0.0628718279198,0.0614965066841,0.0609070832973,0.0599247109861,0.0581564408258,0.0577634919013,0.0577634919013,0.0575670174391,0.0567811195901,0.0581564408258,0.0595317620616,0.0581564408258,0.0593352875993,0.0595317620616,0.0624788789953,0.0622824045331,0.0616929811463,0.0636577257688,0.0652295214668,0.0624788789953,0.0638542002311,0.066997791627,0.0664083682403,0.0675872150138,0.0664083682403,0.0658189448535,0.0652295214668,0.0616929811463,0.0616929811463,0.0656224703913,0.0636577257688,0.0628718279198,0.0618894556086,0.0640506746933,0.0648365725423,0.0640506746933,0.0626753534576,0.0642471491556,0.0630683023821,0.0618894556086,0.0634612513066,0.0634612513066,0.0652295214668,0.0626753534576,0.0611035577596,0.0626753534576,0.0628718279198,0.0628718279198,0.0636577257688,0.0640506746933,0.0628718279198,0.0628718279198,0.0616929811463,0.0618894556086,0.0607106088351,0.0632647768443,0.0634612513066,0.0644436236178,0.0650330470046,0.065425995929,0.067783689476,0.066211893778,0.067783689476,0.066997791627,0.0668013171648,0.0642471491556,0.0630683023821,0.0618894556086,0.0599247109861,0.0589423386748,0.0567811195901,0.0569775940523,0.0567811195901,0.0563881706656,0.0552093238921,0.0542269515808,0.0556022728166,0.0554057983543,0.0554057983543,0.0556022728166,0.0554057983543,0.0552093238921,0.0524586814206,0.0534410537318,0.0563881706656,0.0567811195901,0.0571740685146,0.0577634919013,0.0571740685146,0.0569775940523,0.0559952217411,0.0579599663636,0.0575670174391,0.0567811195901,0.0554057983543,0.0554057983543,0.0528516303451,0.0526551558828,0.0528516303451,0.0532445792696,0.0528516303451,0.0530481048073,0.0569775940523,0.0573705429768,0.0565846451278,0.0544234260431,0.0530481048073,0.0526551558828,0.0542269515808,0.0508868857226,0.0522622069583,0.0491186155623,0.0493150900246,0.0504939367981,0.0487256666379,0.0487256666379,0.0501009878736,0.0493150900246,0.0485291921756,0.0499045134113,0.0508868857226,0.0532445792696,0.0530481048073,0.0514763091093,0.0512798346471,0.0516727835716,0.0522622069583,0.0520657324961,0.0520657324961,0.0514763091093,0.0501009878736,0.0473503454021,0.0449926518551,0.0465644475531,0.0495115644868,0.0497080389491,0.0497080389491,0.0506904112603,0.0491186155623,0.0504939367981,0.0510833601848,0.0534410537318,0.0518692580338,0.0506904112603,0.0501009878736,0.0514763091093,0.0514763091093,0.0512798346471,0.0524586814206,0.0520657324961,0.0516727835716,0.0516727835716,0.0526551558828,0.0522622069583,0.0514763091093,0.0506904112603,0.0528516303451,0.0520657324961,0.0510833601848,0.0512798346471,0.0506904112603,0.0502974623358,0.0512798346471,0.0530481048073,0.0516727835716,0.0510833601848,0.0493150900246,0.0497080389491,0.0497080389491,0.0497080389491,0.0477432943266,0.0479397687889,0.0475468198644,0.0459750241664,0.0483327177134,0.0489221411001,0.0495115644868,0.0508868857226,0.0512798346471,0.0518692580338,0.0536375281941,0.0514763091093,0.0534410537318,0.0552093238921,0.0548163749676,0.0526551558828,0.0516727835716,0.0499045134113,0.0508868857226,0.0487256666379,0.0487256666379,0.0508868857226,0.0483327177134,0.0473503454021,0.0469573964776,0.0493150900246,0.0489221411001,0.0469573964776,0.0465644475531,0.0477432943266,0.0483327177134,0.0483327177134,0.0493150900246,0.0471538709399,0.0481362432511,0.0463679730909,0.0463679730909,0.0487256666379,0.0479397687889,0.0477432943266,0.0465644475531,0.0453856007796,0.0447961773929,0.0467609220154,0.0457785497041,0.0473503454021,0.0495115644868,0.0532445792696,0.0532445792696,0.0536375281941,0.0557987472788,0.0563881706656,0.0561916962033,0.0556022728166,0.0557987472788,0.0565846451278,0.0540304771186,0.0506904112603,0.0526551558828,0.0524586814206,0.0528516303451,0.0530481048073,0.0522622069583,0.0536375281941,0.0550128494298,0.0534410537318,0.0556022728166,0.0559952217411,0.0536375281941,0.0542269515808,0.0522622069583,0.0506904112603,0.0518692580338,0.0508868857226,0.0497080389491,0.0499045134113,0.0485291921756,0.0485291921756,0.0493150900246,0.0491186155623,0.0491186155623,0.0469573964776,0.0457785497041,0.0465644475531,0.0473503454021,0.0475468198644,0.0473503454021,0.0471538709399,0.0485291921756,0.0489221411001,0.0485291921756,0.0518692580338,0.0524586814206,0.0536375281941,0.0548163749676,0.0544234260431,0.0542269515808,0.0552093238921,0.0557987472788,0.0563881706656,0.0571740685146,0.0571740685146,0.0569775940523,0.0554057983543,0.0516727835716,0.0516727835716,0.0532445792696,0.0506904112603,0.0512798346471,0.0495115644868,0.0493150900246,0.0479397687889,0.0479397687889,0.0463679730909,0.0502974623358,0.0516727835716,0.0514763091093,0.0518692580338,0.0508868857226,0.0528516303451,0.0534410537318,0.0554057983543,0.0557987472788,0.0563881706656,0.0532445792696,0.0538340026563,0.0544234260431,0.0526551558828,0.0508868857226,0.0501009878736,0.0499045134113,0.0489221411001,0.0506904112603,0.0506904112603,0.0542269515808,0.0526551558828,0.0520657324961,0.0556022728166,0.0569775940523,0.0591388131371,0.0589423386748,0.0565846451278,0.0559952217411,0.0548163749676,0.0516727835716,0.0536375281941,0.0526551558828,0.0522622069583,0.0518692580338,0.0479397687889,0.0489221411001,0.0493150900246,0.0483327177134,0.0501009878736,0.0506904112603,0.0499045134113,0.0522622069583,0.0516727835716,0.0516727835716,0.0530481048073,0.0514763091093,0.0526551558828,0.0530481048073,0.0530481048073,0.0538340026563,0.0524586814206,0.0518692580338,0.0502974623358,0.0483327177134,0.0479397687889,0.0497080389491,0.0479397687889,0.0459750241664,0.0445997029306,0.0440102795439,0.0447961773929,0.0436173306194,0.0463679730909,0.0471538709399,0.0475468198644,0.0465644475531,0.0483327177134,0.0499045134113,0.0504939367981,0.0501009878736,0.0495115644868,0.0491186155623,0.0479397687889,0.0489221411001,0.0473503454021,0.0469573964776,0.0479397687889,0.0481362432511,0.0487256666379,0.0467609220154,0.0493150900246,0.0497080389491,0.0483327177134,0.0481362432511,0.0479397687889,0.0485291921756,0.0471538709399,0.0471538709399,0.0473503454021,0.0504939367981,0.0485291921756,0.0489221411001,0.0502974623358,0.0504939367981,0.0528516303451,0.0516727835716,0.0548163749676,0.0550128494298,0.0567811195901,0.0567811195901,0.0579599663636,0.0591388131371,0.0595317620616,0.0607106088351,0.0616929811463,0.0620859300708,0.0599247109861,0.0626753534576,0.0626753534576,0.0613000322218,0.0614965066841,0.0585493897503,0.0577634919013,0.0557987472788,0.0546199005053,0.0561916962033,0.0565846451278,0.0536375281941,0.0522622069583,0.0532445792696,0.0514763091093,0.0536375281941,0.0556022728166,0.0557987472788,0.0542269515808,0.0526551558828,0.0528516303451,0.0528516303451,0.0534410537318,0.0528516303451,0.0534410537318,0.0520657324961,0.0512798346471,0.0524586814206,0.0526551558828,0.0534410537318,0.0550128494298,0.0546199005053,0.0532445792696,0.0548163749676,0.0554057983543,0.0573705429768,0.0554057983543,0.0554057983543,0.0583529152881,0.0589423386748,0.0585493897503,0.0579599663636,0.0573705429768,0.0548163749676,0.0561916962033,0.0565846451278,0.0581564408258,0.0567811195901,0.0557987472788,0.0554057983543,0.0556022728166,0.0561916962033,0.0579599663636,0.0581564408258,0.0557987472788,0.0554057983543,0.0546199005053,0.0559952217411,0.0544234260431,0.0522622069583,0.0510833601848,0.0538340026563,0.0520657324961,0.0530481048073,0.0532445792696,0.0520657324961,0.0510833601848,0.0514763091093,0.0518692580338,0.0548163749676,0.0544234260431,0.0530481048073,0.0532445792696,0.0546199005053,0.0546199005053,0.0544234260431,0.0554057983543,0.0538340026563,0.0550128494298,0.0540304771186,0.0550128494298,0.0526551558828,0.0536375281941,0.0528516303451,0.0532445792696,0.0530481048073,0.0546199005053,0.0550128494298,0.0532445792696,0.0518692580338,0.0508868857226,0.0518692580338,0.0518692580338,0.0514763091093,0.0518692580338,0.0528516303451,0.0510833601848,0.0510833601848,0.0512798346471,0.0526551558828,0.0536375281941,0.0542269515808,0.0524586814206,0.0508868857226,0.0524586814206,0.0501009878736,0.0504939367981,0.0506904112603,0.0520657324961,0.0516727835716,0.0502974623358,0.0508868857226,0.0471538709399,0.0432243816949,0.0355618776671,0.0320253373467,0.0)
m <- c(0.0315184609536,0.0370341916204,0.0421559415254,0.0470807010494,0.0512174990495,0.0508235182876,0.0545663355258,0.0522024509543,0.0514144894305,0.0520054605734,0.0525964317162,0.0529904124782,0.0545663355258,0.0545663355258,0.0565362393354,0.0589001239069,0.0594910950498,0.0604760469546,0.0606730373356,0.0606730373356,0.0590971142879,0.0579151720022,0.0569302200974,0.0561422585735,0.0555512874306,0.053975364383,0.0522024509543,0.0523994413353,0.0529904124782,0.0531874028591,0.0520054605734,0.0533843932401,0.0525964317162,0.053581383621,0.0543693451449,0.0531874028591,0.0527934220972,0.0523994413353,0.0522024509543,0.0533843932401,0.0543693451449,0.0559452681926,0.0563392489545,0.0553542970497,0.0545663355258,0.0549603162878,0.0565362393354,0.058506143145,0.0577181816212,0.0559452681926,0.0555512874306,0.053778374002,0.0527934220972,0.053975364383,0.0541723547639,0.0543693451449,0.053975364383,0.0529904124782,0.0529904124782,0.0529904124782,0.0551573066687,0.0547633259068,0.0553542970497,0.0551573066687,0.0533843932401,0.053778374002,0.053581383621,0.0520054605734,0.0518084701924,0.0522024509543,0.0508235182876,0.0502325471447,0.0516114798114,0.0520054605734,0.0531874028591,0.0522024509543,0.0527934220972,0.0522024509543,0.0529904124782,0.053581383621,0.0541723547639,0.0545663355258,0.0553542970497,0.0541723547639,0.0561422585735,0.0579151720022,0.0567332297164,0.0590971142879,0.058506143145,0.0563392489545,0.0561422585735,0.0557482778116,0.0541723547639,0.0553542970497,0.0543693451449,0.0523994413353,0.053581383621,0.0520054605734,0.0525964317162,0.0549603162878,0.0543693451449,0.0543693451449,0.0543693451449,0.053778374002,0.0527934220972,0.0533843932401,0.0518084701924,0.0523994413353,0.053778374002,0.0527934220972,0.0523994413353,0.0516114798114,0.0514144894305,0.0522024509543,0.0523994413353,0.0510205086686,0.0510205086686,0.0510205086686,0.049050604859,0.0506265279066,0.0492475952399,0.0498385663828,0.0512174990495,0.0510205086686,0.0478686625732,0.048656624097,0.0478686625732,0.0482626433351,0.0510205086686,0.0492475952399,0.0516114798114,0.0533843932401,0.0525964317162,0.0520054605734,0.0565362393354,0.0575211912402,0.0596880854308,0.0606730373356,0.0577181816212,0.0569302200974,0.0594910950498,0.058703133526,0.0592941046689,0.0598850758117,0.0583091527641,0.058506143145,0.0596880854308,0.0589001239069,0.0602790565737,0.0638248834309,0.0606730373356,0.0592941046689,0.0590971142879,0.0573242008593,0.0573242008593,0.0559452681926,0.0531874028591,0.0529904124782,0.0520054605734,0.0496415760018,0.0482626433351,0.0502325471447,0.049050604859,0.0514144894305,0.0522024509543,0.0531874028591,0.0551573066687,0.0567332297164,0.0561422585735,0.0561422585735,0.0583091527641,0.0565362393354,0.0565362393354,0.0541723547639,0.053778374002,0.053975364383,0.0520054605734,0.0500355567638,0.0500355567638,0.0498385663828,0.0516114798114,0.0527934220972,0.0525964317162,0.0522024509543,0.0494445856209,0.0494445856209,0.0510205086686,0.0512174990495,0.0506265279066,0.0512174990495,0.0494445856209,0.0474746818113,0.0496415760018,0.049050604859,0.0504295375257,0.0508235182876,0.0496415760018,0.0502325471447,0.0496415760018,0.0498385663828,0.049050604859,0.0520054605734,0.0494445856209,0.0520054605734,0.053778374002,0.053581383621,0.0547633259068,0.0514144894305,0.0510205086686,0.0500355567638,0.0500355567638,0.0498385663828,0.0520054605734,0.0502325471447,0.0500355567638,0.048853614478,0.0480656529542,0.0500355567638,0.0508235182876,0.0510205086686,0.0500355567638,0.0494445856209,0.0464897299065,0.0492475952399,0.0484596337161,0.0476716721922,0.0498385663828,0.0494445856209,0.0516114798114,0.0525964317162,0.053581383621,0.0525964317162,0.0533843932401,0.0520054605734,0.0508235182876,0.0531874028591,0.0525964317162,0.0565362393354,0.0571272104783,0.0563392489545,0.0563392489545,0.0547633259068,0.0547633259068,0.0549603162878,0.0571272104783,0.053975364383,0.0533843932401,0.0506265279066,0.0500355567638,0.048853614478,0.0500355567638,0.0520054605734,0.053778374002,0.0525964317162,0.0522024509543,0.0533843932401,0.0523994413353,0.0527934220972,0.0514144894305,0.053778374002,0.0510205086686,0.0514144894305,0.0502325471447,0.0508235182876,0.0520054605734,0.053778374002,0.0545663355258,0.053778374002,0.0555512874306,0.053581383621,0.0563392489545,0.0557482778116,0.0551573066687,0.0557482778116,0.0561422585735,0.0551573066687,0.053778374002,0.0531874028591,0.0520054605734,0.0520054605734,0.0508235182876,0.0498385663828,0.0502325471447,0.0500355567638,0.0468837106684,0.0496415760018,0.0496415760018,0.0504295375257,0.0504295375257,0.0512174990495,0.0529904124782,0.0545663355258,0.0541723547639,0.0553542970497,0.0557482778116,0.0529904124782,0.0547633259068,0.0545663355258,0.053778374002,0.0533843932401,0.0520054605734,0.0500355567638,0.0498385663828,0.0472776914303,0.0466867202874,0.0466867202874,0.0449138068588,0.0421559415254,0.0417619607635,0.0397920569539,0.0380191435252,0.0403830280967,0.0413679800015,0.0433378838111,0.0458987587636,0.0464897299065,0.0472776914303,0.0506265279066,0.0506265279066,0.0514144894305,0.0531874028591,0.0520054605734,0.0516114798114,0.0520054605734,0.0502325471447,0.048656624097,0.0494445856209,0.0496415760018,0.0516114798114,0.053581383621,0.0555512874306,0.0571272104783,0.0567332297164,0.0569302200974,0.058506143145,0.0589001239069,0.0577181816212,0.0569302200974,0.0561422585735,0.0543693451449,0.0525964317162,0.0506265279066,0.0516114798114,0.0516114798114,0.0508235182876,0.0522024509543,0.0518084701924,0.0531874028591,0.0563392489545,0.0571272104783,0.0581121623831,0.0596880854308,0.0592941046689,0.0592941046689,0.0592941046689,0.0590971142879,0.0589001239069,0.0579151720022,0.053778374002,0.0520054605734,0.0510205086686,0.0508235182876,0.0504295375257,0.0496415760018,0.0494445856209,0.0506265279066,0.0523994413353,0.0514144894305,0.0543693451449,0.0569302200974,0.0561422585735,0.0551573066687,0.0571272104783,0.0575211912402,0.0583091527641,0.0563392489545,0.0541723547639,0.0533843932401,0.0520054605734,0.0522024509543,0.0531874028591,0.053975364383,0.0567332297164,0.0567332297164,0.0561422585735,0.0592941046689,0.0608700277165,0.0618549796213,0.0616579892404,0.0610670180975,0.0608700277165,0.0606730373356,0.0567332297164,0.0579151720022,0.0575211912402,0.0563392489545,0.0545663355258,0.053581383621,0.0531874028591,0.0541723547639,0.0541723547639,0.053975364383,0.0525964317162,0.0525964317162,0.0545663355258,0.0533843932401,0.0549603162878,0.0567332297164,0.0575211912402,0.0563392489545,0.0573242008593,0.0569302200974,0.0594910950498,0.0581121623831,0.0563392489545,0.0571272104783,0.0577181816212,0.058703133526,0.0592941046689,0.0598850758117,0.0569302200974,0.0565362393354,0.0565362393354,0.0559452681926,0.0557482778116,0.0553542970497,0.0563392489545,0.0561422585735,0.0547633259068,0.0541723547639,0.0557482778116,0.0577181816212,0.0579151720022,0.0600820661927,0.0616579892404,0.0618549796213,0.0600820661927,0.058506143145,0.0589001239069,0.0614609988594,0.0640218738119,0.0630369219071,0.063430902669,0.0632339122881,0.0618549796213,0.0626429411452,0.0657947872405,0.0675677006692,0.0669767295263,0.0632339122881,0.0604760469546,0.0618549796213,0.0616579892404,0.0612640084785,0.0610670180975,0.0598850758117,0.0577181816212,0.0563392489545,0.0569302200974,0.0602790565737,0.0624459507642,0.0612640084785,0.0610670180975,0.0608700277165,0.0630369219071,0.0640218738119,0.0632339122881,0.0624459507642,0.0628399315261,0.0626429411452,0.0626429411452,0.0628399315261,0.0622489603833,0.0626429411452,0.0598850758117,0.0596880854308,0.0604760469546,0.0614609988594,0.0620519700023,0.0606730373356,0.0602790565737,0.0600820661927,0.0590971142879,0.0589001239069,0.0610670180975,0.0604760469546,0.0628399315261,0.0655977968596,0.0652038160977,0.0644158545738,0.0657947872405,0.068552652574,0.0709165371455,0.0719014890503,0.0717044986693,0.0720984794312,0.0693406140978,0.0689466333359,0.0695376044788,0.0695376044788,0.068552652574,0.0654008064786,0.0644158545738,0.0626429411452,0.0616579892404,0.0604760469546,0.0622489603833,0.0632339122881,0.0640218738119,0.0644158545738,0.06362789305,0.0654008064786,0.0655977968596,0.0669767295263,0.0667797391453,0.0673707102882,0.0667797391453,0.0640218738119,0.0640218738119,0.0659917776215,0.0657947872405,0.0648098353357,0.0650068257167,0.0646128449548,0.0655977968596,0.0671737199073,0.0661887680025,0.0644158545738,0.0654008064786,0.0624459507642,0.0640218738119,0.0661887680025,0.0644158545738,0.0638248834309,0.0644158545738,0.0638248834309,0.0657947872405,0.0677646910501,0.0659917776215,0.0699315852407,0.0691436237169,0.0673707102882,0.0707195467645,0.0719014890503,0.0724924601932,0.073280421717,0.073083431336,0.0746593543837,0.0736744024789,0.073280421717,0.0758412966695,0.0787961523839,0.0762352774314,0.0768262485743,0.0789931427648,0.0813570273364,0.0815540177173,0.0791901331458,0.0805690658125,0.0817510080983,0.0787961523839,0.0770232389552,0.07800819086,0.0778112004791,0.0764322678124,0.0748563447647,0.0742653736218,0.0756443062885,0.0789931427648,0.078205181241,0.0778112004791,0.0776142100981,0.0770232389552,0.0774172197172,0.0774172197172,0.0758412966695,0.0754473159076,0.0805690658125,0.0791901331458,0.0801750850506,0.0839179022888,0.0862817868603,0.0917975175272,0.0937674213368,0.0973132481941,0.100859075051,0.104207911528,0.103025969242,0.105783834575,0.109920632576,0.110708594099,0.112481507528,0.112481507528,0.11287548829,0.113663449814,0.114451411338,0.119573161243,0.122725007338,0.1231189881,0.1231189881,0.125876853433,0.130998603338,0.132574526386,0.137696276291,0.147151814577,0.154637449053,0.158380266292,0.164683958482,0.173548525625,0.183595035054,0.195611448293,0.202506111627,0.218265342103,0.231266707247,0.234615543723,0.244859043533,0.253723610676,0.262982158581,0.268300898867,0.271058764201,0.271649735343,0.278544398677,0.279726340963,0.27716546601,0.281105273629,0.275786533344,0.278347408296,0.278347408296,0.281105273629,0.284651100487,0.287605956201,0.287802946582,0.287014985058,0.292136734963,0.296667513725,0.307698975059,0.312820724964,0.32030635944,0.323655195917,0.327004032393,0.331731801536,0.337444522584,0.338232484108,0.338232484108,0.339808407155,0.340005397536,0.340990349441,0.33665656106,0.339217436013,0.336853551441,0.338823455251,0.335080638012,0.334292676489,0.337050541822,0.334292676489,0.334686657251,0.33448966687,0.333701705346,0.336065589917,0.340990349441,0.341778310965,0.343945205156,0.348475983918,0.35300676268,0.353794724204,0.356158608775,0.353794724204,0.353794724204,0.350839868489,0.343354234013,0.338429474489,0.336459570679,0.333110734203,0.323261215155,0.320503349821,0.315184609536,0.311638782678,0.310062859631,0.304744119345,0.301198292487,0.297455475249,0.287999936963,0.285045081249,0.283075177439,0.277756437153,0.270073812296,0.266527985438,0.258845360581,0.253723610676,0.251556716486,0.244465062771,0.242101178199,0.236585447533,0.234418553342,0.232645639913,0.227129909247,0.222008159342,0.21550747677,0.209006794198,0.206248928865,0.204082034674,0.199945236674,0.197187371341,0.192459602198,0.187731833055,0.186943871531,0.183989015816,0.185761929245,0.187140861912,0.180246198578,0.176897362102,0.17453347753,0.169017746863,0.168426775721,0.167244833435,0.166062891149,0.161926093149,0.159759198958,0.155031429815,0.154834439434,0.153455506768,0.155425410577,0.153455506768,0.14774278572,0.144590939624,0.141439093529,0.140454141624,0.140060160862,0.138090257053,0.139863170481,0.138484237815,0.135135401338,0.135923362862,0.134150449434,0.131195593719,0.128240738005,0.128240738005,0.12528588229,0.126467824576,0.122528016957,0.120952093909,0.120361122766,0.121346074671,0.120755103528,0.120952093909,0.121937045814,0.119573161243,0.117997238195,0.115633353623,0.11504238248,0.113860440195,0.11287548829,0.107359757623,0.106965776861,0.105980824956,0.103419950004,0.101647036575,0.100071113528,0.0994801423846,0.0988891712418,0.0996771327656,0.0998741231466,0.100268103908,0.097707228956,0.0963282962893,0.0957373251464,0.0941614020987,0.0937674213368,0.0908125656224,0.0908125656224,0.0888426618128,0.0852968349555,0.082932950384,0.082932950384,0.0866757676223,0.087857709908,0.0906155752415,0.092979459813,0.0947523732416,0.0957373251464,0.0973132481941,0.097707228956,0.0996771327656,0.100071113528,0.0963282962893,0.0959343155274,0.0961313059083,0.092979459813,0.0921914982891,0.0923884886701,0.0935704309559,0.092782469432,0.0941614020987,0.0951463540035,0.0941614020987,0.0933734405749,0.0906155752415,0.0914035367653,0.0892366425747,0.0882516906699,0.0854938253365,0.0852968349555,0.0854938253365,0.0849028541936,0.0841148926698,0.0868727580032,0.0856908157175,0.0856908157175,0.0866757676223,0.0856908157175,0.0850998445746,0.0852968349555,0.0852968349555,0.0839179022888,0.0847058638127,0.0811600369554,0.0827359600031,0.0845088734317,0.0849028541936,0.0841148926698,0.083326931146,0.0839179022888,0.082932950384,0.0850998445746,0.087857709908,0.087857709908,0.0904185848605,0.0884486810509,0.0890396521938,0.0896306233367,0.0917975175272,0.0921914982891,0.0896306233367,0.0892366425747,0.0843118830508,0.0858878060984,0.0823419792412,0.0811600369554,0.0807660561935,0.0803720754316,0.0791901331458,0.0768262485743,0.0774172197172,0.0772202293362,0.078402171622,0.0776142100981,0.0787961523839,0.0789931427648,0.0768262485743,0.0768262485743,0.0789931427648,0.0819479984792,0.0850998445746,0.0825389696221,0.0819479984792,0.083326931146,0.0845088734317,0.0862817868603,0.0868727580032,0.0852968349555,0.0819479984792,0.0805690658125,0.0762352774314,0.0764322678124,0.0776142100981,0.0754473159076,0.0715075082884,0.0697345948597,0.0691436237169,0.0699315852407,0.0717044986693,0.0703255660026,0.0726894505741,0.0728864409551,0.0707195467645,0.0715075082884,0.0728864409551,0.0752503255266,0.0778112004791,0.0774172197172,0.0748563447647,0.0748563447647,0.0744623640028,0.0760382870504,0.07800819086,0.0768262485743,0.0760382870504,0.0720984794312,0.0687496429549,0.0703255660026,0.0726894505741,0.073477412098,0.0697345948597,0.068355662193,0.068552652574,0.0689466333359,0.0687496429549,0.0699315852407,0.0717044986693,0.0699315852407,0.0677646910501,0.068552652574,0.0711135275265,0.0707195467645,0.0681586718121,0.0655977968596,0.0646128449548,0.0628399315261,0.0628399315261,0.0626429411452,0.0614609988594,0.0596880854308,0.0589001239069,0.0579151720022,0.058506143145,0.058506143145,0.0581121623831,0.0573242008593,0.0561422585735,0.0553542970497,0.0555512874306,0.0543693451449,0.053581383621,0.0529904124782,0.0529904124782,0.0529904124782,0.0527934220972,0.0541723547639,0.0523994413353,0.0516114798114,0.0512174990495,0.0516114798114,0.0516114798114,0.0525964317162,0.0514144894305,0.0516114798114,0.0520054605734,0.0523994413353,0.0547633259068,0.0553542970497,0.0551573066687,0.053778374002,0.0547633259068,0.053581383621,0.0529904124782,0.0522024509543,0.0525964317162,0.0527934220972,0.0522024509543,0.0514144894305,0.0533843932401,0.0547633259068,0.0523994413353,0.053581383621,0.0543693451449,0.0547633259068,0.0555512874306,0.0549603162878,0.0523994413353,0.0529904124782,0.0516114798114,0.0502325471447,0.0512174990495,0.048656624097,0.0480656529542,0.0474746818113,0.0451107972398,0.0429439030492,0.0453077876207,0.0435348741921,0.0435348741921,0.043928854954,0.0421559415254,0.0443228357159,0.0431408934302,0.0431408934302,0.0447168164779,0.0457017683826,0.0464897299065,0.0474746818113,0.0484596337161,0.049050604859,0.0504295375257,0.0512174990495,0.0529904124782,0.053581383621,0.0518084701924,0.0529904124782,0.0514144894305,0.0523994413353,0.0514144894305,0.0512174990495,0.0523994413353,0.0506265279066,0.0518084701924,0.0502325471447,0.0512174990495,0.0498385663828,0.0508235182876,0.0502325471447,0.0502325471447,0.0496415760018,0.0508235182876,0.0514144894305,0.0516114798114,0.0518084701924,0.0502325471447,0.049050604859,0.0506265279066,0.0523994413353,0.0518084701924,0.0502325471447,0.0494445856209,0.0502325471447,0.0494445856209,0.0522024509543,0.053975364383,0.0569302200974,0.0531874028591,0.0525964317162,0.0527934220972,0.0559452681926,0.0547633259068,0.0541723547639,0.0523994413353,0.0506265279066,0.0502325471447,0.0494445856209,0.0518084701924,0.0510205086686,0.0522024509543,0.0498385663828,0.0508235182876,0.0504295375257,0.0500355567638,0.0502325471447,0.0506265279066,0.0506265279066,0.0502325471447,0.0506265279066,0.049050604859,0.0506265279066,0.0496415760018,0.0480656529542,0.0492475952399,0.0510205086686,0.0510205086686,0.0520054605734,0.0510205086686,0.0512174990495,0.0518084701924,0.0514144894305,0.0522024509543,0.0525964317162,0.0522024509543,0.0496415760018,0.048656624097,0.048656624097,0.0504295375257,0.0494445856209,0.0502325471447,0.0492475952399,0.0494445856209,0.048853614478,0.0496415760018,0.0498385663828,0.0508235182876,0.0498385663828,0.0496415760018,0.0506265279066,0.0496415760018,0.0508235182876,0.0492475952399,0.0520054605734,0.0522024509543,0.0527934220972,0.0533843932401,0.0531874028591,0.0518084701924,0.0502325471447,0.0504295375257,0.0514144894305,0.0529904124782,0.0508235182876,0.0508235182876,0.0525964317162,0.0525964317162,0.0514144894305,0.0514144894305,0.0510205086686,0.0502325471447,0.0500355567638,0.0496415760018,0.0510205086686,0.0522024509543,0.0518084701924,0.0504295375257,0.0525964317162,0.0527934220972,0.0543693451449,0.0557482778116,0.053778374002,0.0561422585735,0.0579151720022,0.0575211912402,0.0559452681926,0.0573242008593,0.0553542970497,0.0573242008593,0.0573242008593,0.0553542970497,0.0549603162878,0.0525964317162,0.0502325471447,0.0478686625732,0.048853614478,0.049050604859,0.0492475952399,0.0484596337161,0.0474746818113,0.0480656529542,0.0492475952399,0.0484596337161,0.0504295375257,0.0516114798114,0.0518084701924,0.0506265279066,0.0510205086686,0.0492475952399,0.0506265279066,0.0514144894305,0.0529904124782,0.0533843932401,0.0527934220972,0.0547633259068,0.0533843932401,0.0549603162878,0.0563392489545,0.0569302200974,0.0559452681926,0.0575211912402,0.0555512874306,0.0565362393354,0.0543693451449,0.0527934220972,0.0543693451449,0.0545663355258,0.0527934220972,0.0527934220972,0.0533843932401,0.0525964317162,0.0525964317162,0.053778374002,0.0547633259068,0.0571272104783,0.0567332297164,0.0563392489545,0.0563392489545,0.0569302200974,0.0567332297164,0.058506143145,0.058703133526,0.0577181816212,0.0590971142879,0.0573242008593,0.0573242008593,0.0555512874306,0.0581121623831,0.0583091527641,0.0573242008593,0.0549603162878,0.0575211912402,0.0563392489545,0.0553542970497,0.0549603162878,0.0549603162878,0.0575211912402,0.0557482778116,0.0561422585735,0.058703133526,0.0579151720022,0.0575211912402,0.0573242008593,0.0589001239069,0.0594910950498,0.0579151720022,0.0559452681926,0.0559452681926,0.0553542970497,0.0518084701924,0.0512174990495,0.053581383621,0.053975364383,0.0533843932401,0.0523994413353,0.053975364383,0.0557482778116,0.0563392489545,0.0549603162878,0.058506143145,0.0606730373356,0.0579151720022,0.0589001239069,0.0606730373356,0.0630369219071,0.0640218738119,0.0573242008593,0.0514144894305,0.0474746818113,0.0405800184777,0.0)
ycorr <- c(3.83455014805e-05,3.81660380984e-05,3.76312291086e-05,3.67507910893e-05,3.55409639621e-05,3.39908716002e-05,3.21119783745e-05,3.02090533829e-05,2.82840712882e-05,2.63420906219e-05,2.43895763094e-05,2.24313754104e-05,2.04653857245e-05,1.84908923557e-05,1.65021732138e-05,1.44986884809e-05,1.24915428866e-05,1.04702780274e-05,8.42602997869e-06,6.35714101331e-06,4.25160993529e-06,2.11090440657e-06,-6.21391476009e-08,-2.26401731925e-06,-4.50067386007e-06,-6.77903888769e-06,-9.0997606158e-06,-1.14588064071e-05,-1.38497353372e-05,-1.62696448533e-05,-1.87105937702e-05,-2.11625796241e-05,-2.36278761975e-05,-2.61022909147e-05,-2.85786365237e-05,-3.10377042445e-05,-3.34747543144e-05,-3.58973937679e-05,-3.83055101578e-05,-4.06958767428e-05,-4.30629388313e-05,-4.54083853457e-05,-4.77366939968e-05,-5.00483549172e-05,-5.23547310635e-05,-5.46622064927e-05,-5.69843938431e-05,-5.93261221397e-05,-6.16819517743e-05,-6.40620597587e-05,-6.64624730457e-05,-6.8881244815e-05,-7.13144668771e-05,-7.37527683201e-05,-7.61840462629e-05,-7.86028612757e-05,-8.10034384024e-05,-8.33683547235e-05,-8.5691018815e-05,-8.7964956545e-05,-9.0187198414e-05,-9.23641840966e-05,-9.44936644796e-05,-9.65749191892e-05,-9.86125664373e-05,-0.000100600500338,-0.000102541366518,-0.000104437104562,-0.000106295658511,-0.000108114334964,-0.000109895854537,-0.000111629964325,-0.000113312034536,-0.000114952474776,-0.000116549758434,-0.000118110712117,-0.000119641130595,-0.000121141745824,-0.000122610682368,-0.000124043875163,-0.000125440284232,-0.000126800929499,-0.000128129676371,-0.000129430029409,-0.000130695385153,-0.000131926724891,-0.000133123175557,-0.000134281684807,-0.000135396054003,-0.000136473368091,-0.000137524095983,-0.000138556140063,-0.000139574398779,-0.000140571600473,-0.000141551171951,-0.000142517696056,-0.000143466889021,-0.00014440290936,-0.000145334621792,-0.000146263349792,-0.000147175896248,-0.000148071549296,-0.000148941226385,-0.000149789774538,-0.00015062356032,-0.000151441294521,-0.000152234138213,-0.000153004592846,-0.000153749073934,-0.000154462444375,-0.000155152575455,-0.000155828177437,-0.000156487264258,-0.000157134414355,-0.000157763696003,-0.000158378683038,-0.00015898595232,-0.000159588528694,-0.000160186603533,-0.000160783117557,-0.00016138364522,-0.000161982883498,-0.000162585708136,-0.00016319108602,-0.000163797593893,-0.000164404743008,-0.00016501561848,-0.000165624460718,-0.000166235586683,-0.00016685103402,-0.000167461853504,-0.000168065117808,-0.000168658528527,-0.000169238249075,-0.000169806368019,-0.000170363212882,-0.000170902773738,-0.000171425195389,-0.000171927203739,-0.000172407798493,-0.000172869885243,-0.000173317493225,-0.000173754964745,-0.000174184570671,-0.000174609730249,-0.000175033212087,-0.000175455451297,-0.000175878370324,-0.000176303951742,-0.000176733885482,-0.000177169881531,-0.000177611474372,-0.000178058157968,-0.000178512514743,-0.000178971353646,-0.000179428275895,-0.000179882824081,-0.000180337816866,-0.000180800413367,-0.000181266157112,-0.000181732865828,-0.000182200916348,-0.000182668805385,-0.000183135907945,-0.000183600016718,-0.000184063566909,-0.000184525924146,-0.000184986332019,-0.000185439557505,-0.000185885000541,-0.000186328238203,-0.000186767203316,-0.000187200629586,-0.000187630886454,-0.000188058896867,-0.000188480756787,-0.000188905142378,-0.000189332121028,-0.000189758974836,-0.000190187411602,-0.000190616037243,-0.000191043894122,-0.000191473468251,-0.000191902215327,-0.000192330817783,-0.000192760808102,-0.000193191396688,-0.000193617280924,-0.000194038221397,-0.000194461611726,-0.000194880096621,-0.000195290343702,-0.000195688866888,-0.000196078471574,-0.000196455801226,-0.000196819404512,-0.000197167477445,-0.000197501208469,-0.000197821164487,-0.000198126122672,-0.000198418840876,-0.000198711881655,-0.000199009246647,-0.000199308143739,-0.000199608982928,-0.000199920501061,-0.000200244540602,-0.000200583899315,-0.000200940486954,-0.000201309677208,-0.000201691568075,-0.000202075610287,-0.000202458534636,-0.000202841293072,-0.000203229905408,-0.000203617962924,-0.000203996031091,-0.000204361841086,-0.000204709678369,-0.000205043367914,-0.000205364188881,-0.000205673504678,-0.000205971685412,-0.000206253351888,-0.000206513821935,-0.000206749515679,-0.000206968392783,-0.000207176114668,-0.000207373528058,-0.000207559450265,-0.000207728553911,-0.000207881896792,-0.00020801968364,-0.000208147596145,-0.00020826902826,-0.000208388462618,-0.000208506448706,-0.000208614441496,-0.000208712689839,-0.000208803422071,-0.000208895805058,-0.000208992280134,-0.000209093215017,-0.000209198115817,-0.000209304174403,-0.00020941387941,-0.000209524644122,-0.000209639180478,-0.000209767403478,-0.000209907178322,-0.000210048060917,-0.000210187670162,-0.000210324071672,-0.000210458515131,-0.00021059535962,-0.000210730303684,-0.000210861355098,-0.000210987996237,-0.000211101501494,-0.000211198141357,-0.000211284590351,-0.000211367632152,-0.000211448584496,-0.000211525924699,-0.000211593432647,-0.000211651083585,-0.000211703702754,-0.00021175394632,-0.000211805475028,-0.000211862865533,-0.000211924803432,-0.000211985812535,-0.000212043065792,-0.000212096203928,-0.000212151856137,-0.000212211692658,-0.000212270083015,-0.00021232539104,-0.00021237581615,-0.000212421354458,-0.000212462047021,-0.000212497959441,-0.000212533323792,-0.000212570091273,-0.000212602659654,-0.00021262952349,-0.00021265499464,-0.000212682972316,-0.000212710882229,-0.000212735670465,-0.000212756752847,-0.000212775092851,-0.000212793052718,-0.000212810769648,-0.000212831713964,-0.000212860409139,-0.000212895331282,-0.000212936296288,-0.000212987040428,-0.000213049572632,-0.000213127553174,-0.000213222064191,-0.000213334082113,-0.000213459161368,-0.000213592513067,-0.000213731632991,-0.000213875346183,-0.000214020464781,-0.000214165579961,-0.000214309693823,-0.000214452776398,-0.000214590066899,-0.000214714034861,-0.000214822188104,-0.000214918423117,-0.000215004637231,-0.000215078882191,-0.000215138838903,-0.000215184157007,-0.000215212959762,-0.000215220334997,-0.000215209543958,-0.000215184117802,-0.000215149365953,-0.000215104257423,-0.000215044549229,-0.000214972772908,-0.000214892073299,-0.000214801714723,-0.000214703873188,-0.000214604294105,-0.000214505904045,-0.000214409820841,-0.000214316018013,-0.000214224927034,-0.000214140651103,-0.000214063112266,-0.000213990493167,-0.000213924375239,-0.000213865614419,-0.000213812121239,-0.00021375679212,-0.000213692233786,-0.00021361365347,-0.0002135209369,-0.00021340906281,-0.000213277371385,-0.000213123500602,-0.00021294564225,-0.000212742930545,-0.000212516987207,-0.00021226895994,-0.000212009748897,-0.000211747164195,-0.000211481135204,-0.000211214385294,-0.000210948730611,-0.000210690731587,-0.000210443445961,-0.000210205962289,-0.000209974601436,-0.000209749174795,-0.0002095268323,-0.000209298704921,-0.000209066042184,-0.000208828880501,-0.000208583285578,-0.000208327150474,-0.000208054932982,-0.000207769968718,-0.000207471742371,-0.000207162263502,-0.000206837379516,-0.000206499472276,-0.000206147247672,-0.000205778359147,-0.000205395257573,-0.000204998257308,-0.00020458916312,-0.000204162352505,-0.000203717817402,-0.000203255115047,-0.000202777573736,-0.000202288340456,-0.000201786936206,-0.000201277630346,-0.000200764847501,-0.000200249370261,-0.000199737455333,-0.000199232636266,-0.000198738110785,-0.00019825413931,-0.000197786013112,-0.000197334048583,-0.00019689738026,-0.000196472851309,-0.000196053776585,-0.000195633405887,-0.000195206886146,-0.000194769782511,-0.000194319898391,-0.000193859211057,-0.000193380522149,-0.000192879337855,-0.000192353089785,-0.000191806393159,-0.000191243032671,-0.000190667651077,-0.000190078183153,-0.000189480388536,-0.000188874812101,-0.000188262722872,-0.000187647223566,-0.000187034280457,-0.000186429463645,-0.000185829692751,-0.000185234726665,-0.000184647633194,-0.000184071098918,-0.000183507182511,-0.000182951698261,-0.000182402712464,-0.000181856081484,-0.00018130586042,-0.000180747547615,-0.000180178015589,-0.00017959716014,-0.000178995503411,-0.000178366380943,-0.000177709064225,-0.000177023707608,-0.000176311146464,-0.000175569395327,-0.000174801029609,-0.000174006454587,-0.000173189212323,-0.000172349237903,-0.000171487668368,-0.000170613063871,-0.000169722464157,-0.000168813885747,-0.000167887954207,-0.000166947794619,-0.00016599329643,-0.000165027757184,-0.00016404947204,-0.00016305917321,-0.000162058439659,-0.000161052308274,-0.000160042028983,-0.000159036259723,-0.000158035141404,-0.000157041494371,-0.000156056955103,-0.000155083877946,-0.000154121802467,-0.000153170604573,-0.000152234132348,-0.000151303751435,-0.000150374534532,-0.000149445189393,-0.000148514191308,-0.000147580039043,-0.000146636179731,-0.000145678989081,-0.000144712107916,-0.000143737213548,-0.000142756139251,-0.00014177114364,-0.000140790285033,-0.000139813433462,-0.000138835940448,-0.000137856038567,-0.000136877154943,-0.000135903524313,-0.000134933874262,-0.000133962453154,-0.000132985483583,-0.000132004664519,-0.000131015351985,-0.000130014566289,-0.000129007319328,-0.000127996869081,-0.000126987300389,-0.000125976441885,-0.000124960523726,-0.000123945771269,-0.000122937650868,-0.000121932039409,-0.000120925547002,-0.000119919220076,-0.000118913790025,-0.000117911180459,-0.000116911983396,-0.000115915045747,-0.000114925720779,-0.000113947728201,-0.000112976210674,-0.000112011656176,-0.000111060330195,-0.000110128592854,-0.000109214881384,-0.000108319373141,-0.000107434821941,-0.000106558357488,-0.000105688630869,-0.00010481837298,-0.000103949093639,-0.000103080699575,-0.000102214411497,-0.000101345349581,-0.000100470224691,-9.95852424999e-05,-9.86940376269e-05,-9.78040826039e-05,-9.69199515132e-05,-9.60395940714e-05,-9.51649349486e-05,-9.4296756849e-05,-9.34319241035e-05,-9.25664005535e-05,-9.17042152837e-05,-9.08477751216e-05,-8.99990335226e-05,-8.9155096242e-05,-8.83091988432e-05,-8.74647368372e-05,-8.66216583751e-05,-8.57816856503e-05,-8.49435097637e-05,-8.41130909168e-05,-8.32884753022e-05,-8.24692756825e-05,-8.16528956817e-05,-8.08398045328e-05,-8.00274553099e-05,-7.92153447227e-05,-7.83967310692e-05,-7.75732353165e-05,-7.67427452989e-05,-7.59007903118e-05,-7.50439035421e-05,-7.41707766967e-05,-7.32800230671e-05,-7.23731322717e-05,-7.14479280883e-05,-7.05082576683e-05,-6.95576696271e-05,-6.85913268827e-05,-6.76068300481e-05,-6.66033995167e-05,-6.55892658601e-05,-6.45637130814e-05,-6.35282037629e-05,-6.24764184896e-05,-6.14098994923e-05,-6.03240737647e-05,-5.92166609625e-05,-5.80895094631e-05,-5.69483285956e-05,-5.57973652033e-05,-5.46312661213e-05,-5.34438542326e-05,-5.22346977838e-05,-5.10005742721e-05,-4.97447257369e-05,-4.84595972362e-05,-4.71469290254e-05,-4.58010542482e-05,-4.4413898128e-05,-4.29784002825e-05,-4.14886743897e-05,-3.99452526842e-05,-3.83421104111e-05,-3.66785893622e-05,-3.4954625292e-05,-3.31707878098e-05,-3.13268670275e-05,-2.94192764726e-05,-2.74478582989e-05,-2.5412757759e-05,-2.33151418689e-05,-2.11528071862e-05,-1.89257530479e-05,-1.66361862955e-05,-1.42781252847e-05,-1.18485482197e-05,-9.34336302866e-06,-6.76158436036e-06,-4.10276811365e-06,-1.35333210037e-06,1.5018919474e-06,4.4750723247e-06,7.57458339821e-06,1.08551564179e-05,1.41728218485e-05,1.75694362686e-05,2.10542650758e-05,2.46461245381e-05,2.83612524301e-05,3.22107069591e-05,3.6194372897e-05,4.03094746444e-05,4.45615752189e-05,4.89500789171e-05,5.34340758772e-05,5.81699707064e-05,6.31287370463e-05,6.83077023475e-05,7.37013184761e-05,7.93095947897e-05,8.5127608899e-05,9.11529928951e-05,9.7380796711e-05,0.000103805634444,0.000110423163099,0.000117226553607,0.000124209568334,0.000131360195731,0.000138674464996,0.000146141231568,0.000153746069369,0.000161482073393,0.000169342502447,0.000177325054895,0.000185422909123,0.000193634814663,0.000201959101845,0.000210398353394,0.000218957030035,0.000227635016415,0.000236436817388,0.000245365473173,0.000254425969296,0.0002636154005,0.00027293609656,0.000282386950204,0.000291965076653,0.000301662227773,0.00031146628033,0.000321364213499,0.000331352970494,0.000341423634471,0.000351559079088,0.000361747306592,0.000371978105303,0.000382235545613,0.000392506973445,0.000402783612195,0.000413055120526,0.000423321110226,0.000433570460604,0.000443791246779,0.00045397941342,0.000464135714508,0.000474252433954,0.000484328511359,0.000494365310686,0.000504365144035,0.000514328631804,0.000524252323958,0.000534125925338,0.000543947442,0.000553707211422,0.000563393531319,0.000572999982466,0.000582513089155,0.000591915643321,0.000601185998351,0.000610302331366,0.000619245954212,0.000628005298313,0.000636565507521,0.000644919345798,0.000653053628625,0.000660951073201,0.000668601004569,0.000675997803121,0.000683137087936,0.0006900195722,0.000696644493959,0.000703009066511,0.000709113792239,0.000714954669952,0.000720526957836,0.000725834342949,0.000730884579348,0.000735681107897,0.000740226138767,0.000744519643515,0.000748559276191,0.000752343009344,0.000755865179107,0.000759124096528,0.00076212424353,0.000764867102242,0.000767348037177,0.000769553451963,0.000771477311018,0.000773116418547,0.000774470703716,0.000775545220542,0.000776341682414,0.000776864770577,0.000777118605881,0.000777102689639,0.00077681928545,0.000776284715091,0.000775514235866,0.000774513905332,0.000773292533182,0.000771854400335,0.000770208198098,0.000768357403965,0.000766307183333,0.000764059167023,0.000761617999565,0.000758986488665,0.000756160342664,0.00075314343844,0.000749937296815,0.000746541465834,0.000742954874853,0.000739180907169,0.000735221365254,0.000731085030423,0.000726778379921,0.000722303901509,0.000717667567448,0.000712872979056,0.000707923598511,0.000702831304043,0.000697608722916,0.00069226510587,0.000686799841953,0.00068122272639,0.00067553823798,0.000669753578307,0.000663879689137,0.00065792488844,0.000651899110063,0.000645808153756,0.000639650554169,0.000633430029787,0.000627161079688,0.000620847943256,0.00061449615666,0.000608110256624,0.000601689766185,0.000595241038964,0.000588765004941,0.000582263152939,0.000575738882119,0.000569199435403,0.000562646618685,0.000556078076448,0.000549497099862,0.000542908046216,0.000536313347908,0.000529714892567,0.00052311551014,0.000516520919281,0.000509939601398,0.000503371579443,0.000496816987534,0.000490280961909,0.000483768630542,0.000477285764523,0.000470836121195,0.000464428324971,0.00045806989847,0.000451761110559,0.000445500977137,0.000439294985867,0.000433150769962,0.000427075552662,0.000421071472885,0.000415136500326,0.000409272214662,0.000403473328964,0.000397731549708,0.000392049734208,0.000386427512488,0.000380860077377,0.000375343309348,0.000369875332763,0.000364451880769,0.000359071823006,0.000353733499403,0.00034843844921,0.000343193393094,0.000338000664381,0.000332858328184,0.000327769819355,0.0003227424438,0.000317771788028,0.00031285763409,0.000308002249728,0.000303210980127,0.000298487650003,0.000293830693339,0.000289236461417,0.000284709203797,0.00028024753508,0.000275848142366,0.000271515071415,0.000267250816452,0.00026305699128,0.000258929188461,0.000254863868101,0.0002508626044,0.000246923716698,0.00024304687223,0.000239231553521,0.000235476062617,0.000231782956655,0.000228150458284,0.000224579238638,0.000221073621365,0.000217632678132,0.00021425144561,0.000210933353838,0.000207680767392,0.000204496525945,0.000201381865581,0.000198334805755,0.00019535539328,0.000192435288243,0.000189564397839,0.000186738528401,0.000183965265533,0.000181239109368,0.000178556991905,0.000175913577975,0.000173303517542,0.000170720988975,0.000168165342379,0.000165635748949,0.000163139626051,0.000160682323709,0.00015825826868,0.000155865178542,0.000153500514321,0.000151162192241,0.000148850615803,0.000146566526335,0.000144309870091,0.000142082960676,0.000139883901076,0.000137711031863,0.000135564464996,0.000133447503345,0.000131361361645,0.00012930850834,0.000127288739545,0.000125299128299,0.000123338531439,0.000121404802315,0.000119490794036,0.000117593250422,0.000115707946847,0.000113828754779,0.000111950989026,0.000110075398326,0.000108202286515,0.000106332831297,0.00010446978047,0.000102610465249,0.000100760967009,9.89268107952e-05,9.71093483472e-05,9.53112222747e-05,9.35385286224e-05,9.17887366062e-05,9.00556693417e-05,8.83378345029e-05,8.66324117902e-05,8.49427110135e-05,8.32688803741e-05,8.16003307174e-05,7.99355575729e-05,7.82722138201e-05,7.66063815927e-05,7.49357424461e-05,7.32621862425e-05,7.1583863338e-05,6.98999639649e-05,6.82034357432e-05,6.64859026615e-05,6.47491142723e-05,6.29923151903e-05,6.12157518925e-05,5.94176700871e-05,5.7597314666e-05,5.57545480372e-05,5.38947672144e-05,5.20150511374e-05,5.01180547694e-05,4.8208060903e-05,4.62872164279e-05,4.43558884828e-05,4.24144360068e-05,4.04621452072e-05,3.84984961284e-05,3.65186717259e-05,3.45148375766e-05,3.24827608075e-05,3.04252738632e-05,2.83402157172e-05,2.62242714358e-05,2.40779564532e-05,2.19013895548e-05,1.96939038429e-05,1.74536245922e-05,1.51852370345e-05,1.28946401603e-05,1.05890052499e-05,8.26556424462e-06,5.92748440504e-06,3.5810188022e-06,1.22544934873e-06,-1.13863504619e-06,-3.5054646855e-06,-5.87328852154e-06,-8.23688192431e-06,-1.05967214164e-05,-1.29512902363e-05,-1.5298012474e-05,-1.76341545181e-05,-1.99675955804e-05,-2.22977116397e-05,-2.46221119428e-05,-2.69432445655e-05,-2.92612667625e-05,-3.15759528118e-05,-3.38911609665e-05,-3.62126339061e-05,-3.85385584579e-05,-4.08695337231e-05,-4.32034839653e-05,-4.55364674322e-05,-4.78705632071e-05,-5.02030152648e-05,-5.25294791473e-05,-5.48557045412e-05,-5.71748573433e-05,-5.94784155246e-05,-6.17634456808e-05,-6.40315203422e-05,-6.62791760991e-05,-6.85038613682e-05,-7.07085614678e-05,-7.28951202784e-05,-7.50670044283e-05,-7.72247563039e-05,-7.93719049858e-05,-8.1514326627e-05,-8.36605015767e-05,-8.58106586055e-05,-8.79663708265e-05,-9.01316327977e-05,-9.23025396845e-05,-9.44743823919e-05,-9.66429681365e-05,-9.8805453569e-05,-0.000100959234802,-0.000103100004917,-0.00010522193348,-0.000107320026546,-0.000109391526454,-0.000111437435622,-0.00011345681521,-0.000115454926801,-0.000117428269202,-0.000119375143455,-0.000121291944493,-0.000123180176998,-0.00012503479729,-0.000126858668256,-0.000128655508622,-0.000130419964705,-0.000132146125487,-0.000133835529685,-0.000135489897178,-0.00013711573715,-0.000138715326042,-0.000140287369095,-0.000141838919256,-0.000143373578212,-0.000144887684894,-0.000146383674168,-0.000147868898448,-0.000149341261099,-0.000150802640717,-0.000152244729953,-0.000153667039322,-0.00015507277804,-0.000156466135606,-0.000157838078405,-0.000159188060011,-0.00016051663298,-0.000161822564561,-0.000163102227923,-0.000164358318095,-0.000165590851964,-0.000166806991191,-0.00016800361651,-0.00016917457223,-0.000170322093093,-0.000171448356519,-0.000172555162464,-0.000173646108757,-0.000174723519763,-0.000175789945812,-0.000176846151677,-0.000177889684026,-0.000178922871251,-0.000179946024995,-0.000180965074973,-0.00018198161141,-0.000182999271422,-0.000184012636222,-0.000185017695142,-0.000186010673983,-0.000186991816159,-0.000187961912012,-0.000188918301225,-0.000189860116421,-0.000190782022494,-0.00019168153939,-0.000192553872905,-0.000193398673459,-0.000194227022242,-0.000195040105375,-0.00019583912153,-0.000196622483928,-0.000197393158448,-0.000198154311019,-0.000198906803428,-0.000199655367215,-0.000200402251848,-0.00020114946981,-0.00020189222108,-0.000202628436457,-0.000203360519628,-0.000204086302235,-0.000204805451307,-0.000205515849237,-0.000206217906023,-0.000206911403796,-0.000207595828601,-0.000208269925715,-0.000208931763654,-0.000209580823071,-0.000210213451985,-0.00021083246966,-0.000211438485385,-0.000212032108154,-0.000212618272586,-0.000213191805761,-0.000213748431123,-0.000214291654147,-0.000214823768973,-0.0002153496337,-0.000215870157934,-0.000216381239067,-0.000216884134334,-0.000217378030959,-0.000217861273945,-0.000218329248084,-0.000218787470589,-0.0002192382771,-0.000219677235772,-0.000220098430182,-0.000220504396207,-0.000220899434402,-0.000221283655691,-0.000221652562078,-0.000222006426894,-0.000222348085821,-0.000222682690364,-0.000223004252947,-0.000223315306302,-0.000223619920871,-0.000223920192315,-0.000224212586802,-0.000224496424899,-0.000224775909035,-0.00022505033555,-0.000225321816958,-0.000225586389986,-0.000225843561837,-0.000226095906488,-0.000226343185597,-0.00022658320324,-0.000226816120753,-0.000227040936628,-0.000227256208744,-0.000227463206037,-0.000227664199536,-0.000227860089372,-0.000228055766812,-0.000228246126988,-0.000228428326502,-0.000228603315325,-0.000228769823432,-0.000228928452954,-0.000229080550251,-0.000229228535824,-0.000229373456183,-0.000229513927847,-0.000229646734917,-0.000229775928864,-0.000229908363244,-0.000230043060197,-0.000230181486228,-0.000230327640035,-0.000230480867067,-0.000230636093173,-0.000230792220117,-0.000230947126208,-0.000231103517581,-0.000231263840627,-0.000231416216312,-0.000231559984247,-0.000231701076556,-0.000231834103785,-0.000231957393869,-0.000232073568804,-0.00023218387092,-0.000232285998147,-0.000232375686949,-0.000232446672203,-0.000232502347467,-0.000232546371894,-0.000232571042094,-0.000232578857718,-0.000232571538412,-0.00023255037319,-0.000232516095091,-0.000232469889721,-0.000232417821524,-0.00023236378746,-0.000232313307074,-0.00023226337135,-0.000232221107935,-0.000232185753812,-0.000232156942595,-0.000232133075142,-0.000232110211926,-0.000232085786847,-0.000232054790372,-0.000232016723184,-0.000231968362672,-0.000231906655208,-0.000231825226484,-0.000231720215395,-0.000231595823398,-0.000231453160396,-0.000231293380517,-0.000231120562635,-0.000230938918636,-0.000230748017128,-0.000230546134639,-0.000230332486208,-0.000230109353211,-0.000229885278744,-0.000229659819623,-0.000229429149584,-0.00022918941669,-0.000228943850924,-0.000228689460871,-0.000228423077606,-0.000228152679824,-0.000227882825832,-0.000227620701031,-0.000227363785943,-0.00022710366682,-0.000226841934306,-0.000226580472188,-0.000226316725626,-0.000226047877293,-0.000225778674356,-0.000225506244613,-0.00022522215049,-0.000224915255496,-0.000224576451505,-0.000224212228217,-0.000223821937053,-0.000223403998604,-0.000222955228609,-0.000222473673313,-0.000221953822752,-0.000221388315676,-0.000220781600461,-0.000220212072402,-0.000219756456556,-0.000219421943441,-0.000219200982584,-0.00021909290798)
xcorr <- c(-600.0,-598.999165972,-597.998331943,-596.997497915,-595.996663887,-594.995829858,-593.99499583,-592.994161802,-591.993327773,-590.992493745,-589.991659716,-588.990825688,-587.98999166,-586.989157631,-585.988323603,-584.987489575,-583.986655546,-582.985821518,-581.98498749,-580.984153461,-579.983319433,-578.982485405,-577.981651376,-576.980817348,-575.979983319,-574.979149291,-573.978315263,-572.977481234,-571.976647206,-570.975813178,-569.974979149,-568.974145121,-567.973311093,-566.972477064,-565.971643036,-564.970809008,-563.969974979,-562.969140951,-561.968306922,-560.967472894,-559.966638866,-558.965804837,-557.964970809,-556.964136781,-555.963302752,-554.962468724,-553.961634696,-552.960800667,-551.959966639,-550.959132611,-549.958298582,-548.957464554,-547.956630525,-546.955796497,-545.954962469,-544.95412844,-543.953294412,-542.952460384,-541.951626355,-540.950792327,-539.949958299,-538.94912427,-537.948290242,-536.947456214,-535.946622185,-534.945788157,-533.944954128,-532.9441201,-531.943286072,-530.942452043,-529.941618015,-528.940783987,-527.939949958,-526.93911593,-525.938281902,-524.937447873,-523.936613845,-522.935779817,-521.934945788,-520.93411176,-519.933277731,-518.932443703,-517.931609675,-516.930775646,-515.929941618,-514.92910759,-513.928273561,-512.927439533,-511.926605505,-510.925771476,-509.924937448,-508.92410342,-507.923269391,-506.922435363,-505.921601334,-504.920767306,-503.919933278,-502.919099249,-501.918265221,-500.917431193,-499.916597164,-498.915763136,-497.914929108,-496.914095079,-495.913261051,-494.912427023,-493.911592994,-492.910758966,-491.909924937,-490.909090909,-489.908256881,-488.907422852,-487.906588824,-486.905754796,-485.904920767,-484.904086739,-483.903252711,-482.902418682,-481.901584654,-480.900750626,-479.899916597,-478.899082569,-477.89824854,-476.897414512,-475.896580484,-474.895746455,-473.894912427,-472.894078399,-471.89324437,-470.892410342,-469.891576314,-468.890742285,-467.889908257,-466.889074229,-465.8882402,-464.887406172,-463.886572143,-462.885738115,-461.884904087,-460.884070058,-459.88323603,-458.882402002,-457.881567973,-456.880733945,-455.879899917,-454.879065888,-453.87823186,-452.877397832,-451.876563803,-450.875729775,-449.874895746,-448.874061718,-447.87322769,-446.872393661,-445.871559633,-444.870725605,-443.869891576,-442.869057548,-441.86822352,-440.867389491,-439.866555463,-438.865721435,-437.864887406,-436.864053378,-435.863219349,-434.862385321,-433.861551293,-432.860717264,-431.859883236,-430.859049208,-429.858215179,-428.857381151,-427.856547123,-426.855713094,-425.854879066,-424.854045038,-423.853211009,-422.852376981,-421.851542952,-420.850708924,-419.849874896,-418.849040867,-417.848206839,-416.847372811,-415.846538782,-414.845704754,-413.844870726,-412.844036697,-411.843202669,-410.842368641,-409.841534612,-408.840700584,-407.839866555,-406.839032527,-405.838198499,-404.83736447,-403.836530442,-402.835696414,-401.834862385,-400.834028357,-399.833194329,-398.8323603,-397.831526272,-396.830692244,-395.829858215,-394.829024187,-393.828190158,-392.82735613,-391.826522102,-390.825688073,-389.824854045,-388.824020017,-387.823185988,-386.82235196,-385.821517932,-384.820683903,-383.819849875,-382.819015847,-381.818181818,-380.81734779,-379.816513761,-378.815679733,-377.814845705,-376.814011676,-375.813177648,-374.81234362,-373.811509591,-372.810675563,-371.809841535,-370.809007506,-369.808173478,-368.80733945,-367.806505421,-366.805671393,-365.804837364,-364.804003336,-363.803169308,-362.802335279,-361.801501251,-360.800667223,-359.799833194,-358.798999166,-357.798165138,-356.797331109,-355.796497081,-354.795663053,-353.794829024,-352.793994996,-351.793160967,-350.792326939,-349.791492911,-348.790658882,-347.789824854,-346.788990826,-345.788156797,-344.787322769,-343.786488741,-342.785654712,-341.784820684,-340.783986656,-339.783152627,-338.782318599,-337.78148457,-336.780650542,-335.779816514,-334.778982485,-333.778148457,-332.777314429,-331.7764804,-330.775646372,-329.774812344,-328.773978315,-327.773144287,-326.772310259,-325.77147623,-324.770642202,-323.769808173,-322.768974145,-321.768140117,-320.767306088,-319.76647206,-318.765638032,-317.764804003,-316.763969975,-315.763135947,-314.762301918,-313.76146789,-312.760633862,-311.759799833,-310.758965805,-309.758131776,-308.757297748,-307.75646372,-306.755629691,-305.754795663,-304.753961635,-303.753127606,-302.752293578,-301.75145955,-300.750625521,-299.749791493,-298.748957465,-297.748123436,-296.747289408,-295.746455379,-294.745621351,-293.744787323,-292.743953294,-291.743119266,-290.742285238,-289.741451209,-288.740617181,-287.739783153,-286.738949124,-285.738115096,-284.737281068,-283.736447039,-282.735613011,-281.734778982,-280.733944954,-279.733110926,-278.732276897,-277.731442869,-276.730608841,-275.729774812,-274.728940784,-273.728106756,-272.727272727,-271.726438699,-270.725604671,-269.724770642,-268.723936614,-267.723102585,-266.722268557,-265.721434529,-264.7206005,-263.719766472,-262.718932444,-261.718098415,-260.717264387,-259.716430359,-258.71559633,-257.714762302,-256.713928274,-255.713094245,-254.712260217,-253.711426188,-252.71059216,-251.709758132,-250.708924103,-249.708090075,-248.707256047,-247.706422018,-246.70558799,-245.704753962,-244.703919933,-243.703085905,-242.702251877,-241.701417848,-240.70058382,-239.699749791,-238.698915763,-237.698081735,-236.697247706,-235.696413678,-234.69557965,-233.694745621,-232.693911593,-231.693077565,-230.692243536,-229.691409508,-228.69057548,-227.689741451,-226.688907423,-225.688073394,-224.687239366,-223.686405338,-222.685571309,-221.684737281,-220.683903253,-219.683069224,-218.682235196,-217.681401168,-216.680567139,-215.679733111,-214.678899083,-213.678065054,-212.677231026,-211.676396997,-210.675562969,-209.674728941,-208.673894912,-207.673060884,-206.672226856,-205.671392827,-204.670558799,-203.669724771,-202.668890742,-201.668056714,-200.667222686,-199.666388657,-198.665554629,-197.664720601,-196.663886572,-195.663052544,-194.662218515,-193.661384487,-192.660550459,-191.65971643,-190.658882402,-189.658048374,-188.657214345,-187.656380317,-186.655546289,-185.65471226,-184.653878232,-183.653044204,-182.652210175,-181.651376147,-180.650542118,-179.64970809,-178.648874062,-177.648040033,-176.647206005,-175.646371977,-174.645537948,-173.64470392,-172.643869892,-171.643035863,-170.642201835,-169.641367807,-168.640533778,-167.63969975,-166.638865721,-165.638031693,-164.637197665,-163.636363636,-162.635529608,-161.63469558,-160.633861551,-159.633027523,-158.632193495,-157.631359466,-156.630525438,-155.62969141,-154.628857381,-153.628023353,-152.627189324,-151.626355296,-150.625521268,-149.624687239,-148.623853211,-147.623019183,-146.622185154,-145.621351126,-144.620517098,-143.619683069,-142.618849041,-141.618015013,-140.617180984,-139.616346956,-138.615512927,-137.614678899,-136.613844871,-135.613010842,-134.612176814,-133.611342786,-132.610508757,-131.609674729,-130.608840701,-129.608006672,-128.607172644,-127.606338616,-126.605504587,-125.604670559,-124.60383653,-123.603002502,-122.602168474,-121.601334445,-120.600500417,-119.599666389,-118.59883236,-117.597998332,-116.597164304,-115.596330275,-114.595496247,-113.594662219,-112.59382819,-111.592994162,-110.592160133,-109.591326105,-108.590492077,-107.589658048,-106.58882402,-105.587989992,-104.587155963,-103.586321935,-102.585487907,-101.584653878,-100.58381985,-99.5829858215,-98.5821517932,-97.5813177648,-96.5804837364,-95.5796497081,-94.5788156797,-93.5779816514,-92.577147623,-91.5763135947,-90.5754795663,-89.5746455379,-88.5738115096,-87.5729774812,-86.5721434529,-85.5713094245,-84.5704753962,-83.5696413678,-82.5688073394,-81.5679733111,-80.5671392827,-79.5663052544,-78.565471226,-77.5646371977,-76.5638031693,-75.562969141,-74.5621351126,-73.5613010842,-72.5604670559,-71.5596330275,-70.5587989992,-69.5579649708,-68.5571309425,-67.5562969141,-66.5554628857,-65.5546288574,-64.553794829,-63.5529608007,-62.5521267723,-61.551292744,-60.5504587156,-59.5496246872,-58.5487906589,-57.5479566305,-56.5471226022,-55.5462885738,-54.5454545455,-53.5446205171,-52.5437864887,-51.5429524604,-50.542118432,-49.5412844037,-48.5404503753,-47.539616347,-46.5387823186,-45.5379482902,-44.5371142619,-43.5362802335,-42.5354462052,-41.5346121768,-40.5337781485,-39.5329441201,-38.5321100917,-37.5312760634,-36.530442035,-35.5296080067,-34.5287739783,-33.52793995,-32.5271059216,-31.5262718932,-30.5254378649,-29.5246038365,-28.5237698082,-27.5229357798,-26.5221017515,-25.5212677231,-24.5204336947,-23.5195996664,-22.518765638,-21.5179316097,-20.5170975813,-19.516263553,-18.5154295246,-17.5145954962,-16.5137614679,-15.5129274395,-14.5120934112,-13.5112593828,-12.5104253545,-11.5095913261,-10.5087572977,-9.50792326939,-8.50708924103,-7.50625521268,-6.50542118432,-5.50458715596,-4.50375312761,-3.50291909925,-2.50208507089,-1.50125104254,-0.500417014179,0.500417014178,1.50125104254,2.50208507089,3.50291909925,4.50375312761,5.50458715596,6.50542118432,7.50625521268,8.50708924103,9.50792326939,10.5087572977,11.5095913261,12.5104253545,13.5112593828,14.5120934112,15.5129274395,16.5137614679,17.5145954962,18.5154295246,19.516263553,20.5170975813,21.5179316097,22.518765638,23.5195996664,24.5204336947,25.5212677231,26.5221017515,27.5229357798,28.5237698082,29.5246038365,30.5254378649,31.5262718932,32.5271059216,33.52793995,34.5287739783,35.5296080067,36.530442035,37.5312760634,38.5321100917,39.5329441201,40.5337781485,41.5346121768,42.5354462052,43.5362802335,44.5371142619,45.5379482902,46.5387823186,47.539616347,48.5404503753,49.5412844037,50.542118432,51.5429524604,52.5437864887,53.5446205171,54.5454545455,55.5462885738,56.5471226022,57.5479566305,58.5487906589,59.5496246872,60.5504587156,61.551292744,62.5521267723,63.5529608007,64.553794829,65.5546288574,66.5554628857,67.5562969141,68.5571309425,69.5579649708,70.5587989992,71.5596330275,72.5604670559,73.5613010842,74.5621351126,75.562969141,76.5638031693,77.5646371977,78.565471226,79.5663052544,80.5671392827,81.5679733111,82.5688073394,83.5696413678,84.5704753962,85.5713094245,86.5721434529,87.5729774812,88.5738115096,89.5746455379,90.5754795663,91.5763135947,92.577147623,93.5779816514,94.5788156797,95.5796497081,96.5804837364,97.5813177648,98.5821517932,99.5829858215,100.58381985,101.584653878,102.585487907,103.586321935,104.587155963,105.587989992,106.58882402,107.589658048,108.590492077,109.591326105,110.592160133,111.592994162,112.59382819,113.594662219,114.595496247,115.596330275,116.597164304,117.597998332,118.59883236,119.599666389,120.600500417,121.601334445,122.602168474,123.603002502,124.60383653,125.604670559,126.605504587,127.606338616,128.607172644,129.608006672,130.608840701,131.609674729,132.610508757,133.611342786,134.612176814,135.613010842,136.613844871,137.614678899,138.615512927,139.616346956,140.617180984,141.618015013,142.618849041,143.619683069,144.620517098,145.621351126,146.622185154,147.623019183,148.623853211,149.624687239,150.625521268,151.626355296,152.627189324,153.628023353,154.628857381,155.62969141,156.630525438,157.631359466,158.632193495,159.633027523,160.633861551,161.63469558,162.635529608,163.636363636,164.637197665,165.638031693,166.638865721,167.63969975,168.640533778,169.641367807,170.642201835,171.643035863,172.643869892,173.64470392,174.645537948,175.646371977,176.647206005,177.648040033,178.648874062,179.64970809,180.650542118,181.651376147,182.652210175,183.653044204,184.653878232,185.65471226,186.655546289,187.656380317,188.657214345,189.658048374,190.658882402,191.65971643,192.660550459,193.661384487,194.662218515,195.663052544,196.663886572,197.664720601,198.665554629,199.666388657,200.667222686,201.668056714,202.668890742,203.669724771,204.670558799,205.671392827,206.672226856,207.673060884,208.673894912,209.674728941,210.675562969,211.676396997,212.677231026,213.678065054,214.678899083,215.679733111,216.680567139,217.681401168,218.682235196,219.683069224,220.683903253,221.684737281,222.685571309,223.686405338,224.687239366,225.688073394,226.688907423,227.689741451,228.69057548,229.691409508,230.692243536,231.693077565,232.693911593,233.694745621,234.69557965,235.696413678,236.697247706,237.698081735,238.698915763,239.699749791,240.70058382,241.701417848,242.702251877,243.703085905,244.703919933,245.704753962,246.70558799,247.706422018,248.707256047,249.708090075,250.708924103,251.709758132,252.71059216,253.711426188,254.712260217,255.713094245,256.713928274,257.714762302,258.71559633,259.716430359,260.717264387,261.718098415,262.718932444,263.719766472,264.7206005,265.721434529,266.722268557,267.723102585,268.723936614,269.724770642,270.725604671,271.726438699,272.727272727,273.728106756,274.728940784,275.729774812,276.730608841,277.731442869,278.732276897,279.733110926,280.733944954,281.734778982,282.735613011,283.736447039,284.737281068,285.738115096,286.738949124,287.739783153,288.740617181,289.741451209,290.742285238,291.743119266,292.743953294,293.744787323,294.745621351,295.746455379,296.747289408,297.748123436,298.748957465,299.749791493,300.750625521,301.75145955,302.752293578,303.753127606,304.753961635,305.754795663,306.755629691,307.75646372,308.757297748,309.758131776,310.758965805,311.759799833,312.760633862,313.76146789,314.762301918,315.763135947,316.763969975,317.764804003,318.765638032,319.76647206,320.767306088,321.768140117,322.768974145,323.769808173,324.770642202,325.77147623,326.772310259,327.773144287,328.773978315,329.774812344,330.775646372,331.7764804,332.777314429,333.778148457,334.778982485,335.779816514,336.780650542,337.78148457,338.782318599,339.783152627,340.783986656,341.784820684,342.785654712,343.786488741,344.787322769,345.788156797,346.788990826,347.789824854,348.790658882,349.791492911,350.792326939,351.793160967,352.793994996,353.794829024,354.795663053,355.796497081,356.797331109,357.798165138,358.798999166,359.799833194,360.800667223,361.801501251,362.802335279,363.803169308,364.804003336,365.804837364,366.805671393,367.806505421,368.80733945,369.808173478,370.809007506,371.809841535,372.810675563,373.811509591,374.81234362,375.813177648,376.814011676,377.814845705,378.815679733,379.816513761,380.81734779,381.818181818,382.819015847,383.819849875,384.820683903,385.821517932,386.82235196,387.823185988,388.824020017,389.824854045,390.825688073,391.826522102,392.82735613,393.828190158,394.829024187,395.829858215,396.830692244,397.831526272,398.8323603,399.833194329,400.834028357,401.834862385,402.835696414,403.836530442,404.83736447,405.838198499,406.839032527,407.839866555,408.840700584,409.841534612,410.842368641,411.843202669,412.844036697,413.844870726,414.845704754,415.846538782,416.847372811,417.848206839,418.849040867,419.849874896,420.850708924,421.851542952,422.852376981,423.853211009,424.854045038,425.854879066,426.855713094,427.856547123,428.857381151,429.858215179,430.859049208,431.859883236,432.860717264,433.861551293,434.862385321,435.863219349,436.864053378,437.864887406,438.865721435,439.866555463,440.867389491,441.86822352,442.869057548,443.869891576,444.870725605,445.871559633,446.872393661,447.87322769,448.874061718,449.874895746,450.875729775,451.876563803,452.877397832,453.87823186,454.879065888,455.879899917,456.880733945,457.881567973,458.882402002,459.88323603,460.884070058,461.884904087,462.885738115,463.886572143,464.887406172,465.8882402,466.889074229,467.889908257,468.890742285,469.891576314,470.892410342,471.89324437,472.894078399,473.894912427,474.895746455,475.896580484,476.897414512,477.89824854,478.899082569,479.899916597,480.900750626,481.901584654,482.902418682,483.903252711,484.904086739,485.904920767,486.905754796,487.906588824,488.907422852,489.908256881,490.909090909,491.909924937,492.910758966,493.911592994,494.912427023,495.913261051,496.914095079,497.914929108,498.915763136,499.916597164,500.917431193,501.918265221,502.919099249,503.919933278,504.920767306,505.921601334,506.922435363,507.923269391,508.92410342,509.924937448,510.925771476,511.926605505,512.927439533,513.928273561,514.92910759,515.929941618,516.930775646,517.931609675,518.932443703,519.933277731,520.93411176,521.934945788,522.935779817,523.936613845,524.937447873,525.938281902,526.93911593,527.939949958,528.940783987,529.941618015,530.942452043,531.943286072,532.9441201,533.944954128,534.945788157,535.946622185,536.947456214,537.948290242,538.94912427,539.949958299,540.950792327,541.951626355,542.952460384,543.953294412,544.95412844,545.954962469,546.955796497,547.956630525,548.957464554,549.958298582,550.959132611,551.959966639,552.960800667,553.961634696,554.962468724,555.963302752,556.964136781,557.964970809,558.965804837,559.966638866,560.967472894,561.968306922,562.969140951,563.969974979,564.970809008,565.971643036,566.972477064,567.973311093,568.974145121,569.974979149,570.975813178,571.976647206,572.977481234,573.978315263,574.979149291,575.979983319,576.980817348,577.981651376,578.982485405,579.983319433,580.984153461,581.98498749,582.985821518,583.986655546,584.987489575,585.988323603,586.989157631,587.98999166,588.990825688,589.991659716,590.992493745,591.993327773,592.994161802,593.99499583,594.995829858,595.996663887,596.997497915,597.998331943,598.999165972,600.0)
altd  <- c(104)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('test_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 104',bty='n')
dev.off()