# R script for Peak Model
#  -- generated by MACS
p <- c(0.0312982725373,0.0360098404461,0.040721408355,0.0462743276761,0.0509858955849,0.0514907064323,0.0511541658674,0.0526685984095,0.052836868692,0.0526685984095,0.0525003281271,0.0533416795393,0.0536782201043,0.0540147606692,0.0550243823639,0.0548561120815,0.0558657337762,0.0553609229288,0.054687841799,0.0551926526464,0.054687841799,0.0533416795393,0.052836868692,0.0521637875621,0.0521637875621,0.0518272469972,0.0513224361498,0.0501445441726,0.0494714630428,0.0482935710656,0.0499762738902,0.0513224361498,0.0518272469972,0.0525003281271,0.0519955172797,0.0519955172797,0.0533416795393,0.0551926526464,0.0578849771657,0.0577167068833,0.056875355471,0.0563705446236,0.0558657337762,0.0543513012341,0.0550243823639,0.0541830309516,0.0535099498218,0.0525003281271,0.0501445441726,0.0514907064323,0.0516589767148,0.0514907064323,0.0519955172797,0.0535099498218,0.0536782201043,0.0541830309516,0.0526685984095,0.0531734092569,0.0545195715166,0.054687841799,0.0548561120815,0.0555291932113,0.0548561120815,0.0550243823639,0.0548561120815,0.0556974634938,0.0577167068833,0.0583897880131,0.0583897880131,0.056875355471,0.0563705446236,0.0562022743411,0.0583897880131,0.0588945988605,0.0593994097078,0.0583897880131,0.0578849771657,0.0575484366008,0.0582215177306,0.0582215177306,0.0585580582956,0.0580532474482,0.056875355471,0.054687841799,0.0530051389744,0.0531734092569,0.0525003281271,0.0525003281271,0.0513224361498,0.0516589767148,0.0514907064323,0.0519955172797,0.0525003281271,0.0551926526464,0.0553609229288,0.0556974634938,0.0556974634938,0.0562022743411,0.0580532474482,0.0585580582956,0.0590628691429,0.0602407611201,0.0600724908377,0.0590628691429,0.06091384225,0.0610821125324,0.0620917342272,0.0612503828149,0.058726328578,0.058726328578,0.0572118960359,0.0570436257534,0.0570436257534,0.0567070851885,0.0555291932113,0.0560340040587,0.0541830309516,0.0545195715166,0.0551926526464,0.0550243823639,0.0560340040587,0.0560340040587,0.0562022743411,0.0563705446236,0.054687841799,0.0541830309516,0.0570436257534,0.0562022743411,0.0563705446236,0.0567070851885,0.0573801663183,0.0575484366008,0.0582215177306,0.0580532474482,0.058726328578,0.0599042205552,0.0593994097078,0.0599042205552,0.0600724908377,0.0602407611201,0.0593994097078,0.0572118960359,0.0563705446236,0.0558657337762,0.058726328578,0.056875355471,0.0548561120815,0.0551926526464,0.0541830309516,0.0535099498218,0.0541830309516,0.0563705446236,0.0570436257534,0.0573801663183,0.0563705446236,0.0572118960359,0.0585580582956,0.058726328578,0.0605773016851,0.0610821125324,0.0614186530974,0.0607455719675,0.0617551936623,0.0615869233798,0.0610821125324,0.0617551936623,0.0614186530974,0.0612503828149,0.0605773016851,0.0593994097078,0.0600724908377,0.0602407611201,0.0583897880131,0.0593994097078,0.0593994097078,0.0583897880131,0.0593994097078,0.058726328578,0.0582215177306,0.0595676799903,0.0580532474482,0.0573801663183,0.0575484366008,0.0567070851885,0.0562022743411,0.0567070851885,0.0558657337762,0.0563705446236,0.0562022743411,0.0551926526464,0.0560340040587,0.0573801663183,0.0577167068833,0.0572118960359,0.0575484366008,0.0585580582956,0.058726328578,0.0597359502728,0.0602407611201,0.0615869233798,0.0615869233798,0.0614186530974,0.0614186530974,0.0615869233798,0.062764815357,0.0612503828149,0.0607455719675,0.0600724908377,0.0607455719675,0.0588945988605,0.0593994097078,0.0583897880131,0.0583897880131,0.0583897880131,0.0580532474482,0.0583897880131,0.0590628691429,0.0593994097078,0.0593994097078,0.0600724908377,0.0578849771657,0.0573801663183,0.0565388149061,0.0570436257534,0.0578849771657,0.058726328578,0.0595676799903,0.0595676799903,0.0597359502728,0.0610821125324,0.0632696262044,0.0639427073342,0.0654571398764,0.0656254101588,0.0651205993114,0.0639427073342,0.0631013559219,0.0631013559219,0.0632696262044,0.0639427073342,0.0634378964869,0.0647840587465,0.0631013559219,0.0639427073342,0.0631013559219,0.0644475181816,0.062764815357,0.0639427073342,0.0620917342272,0.0619234639447,0.0615869233798,0.0597359502728,0.0604090314026,0.0590628691429,0.058726328578,0.0572118960359,0.0593994097078,0.058726328578,0.0595676799903,0.058726328578,0.058726328578,0.0592311394254,0.0588945988605,0.058726328578,0.0593994097078,0.0612503828149,0.0615869233798,0.06091384225,0.0622600045096,0.0625965450746,0.0615869233798,0.0629330856395,0.0631013559219,0.0629330856395,0.0642792478991,0.0639427073342,0.0637744370518,0.0644475181816,0.0625965450746,0.0612503828149,0.0625965450746,0.0625965450746,0.0644475181816,0.0651205993114,0.0642792478991,0.0642792478991,0.0646157884641,0.0644475181816,0.0659619507237,0.0673081129834,0.0679811941132,0.0683177346781,0.0673081129834,0.0686542752431,0.0674763832659,0.0666350318536,0.0659619507237,0.0659619507237,0.0652888695939,0.064952329029,0.0651205993114,0.0639427073342,0.0642792478991,0.0632696262044,0.0637744370518,0.0637744370518,0.0646157884641,0.0651205993114,0.0661302210062,0.0657936804413,0.0657936804413,0.0659619507237,0.0659619507237,0.0666350318536,0.0673081129834,0.0688225455255,0.0683177346781,0.0681494643957,0.0684860049606,0.0681494643957,0.0674763832659,0.068990815808,0.0691590860904,0.068990815808,0.0686542752431,0.0684860049606,0.0688225455255,0.0684860049606,0.0681494643957,0.0679811941132,0.0681494643957,0.066803302136,0.066803302136,0.0657936804413,0.0654571398764,0.0647840587465,0.0637744370518,0.0631013559219,0.0637744370518,0.0662984912886,0.0661302210062,0.066803302136,0.0679811941132,0.0705052483501,0.0715148700449,0.0716831403273,0.0716831403273,0.0720196808922,0.0711783294799,0.0693273563729,0.0686542752431,0.0676446535483,0.0671398427009,0.0642792478991,0.0639427073342,0.0642792478991,0.062764815357,0.0644475181816,0.0639427073342,0.064952329029,0.0666350318536,0.066803302136,0.0664667615711,0.0693273563729,0.0700004375027,0.0691590860904,0.0723562214572,0.0703369780677,0.0705052483501,0.0716831403273,0.0720196808922,0.0740389242817,0.0726927620221,0.073029302587,0.0715148700449,0.0726927620221,0.0716831403273,0.0733658431519,0.0743754648467,0.0737023837168,0.0728610323045,0.0723562214572,0.0735341134344,0.0725244917396,0.0740389242817,0.0733658431519,0.0738706539993,0.0738706539993,0.0735341134344,0.0725244917396,0.073029302587,0.073029302587,0.0737023837168,0.0747120054116,0.0753850865414,0.0772360596484,0.0779091407783,0.0784139516257,0.079255303038,0.0802649247327,0.0812745464275,0.0812745464275,0.081106276145,0.0804331950152,0.0807697355801,0.0800966544502,0.0802649247327,0.0802649247327,0.0799283841678,0.0806014652976,0.0800966544502,0.0802649247327,0.081106276145,0.081106276145,0.0804331950152,0.0804331950152,0.0802649247327,0.0812745464275,0.0816110869924,0.0824524384047,0.0826207086871,0.0821158978397,0.0834620600994,0.0856495737714,0.0863226549012,0.0880053577258,0.0886784388556,0.0883418982907,0.0886784388556,0.0898563308328,0.0912024930925,0.093221736482,0.0927169256346,0.093221736482,0.0945678987417,0.0959140610013,0.0975967638259,0.10062562891,0.102813142582,0.103149683147,0.104664115689,0.104159304842,0.105505467101,0.105842007666,0.107356440209,0.107692980773,0.106851629361,0.105842007666,0.106683359079,0.107019899644,0.107019899644,0.108870872751,0.108366061903,0.109712224163,0.109039143033,0.109039143033,0.109207413316,0.109039143033,0.108870872751,0.10954395388,0.11156319727,0.112741089247,0.115433413767,0.115265143484,0.115769954331,0.116947846309,0.119640170828,0.121659414217,0.124183468454,0.124520009019,0.123510387325,0.124351738737,0.124856549584,0.125697900996,0.127885414668,0.129568117493,0.131082550035,0.132260442012,0.132933523142,0.133943144837,0.135962388226,0.138318172181,0.139496064158,0.14302974009,0.145048983479,0.145553794327,0.147573037716,0.150770173083,0.152452875907,0.154303849014,0.155650011274,0.155986551839,0.158005795229,0.157669254664,0.157669254664,0.160698119748,0.1601933089,0.159183687206,0.159183687206,0.1601933089,0.161876011725,0.16221255229,0.162044282008,0.163726984832,0.165073147092,0.164736606527,0.166587579634,0.167597201329,0.168438552741,0.170626066413,0.170121255566,0.170626066413,0.170962606978,0.170121255566,0.171299147543,0.17113087726,0.170626066413,0.171635688108,0.171972228673,0.171467417825,0.172645309802,0.173991472062,0.175674174887,0.177356877711,0.177525147994,0.178029958841,0.179039580536,0.178871310253,0.178871310253,0.178534769688,0.178871310253,0.178871310253,0.178366499406,0.177861688559,0.176852066864,0.176852066864,0.176683796581,0.176683796581,0.177693418276,0.179207850818,0.178871310253,0.179544391383,0.179544391383,0.180385742796,0.181227094208,0.182404986185,0.182909797032,0.18341460788,0.183078067315,0.183078067315,0.183919418727,0.182909797032,0.182909797032,0.183246337597,0.184929040422,0.184424229575,0.185602121552,0.184592499857,0.185097310704,0.184760770139,0.183919418727,0.183919418727,0.182909797032,0.181058823925,0.179039580536,0.178029958841,0.176347256017,0.176683796581,0.175337634322,0.174664553192,0.174328012627,0.174328012627,0.175001093757,0.175337634322,0.174664553192,0.174159742345,0.173318390932,0.173486661215,0.173318390932,0.172645309802,0.172813580085,0.173318390932,0.173486661215,0.172813580085,0.171972228673,0.172308769238,0.171635688108,0.170962606978,0.17045779613,0.169784715001,0.168438552741,0.166082768787,0.164736606527,0.164231795679,0.164231795679,0.163726984832,0.163726984832,0.163390444267,0.163053903702,0.163053903702,0.163390444267,0.163726984832,0.162717363137,0.161202930595,0.159520227771,0.158510606076,0.158174065511,0.155986551839,0.154808659862,0.154472119297,0.153125957037,0.151106713648,0.149255740541,0.148414389128,0.146899956586,0.143366280655,0.141347037265,0.139664334441,0.138654712746,0.135625847662,0.133270063707,0.13209217173,0.132260442012,0.130577739188,0.129231576928,0.129399847211,0.126875792974,0.125529630714,0.123510387325,0.122332495347,0.122164225065,0.120986333088,0.119303630263,0.118967089698,0.118630549133,0.118125738286,0.117620927438,0.117789197721,0.116947846309,0.116443035461,0.115769954331,0.115769954331,0.113750710942,0.113245900095,0.113245900095,0.111731467552,0.109375683598,0.108029521338,0.105673737384,0.104664115689,0.103654493994,0.102308331735,0.102476602017,0.0991111963681,0.0979333043908,0.0964188718487,0.0959140610013,0.0945678987417,0.0957457907189,0.0959140610013,0.0947361690241,0.0942313581768,0.0942313581768,0.095409250154,0.0940630878943,0.0960823312838,0.0981015746733,0.0975967638259,0.0969236826961,0.0962506015663,0.0960823312838,0.0959140610013,0.0960823312838,0.0960823312838,0.0955775204364,0.0949044393066,0.0935582770469,0.0947361690241,0.0928851959171,0.0928851959171,0.0920438445048,0.0908659525276,0.0890149794205,0.0883418982907,0.0898563308328,0.0883418982907,0.087332276596,0.0864909251837,0.0871640063135,0.0861543846188,0.0876688171609,0.0876688171609,0.0881736280083,0.0878370874433,0.0878370874433,0.0881736280083,0.0895197902679,0.0890149794205,0.0903611416802,0.0915390336574,0.0898563308328,0.091370763375,0.0915390336574,0.0918755742223,0.0906976822451,0.0905294119627,0.0901928713978,0.09103422281,0.0906976822451,0.0888467091381,0.0888467091381,0.0886784388556,0.089183249703,0.089183249703,0.0896880605504,0.089183249703,0.0895197902679,0.089183249703,0.0890149794205,0.0896880605504,0.0905294119627,0.09103422281,0.0906976822451,0.0912024930925,0.0918755742223,0.0927169256346,0.0930534661995,0.0947361690241,0.0935582770469,0.0940630878943,0.0930534661995,0.0927169256346,0.0923803850697,0.0925486553522,0.0918755742223,0.0900246011153,0.0912024930925,0.089183249703,0.0908659525276,0.0895197902679,0.0903611416802,0.0885101685732,0.0871640063135,0.0876688171609,0.0890149794205,0.0912024930925,0.0901928713978,0.0901928713978,0.0900246011153,0.0901928713978,0.0901928713978,0.0918755742223,0.0945678987417,0.0927169256346,0.0917073039399,0.0920438445048,0.093221736482,0.0928851959171,0.0930534661995,0.0937265473294,0.0947361690241,0.0938948176118,0.0920438445048,0.0935582770469,0.0915390336574,0.0900246011153,0.0885101685732,0.089183249703,0.0876688171609,0.0881736280083,0.0859861143363,0.085144762924,0.0859861143363,0.0856495737714,0.0861543846188,0.0858178440538,0.0839668709468,0.0822841681222,0.0836303303819,0.0841351412292,0.0844716817942,0.0849764926415,0.083293789817,0.0821158978397,0.0819476275573,0.0821158978397,0.0846399520766,0.0858178440538,0.0853130332065,0.083293789817,0.082957249252,0.0821158978397,0.082957249252,0.0834620600994,0.083293789817,0.082957249252,0.0817793572748,0.0817793572748,0.0806014652976,0.081106276145,0.0812745464275,0.0817793572748,0.081106276145,0.0809380058625,0.0812745464275,0.0822841681222,0.0826207086871,0.0807697355801,0.081106276145,0.0802649247327,0.0804331950152,0.0795918436029,0.0802649247327,0.0795918436029,0.0795918436029,0.0782456813432,0.0767312488011,0.0779091407783,0.0772360596484,0.0775726002134,0.0763947082362,0.0775726002134,0.0777408704958,0.0780774110607,0.0784139516257,0.079255303038,0.0785822219081,0.0804331950152,0.0812745464275,0.0812745464275,0.0804331950152,0.0794235733204,0.0787504921906,0.0790870327555,0.0785822219081,0.0790870327555,0.0812745464275,0.0790870327555,0.0779091407783,0.0777408704958,0.0787504921906,0.0799283841678,0.0785822219081,0.0784139516257,0.0777408704958,0.0768995190835,0.0757216271063,0.0760581676712,0.0768995190835,0.0777408704958,0.0784139516257,0.0772360596484,0.0784139516257,0.077067789366,0.0784139516257,0.0768995190835,0.0787504921906,0.0784139516257,0.0785822219081,0.0772360596484,0.0757216271063,0.0743754648467,0.0738706539993,0.0738706539993,0.0728610323045,0.0737023837168,0.070841788915,0.0721879511747,0.070841788915,0.070841788915,0.0710100591975,0.0715148700449,0.0706735186326,0.0716831403273,0.0710100591975,0.0711783294799,0.0710100591975,0.0693273563729,0.0694956266554,0.0694956266554,0.0701687077852,0.0694956266554,0.0703369780677,0.0694956266554,0.0710100591975,0.0703369780677,0.0701687077852,0.0720196808922,0.0726927620221,0.0725244917396,0.0713465997624,0.0725244917396,0.0715148700449,0.0720196808922,0.0700004375027,0.0710100591975,0.073029302587,0.0711783294799,0.070841788915,0.0716831403273,0.0718514106098,0.0718514106098,0.0726927620221,0.0726927620221,0.0737023837168,0.073029302587,0.0725244917396,0.0713465997624,0.0705052483501,0.0703369780677,0.0711783294799,0.0711783294799,0.0700004375027,0.0698321672203,0.0693273563729,0.0691590860904,0.0683177346781,0.0694956266554,0.0696638969378,0.0694956266554,0.0684860049606,0.0679811941132,0.0684860049606,0.0671398427009,0.0673081129834,0.0666350318536,0.0652888695939,0.0659619507237,0.0659619507237,0.0656254101588,0.0662984912886,0.0656254101588,0.0669715724185,0.0693273563729,0.0694956266554,0.0701687077852,0.0721879511747,0.0718514106098,0.0716831403273,0.0711783294799,0.0723562214572,0.0737023837168,0.0720196808922,0.0711783294799,0.0711783294799,0.0713465997624,0.0705052483501,0.0688225455255,0.0703369780677,0.0710100591975,0.0701687077852,0.0686542752431,0.0696638969378,0.0678129238308,0.066803302136,0.0651205993114,0.0634378964869,0.0644475181816,0.0647840587465,0.0641109776167,0.062764815357,0.0647840587465,0.0647840587465,0.0662984912886,0.0662984912886,0.0669715724185,0.0684860049606,0.0688225455255,0.0674763832659,0.0678129238308,0.0693273563729,0.0688225455255,0.0683177346781,0.0688225455255,0.0703369780677,0.070841788915,0.0703369780677,0.0701687077852,0.0698321672203,0.0698321672203,0.0703369780677,0.0703369780677,0.070841788915,0.0700004375027,0.068990815808,0.0703369780677,0.0720196808922,0.0728610323045,0.0720196808922,0.0716831403273,0.0701687077852,0.0686542752431,0.0683177346781,0.0684860049606,0.0698321672203,0.068990815808,0.0678129238308,0.0662984912886,0.0674763832659,0.0673081129834,0.0676446535483,0.0673081129834,0.0654571398764,0.0644475181816,0.0631013559219,0.0617551936623,0.0617551936623,0.0625965450746,0.0636061667693,0.0642792478991,0.0639427073342,0.0637744370518,0.0639427073342,0.062764815357,0.0632696262044,0.0629330856395,0.0620917342272,0.06091384225,0.0592311394254,0.0588945988605,0.0595676799903,0.0604090314026,0.0607455719675,0.062764815357,0.0614186530974,0.0624282747921,0.0629330856395,0.0632696262044,0.0641109776167,0.0632696262044,0.0629330856395,0.062764815357,0.0629330856395,0.0617551936623,0.0624282747921,0.0620917342272,0.0614186530974,0.0610821125324,0.0592311394254,0.0590628691429,0.0582215177306,0.0588945988605,0.0602407611201,0.0610821125324,0.0619234639447,0.06091384225,0.06091384225,0.0604090314026,0.0614186530974,0.0624282747921,0.0624282747921,0.06091384225,0.0602407611201,0.058726328578,0.0578849771657,0.0585580582956,0.0585580582956,0.0588945988605,0.0580532474482,0.058726328578,0.0585580582956,0.0590628691429,0.0593994097078,0.0607455719675,0.0595676799903,0.0590628691429,0.058726328578,0.0597359502728,0.0597359502728,0.0583897880131,0.0583897880131,0.058726328578,0.058726328578,0.0580532474482,0.0585580582956,0.0599042205552,0.0607455719675,0.0595676799903,0.0605773016851,0.0622600045096,0.0625965450746,0.0625965450746,0.0625965450746,0.0620917342272,0.0634378964869,0.0647840587465,0.0641109776167,0.0647840587465,0.0652888695939,0.0639427073342,0.0634378964869,0.0634378964869,0.0631013559219,0.0644475181816,0.0642792478991,0.0632696262044,0.0636061667693,0.0641109776167,0.062764815357,0.0612503828149,0.0625965450746,0.0625965450746,0.0632696262044,0.0639427073342,0.0637744370518,0.0637744370518,0.0641109776167,0.0634378964869,0.064952329029,0.0674763832659,0.0671398427009,0.0679811941132,0.0673081129834,0.0662984912886,0.0657936804413,0.0657936804413,0.0662984912886,0.0666350318536,0.0661302210062,0.0662984912886,0.0654571398764,0.064952329029,0.0654571398764,0.0657936804413,0.0654571398764,0.064952329029,0.0629330856395,0.0622600045096,0.0620917342272,0.0607455719675,0.0599042205552,0.0597359502728,0.0585580582956,0.0580532474482,0.0570436257534,0.0565388149061,0.0565388149061,0.0562022743411,0.0551926526464,0.0538464903867,0.054687841799,0.0533416795393,0.0543513012341,0.0543513012341,0.0538464903867,0.0536782201043,0.0533416795393,0.0541830309516,0.0538464903867,0.0541830309516,0.0541830309516,0.0556974634938,0.054687841799,0.0553609229288,0.0563705446236,0.0565388149061,0.0583897880131,0.0583897880131,0.0597359502728,0.0604090314026,0.0602407611201,0.0595676799903,0.0599042205552,0.0600724908377,0.0604090314026,0.0604090314026,0.0585580582956,0.0578849771657,0.0577167068833,0.0572118960359,0.0582215177306,0.0578849771657,0.058726328578,0.056875355471,0.056875355471,0.0570436257534,0.0578849771657,0.0582215177306,0.0560340040587,0.0565388149061,0.0553609229288,0.0553609229288,0.0535099498218,0.0538464903867,0.0543513012341,0.0530051389744,0.0538464903867,0.0536782201043,0.0555291932113,0.0550243823639,0.0543513012341,0.0540147606692,0.0536782201043,0.0533416795393,0.0523320578446,0.0518272469972,0.0504810847375,0.0509858955849,0.0494714630428,0.0494714630428,0.0494714630428,0.0493031927603,0.0496397333253,0.0498080036077,0.0504810847375,0.0516589767148,0.0467791385235,0.0405531380725,0.036346381011,0.0309617319724,0.0)
m <- c(0.0310676578891,0.0361607165594,0.0400653948733,0.0449886849213,0.0490631318576,0.0494026691023,0.050760818081,0.0494026691023,0.049742206347,0.0490631318576,0.0499119749693,0.0487235946129,0.0488933632352,0.0499119749693,0.0504212808363,0.0505910494587,0.049742206347,0.0512701239481,0.050251512214,0.0494026691023,0.0485538259906,0.0494026691023,0.050251512214,0.0504212808363,0.0514398925704,0.0509305867034,0.0521189670598,0.0514398925704,0.0509305867034,0.0529678101715,0.0527980415492,0.0533073474162,0.0534771160386,0.0529678101715,0.0521189670598,0.0522887356821,0.0519491984374,0.0517794298151,0.0521189670598,0.0509305867034,0.0504212808363,0.0514398925704,0.0519491984374,0.0519491984374,0.0521189670598,0.0521189670598,0.0526282729268,0.0529678101715,0.0534771160386,0.0531375787939,0.0529678101715,0.0516096611928,0.050251512214,0.0492329004799,0.0480445201235,0.0492329004799,0.0492329004799,0.0490631318576,0.0487235946129,0.0488933632352,0.0490631318576,0.0492329004799,0.0500817435917,0.0509305867034,0.0533073474162,0.0509305867034,0.0505910494587,0.0499119749693,0.0500817435917,0.0505910494587,0.0499119749693,0.0500817435917,0.050251512214,0.0488933632352,0.0480445201235,0.0483840573682,0.0480445201235,0.0488933632352,0.0485538259906,0.0477049828788,0.0487235946129,0.0477049828788,0.0470259083895,0.0473654456341,0.0483840573682,0.0488933632352,0.0494026691023,0.0492329004799,0.0494026691023,0.0495724377246,0.0490631318576,0.0487235946129,0.0495724377246,0.0499119749693,0.0485538259906,0.0487235946129,0.0494026691023,0.0505910494587,0.0516096611928,0.050760818081,0.0514398925704,0.0536468846609,0.0541561905279,0.0539864219056,0.0555143395067,0.0568724884854,0.0561934139961,0.0558538767514,0.0561934139961,0.0573817943525,0.0570422571078,0.0565329512408,0.0572120257301,0.0580608688419,0.0570422571078,0.0561934139961,0.0561934139961,0.0567027198631,0.0565329512408,0.0560236453737,0.0558538767514,0.0548352650173,0.0534771160386,0.0539864219056,0.0544957277726,0.054665496395,0.0550050336397,0.0558538767514,0.0544957277726,0.0548352650173,0.055174802262,0.055684108129,0.0560236453737,0.0558538767514,0.0560236453737,0.0567027198631,0.0560236453737,0.0561934139961,0.0577213315972,0.0580608688419,0.0590794805759,0.06009809231,0.0609469354217,0.0602678609323,0.0592492491983,0.0578911002195,0.0582306374642,0.0567027198631,0.055174802262,0.0550050336397,0.054665496395,0.0543259591503,0.0529678101715,0.0524585043045,0.0516096611928,0.0524585043045,0.0516096611928,0.0517794298151,0.0521189670598,0.0516096611928,0.0516096611928,0.0514398925704,0.0531375787939,0.0536468846609,0.0550050336397,0.054665496395,0.0560236453737,0.055684108129,0.0565329512408,0.0572120257301,0.0578911002195,0.0584004060865,0.0582306374642,0.0589097119536,0.0584004060865,0.0587399433312,0.0580608688419,0.0584004060865,0.0573817943525,0.0567027198631,0.0550050336397,0.0548352650173,0.0536468846609,0.0538166532832,0.0534771160386,0.0536468846609,0.054665496395,0.0558538767514,0.0563631826184,0.0584004060865,0.0594190178206,0.0594190178206,0.0592492491983,0.0585701747089,0.06009809231,0.0597585550653,0.0597585550653,0.0580608688419,0.0577213315972,0.0565329512408,0.0563631826184,0.0570422571078,0.0577213315972,0.0578911002195,0.0582306374642,0.0587399433312,0.0573817943525,0.0585701747089,0.0585701747089,0.0589097119536,0.0592492491983,0.0577213315972,0.0570422571078,0.0572120257301,0.0565329512408,0.055174802262,0.055684108129,0.055684108129,0.0578911002195,0.0577213315972,0.0589097119536,0.0602678609323,0.0607771667994,0.0609469354217,0.0614562412887,0.0611167040441,0.0616260099111,0.0607771667994,0.0597585550653,0.0602678609323,0.0585701747089,0.0580608688419,0.0582306374642,0.0582306374642,0.0585701747089,0.0594190178206,0.0592492491983,0.0592492491983,0.059588786443,0.0590794805759,0.06009809231,0.0611167040441,0.0611167040441,0.0611167040441,0.0585701747089,0.0597585550653,0.0590794805759,0.0602678609323,0.0602678609323,0.0616260099111,0.0616260099111,0.0599283236876,0.059588786443,0.0604376295547,0.0624748530228,0.0634934647569,0.0638330020016,0.0626446216452,0.0619655471558,0.0604376295547,0.0594190178206,0.0609469354217,0.0616260099111,0.0614562412887,0.0614562412887,0.0604376295547,0.060607398177,0.059588786443,0.0594190178206,0.0594190178206,0.0602678609323,0.0590794805759,0.0592492491983,0.0597585550653,0.0584004060865,0.0584004060865,0.0565329512408,0.0584004060865,0.0584004060865,0.0604376295547,0.0604376295547,0.0607771667994,0.0602678609323,0.0585701747089,0.0580608688419,0.0575515629748,0.0590794805759,0.0585701747089,0.0584004060865,0.0563631826184,0.055174802262,0.0539864219056,0.0538166532832,0.0543259591503,0.0548352650173,0.054665496395,0.0548352650173,0.054665496395,0.054665496395,0.055684108129,0.0560236453737,0.0568724884854,0.0565329512408,0.0560236453737,0.0558538767514,0.0555143395067,0.0568724884854,0.0575515629748,0.0580608688419,0.0563631826184,0.0565329512408,0.0572120257301,0.0573817943525,0.0578911002195,0.0589097119536,0.0594190178206,0.0587399433312,0.0567027198631,0.0573817943525,0.0582306374642,0.0584004060865,0.0575515629748,0.0585701747089,0.0584004060865,0.0587399433312,0.0604376295547,0.060607398177,0.0626446216452,0.0621353157781,0.0624748530228,0.0629841588898,0.0631539275122,0.0623050844005,0.0636632333792,0.0633236961345,0.0617957785334,0.0609469354217,0.0623050844005,0.0626446216452,0.0629841588898,0.0624748530228,0.0626446216452,0.0631539275122,0.0629841588898,0.0629841588898,0.0631539275122,0.0633236961345,0.0614562412887,0.0609469354217,0.0599283236876,0.06009809231,0.060607398177,0.060607398177,0.0602678609323,0.060607398177,0.0616260099111,0.0621353157781,0.0616260099111,0.0614562412887,0.0617957785334,0.0624748530228,0.0626446216452,0.0634934647569,0.0631539275122,0.0624748530228,0.0619655471558,0.0611167040441,0.0629841588898,0.064512076491,0.0657004568474,0.0640027706239,0.0638330020016,0.0616260099111,0.0623050844005,0.0636632333792,0.0636632333792,0.0640027706239,0.0636632333792,0.0609469354217,0.0607771667994,0.0611167040441,0.0602678609323,0.0607771667994,0.0599283236876,0.0594190178206,0.0592492491983,0.0594190178206,0.059588786443,0.0614562412887,0.0604376295547,0.0619655471558,0.0626446216452,0.0638330020016,0.0629841588898,0.0623050844005,0.0617957785334,0.0629841588898,0.0619655471558,0.0617957785334,0.0623050844005,0.0616260099111,0.0624748530228,0.0623050844005,0.0626446216452,0.0638330020016,0.065021382358,0.0640027706239,0.0638330020016,0.0631539275122,0.0636632333792,0.0631539275122,0.0624748530228,0.0607771667994,0.0612864726664,0.0607771667994,0.0594190178206,0.059588786443,0.0599283236876,0.0607771667994,0.0599283236876,0.0609469354217,0.0609469354217,0.0628143902675,0.0631539275122,0.0631539275122,0.0643423078686,0.0641725392463,0.0641725392463,0.0646818451133,0.0651911509803,0.0668888372038,0.0672283744485,0.0672283744485,0.0662097627144,0.0662097627144,0.0672283744485,0.0689260606719,0.0701144410283,0.070453978273,0.070453978273,0.0696051351613,0.0690958292943,0.0694353665389,0.07096328414,0.07096328414,0.0697749037836,0.0692655979166,0.0687562920496,0.0690958292943,0.069944672406,0.0690958292943,0.0690958292943,0.0682469861825,0.0677376803155,0.0682469861825,0.0673981430708,0.0662097627144,0.0653609196027,0.0638330020016,0.0636632333792,0.065021382358,0.0651911509803,0.0653609196027,0.0660399940921,0.0662097627144,0.0670586058261,0.0679074489378,0.0690958292943,0.0701144410283,0.0702842096507,0.0685865234272,0.0696051351613,0.0707935155177,0.0714725900071,0.0714725900071,0.0731702762305,0.0730005076082,0.0741888879646,0.0745284252093,0.0752074996987,0.0762261114327,0.0767354172998,0.0767354172998,0.0770749545445,0.0767354172998,0.0763958800551,0.0774144917891,0.0763958800551,0.0769051859221,0.0769051859221,0.0772447231668,0.0779237976562,0.0775842604115,0.0772447231668,0.0784331035232,0.0786028721456,0.0794517152573,0.080300558369,0.0794517152573,0.0794517152573,0.0789424093902,0.0789424093902,0.0801307897467,0.0791121780126,0.0791121780126,0.0787726407679,0.0770749545445,0.0765656486774,0.0769051859221,0.0772447231668,0.0774144917891,0.0775842604115,0.0772447231668,0.0792819466349,0.080300558369,0.080809864236,0.0828470877042,0.0836959308159,0.0831866249489,0.0830168563265,0.0850540797946,0.085223848417,0.0855633856617,0.0848843111723,0.0842052366829,0.0838656994382,0.0826773190818,0.0816587073478,0.0833563935712,0.0840354680606,0.0840354680606,0.0838656994382,0.0840354680606,0.0843750053053,0.08471454255,0.08471454255,0.0855633856617,0.0872610718851,0.085733154284,0.085733154284,0.08471454255,0.0848843111723,0.0869215346404,0.0876006091298,0.0876006091298,0.0891285267309,0.090656444332,0.0904866757097,0.0935425109119,0.0943913540236,0.0965983461141,0.0974471892258,0.0959192716247,0.0962588088694,0.0984658009599,0.0996541813163,0.0998239499386,0.10135186754,0.101182098917,0.102030942029,0.102030942029,0.102370479274,0.104917008609,0.106784463455,0.107293769322,0.106275157588,0.107124000699,0.106614694832,0.108991455545,0.108821686923,0.110179835902,0.112386827992,0.113744976971,0.115782200439,0.115612431817,0.117819423907,0.118328729774,0.121214796354,0.120705490487,0.1230822512,0.123252019822,0.123931094312,0.123591557067,0.124440400179,0.126817160891,0.129193921604,0.132249756806,0.13394744303,0.135814897876,0.137682352721,0.141247493791,0.142266105525,0.145661477972,0.146680089706,0.149396387663,0.149566156286,0.14990569353,0.15058476802,0.152282454243,0.154828983578,0.154319677711,0.155508058068,0.154828983578,0.157035975669,0.157715050158,0.159752273626,0.159582505004,0.160940653983,0.162129034339,0.162298802961,0.163826720563,0.165524406786,0.166373249898,0.166373249898,0.16654301852,0.16654301852,0.167731398876,0.168750010611,0.169768622345,0.169259316478,0.169598853722,0.171296539946,0.172484920302,0.173333763414,0.174012837903,0.174352375148,0.175540755504,0.175880292749,0.175880292749,0.177068673105,0.177917516217,0.177577978972,0.177747747595,0.177577978972,0.177068673105,0.176729135861,0.176219829994,0.175370986882,0.175710524127,0.176219829994,0.175880292749,0.175540755504,0.175540755504,0.17520121826,0.175880292749,0.176559367238,0.17740821035,0.178596590707,0.178426822084,0.178087284839,0.179275665196,0.180633814175,0.181991963153,0.183350112132,0.184029186622,0.185896641467,0.187085021824,0.186915253201,0.187764096313,0.18827340218,0.187424559068,0.18606641009,0.185217566978,0.184198955244,0.184029186622,0.18250126902,0.181991963153,0.181991963153,0.180973351419,0.179275665196,0.178766359329,0.178936127951,0.178936127951,0.178766359329,0.178426822084,0.177068673105,0.176559367238,0.175540755504,0.175370986882,0.17452214377,0.173843069281,0.173673300659,0.17163607719,0.17163607719,0.170108159589,0.169768622345,0.169089547855,0.168580241988,0.167901167499,0.168240704744,0.168410473366,0.167561630254,0.168070936121,0.166882555765,0.167222093009,0.167222093009,0.166203481275,0.166882555765,0.166033712653,0.166373249898,0.165694175408,0.166373249898,0.166882555765,0.166203481275,0.166203481275,0.166882555765,0.166882555765,0.165524406786,0.165863944031,0.165015100919,0.164505795052,0.162977877451,0.161280191227,0.161110422605,0.161110422605,0.159412736382,0.159582505004,0.159412736382,0.158054587403,0.157205744291,0.157205744291,0.155338289445,0.154489446334,0.153810371844,0.152112685621,0.150924305264,0.14990569353,0.14701962695,0.146510321083,0.146001015216,0.145491709349,0.14481263486,0.143794023126,0.143454485881,0.141077725168,0.139210270323,0.136493972365,0.13683350961,0.135305592009,0.134117211652,0.132759062673,0.131400913695,0.130382301961,0.128005541248,0.126986929514,0.128514847115,0.127666004003,0.126307855024,0.126138086402,0.124610168801,0.122233408088,0.12019618462,0.119007804264,0.116291506306,0.115782200439,0.113914745593,0.113065902482,0.111877522125,0.110858910391,0.109670530035,0.107972843811,0.107633306566,0.108482149678,0.10933099279,0.107633306566,0.105935620343,0.104068165497,0.101861173407,0.0998239499386,0.0998239499386,0.100842561673,0.101012330295,0.0994844126939,0.0977867264705,0.0989751068269,0.0984658009599,0.0989751068269,0.0993146440716,0.0993146440716,0.099993718561,0.0993146440716,0.0981262637152,0.0965983461141,0.0971076519811,0.0959192716247,0.0957495030024,0.0962588088694,0.0974471892258,0.0967681147364,0.0945611226459,0.0937122795342,0.0954099657577,0.096089040247,0.0965983461141,0.0952401971353,0.0930332050448,0.0916750560661,0.0911657501991,0.0916750560661,0.0916750560661,0.090147138465,0.0882796836192,0.0876006091298,0.0850540797946,0.0862424601511,0.0874308405075,0.0879401463745,0.0881099149969,0.0872610718851,0.0870913032628,0.089637832598,0.0898076012203,0.0889587581086,0.0903169070873,0.0894680639756,0.090656444332,0.0903169070873,0.0889587581086,0.0891285267309,0.0889587581086,0.0874308405075,0.0865819973957,0.0859029229064,0.0848843111723,0.085733154284,0.085223848417,0.0859029229064,0.0869215346404,0.0862424601511,0.0870913032628,0.0860726915287,0.0872610718851,0.0881099149969,0.0886192208639,0.0891285267309,0.0894680639756,0.0881099149969,0.0879401463745,0.0899773698426,0.0894680639756,0.0908262129544,0.0908262129544,0.0918448246884,0.0933727422895,0.0925238991778,0.0915052874437,0.0933727422895,0.0938820481566,0.0926936678002,0.0932029736672,0.0938820481566,0.0942215854013,0.0937122795342,0.0940518167789,0.0938820481566,0.0954099657577,0.095070428513,0.0940518167789,0.0926936678002,0.0916750560661,0.0923541305555,0.0920145933108,0.0930332050448,0.0908262129544,0.0903169070873,0.0894680639756,0.0889587581086,0.0899773698426,0.0930332050448,0.0932029736672,0.0928634364225,0.0918448246884,0.090656444332,0.0921843619331,0.0935425109119,0.0938820481566,0.0933727422895,0.0925238991778,0.0908262129544,0.0920145933108,0.0911657501991,0.0920145933108,0.0913355188214,0.0909959815767,0.0908262129544,0.0898076012203,0.089637832598,0.0886192208639,0.0887889894862,0.0865819973957,0.0855633856617,0.0864122287734,0.0872610718851,0.0872610718851,0.0864122287734,0.0881099149969,0.0884494522415,0.0889587581086,0.0882796836192,0.0879401463745,0.0879401463745,0.0864122287734,0.0855633856617,0.0853936170393,0.0869215346404,0.0842052366829,0.0819982445924,0.0818284759701,0.0804703269913,0.0818284759701,0.0826773190818,0.0816587073478,0.0831866249489,0.0826773190818,0.0804703269913,0.0811494014807,0.0823377818371,0.0833563935712,0.0843750053053,0.0845447739276,0.0836959308159,0.0838656994382,0.0818284759701,0.0813191701031,0.0809796328584,0.0804703269913,0.0804703269913,0.0786028721456,0.0780935662785,0.0760563428104,0.075377268321,0.0760563428104,0.0757168055657,0.075377268321,0.075886574188,0.075886574188,0.075886574188,0.075886574188,0.0760563428104,0.0774144917891,0.0780935662785,0.0772447231668,0.0775842604115,0.0784331035232,0.0779237976562,0.0784331035232,0.0765656486774,0.0784331035232,0.0779237976562,0.0755470369433,0.0752074996987,0.0752074996987,0.0757168055657,0.0757168055657,0.0752074996987,0.0740191193422,0.074867962454,0.0733400448529,0.0731702762305,0.0752074996987,0.075886574188,0.0763958800551,0.0755470369433,0.0763958800551,0.0767354172998,0.0784331035232,0.0779237976562,0.0791121780126,0.0792819466349,0.0792819466349,0.0792819466349,0.0786028721456,0.0786028721456,0.0774144917891,0.0772447231668,0.0755470369433,0.0774144917891,0.0755470369433,0.0746981938316,0.0736795820976,0.0723214331188,0.0730005076082,0.0740191193422,0.0735098134752,0.0731702762305,0.0735098134752,0.0718121272518,0.0733400448529,0.0745284252093,0.0746981938316,0.0745284252093,0.0730005076082,0.0723214331188,0.0721516644965,0.0724912017411,0.0743586565869,0.074867962454,0.0740191193422,0.0733400448529,0.0724912017411,0.0740191193422,0.0750377310763,0.0743586565869,0.0755470369433,0.074867962454,0.0721516644965,0.0726609703635,0.0721516644965,0.0726609703635,0.0735098134752,0.0723214331188,0.0726609703635,0.0735098134752,0.0731702762305,0.0738493507199,0.0746981938316,0.0735098134752,0.075377268321,0.0743586565869,0.0763958800551,0.0765656486774,0.0770749545445,0.0769051859221,0.0752074996987,0.0750377310763,0.0757168055657,0.0763958800551,0.0743586565869,0.0746981938316,0.0730005076082,0.0726609703635,0.0713028213847,0.0706237468954,0.0716423586294,0.0723214331188,0.07096328414,0.0706237468954,0.07096328414,0.0713028213847,0.0706237468954,0.0694353665389,0.0697749037836,0.0707935155177,0.0707935155177,0.0689260606719,0.070453978273,0.0696051351613,0.0697749037836,0.0682469861825,0.0680772175602,0.0694353665389,0.0694353665389,0.0680772175602,0.0665492999591,0.0684167548049,0.0675679116932,0.0675679116932,0.0670586058261,0.0687562920496,0.0692655979166,0.070453978273,0.0711330527624,0.0711330527624,0.0723214331188,0.0701144410283,0.0707935155177,0.0713028213847,0.0719818958741,0.0711330527624,0.0723214331188,0.069944672406,0.0673981430708,0.0673981430708,0.0673981430708,0.0687562920496,0.0679074489378,0.0679074489378,0.0668888372038,0.0673981430708,0.0646818451133,0.0648516137356,0.0658702254697,0.0660399940921,0.0651911509803,0.0638330020016,0.0634934647569,0.0641725392463,0.0631539275122,0.0624748530228,0.0634934647569,0.0628143902675,0.0628143902675,0.0633236961345,0.0636632333792,0.064512076491,0.0633236961345,0.0611167040441,0.0612864726664,0.0626446216452,0.0628143902675,0.0640027706239,0.064512076491,0.0626446216452,0.0623050844005,0.0628143902675,0.0633236961345,0.064512076491,0.0665492999591,0.0651911509803,0.0646818451133,0.0634934647569,0.0638330020016,0.0657004568474,0.065021382358,0.0640027706239,0.0643423078686,0.0651911509803,0.0641725392463,0.0651911509803,0.0651911509803,0.0660399940921,0.0648516137356,0.0638330020016,0.065530688225,0.0667190685814,0.0667190685814,0.0662097627144,0.0646818451133,0.0636632333792,0.0631539275122,0.0640027706239,0.0641725392463,0.0653609196027,0.0651911509803,0.0657004568474,0.0651911509803,0.0648516137356,0.0667190685814,0.0667190685814,0.0677376803155,0.0668888372038,0.0670586058261,0.0673981430708,0.0670586058261,0.0670586058261,0.0680772175602,0.0682469861825,0.0679074489378,0.0675679116932,0.0670586058261,0.0672283744485,0.0667190685814,0.065530688225,0.0634934647569,0.0612864726664,0.0609469354217,0.0607771667994,0.0602678609323,0.059588786443,0.0607771667994,0.0602678609323,0.060607398177,0.059588786443,0.0607771667994,0.0623050844005,0.0611167040441,0.0611167040441,0.06009809231,0.060607398177,0.0587399433312,0.0573817943525,0.0575515629748,0.0575515629748,0.0565329512408,0.055684108129,0.0565329512408,0.0565329512408,0.0565329512408,0.0558538767514,0.055174802262,0.0563631826184,0.0563631826184,0.0558538767514,0.0560236453737,0.054665496395,0.0550050336397,0.0543259591503,0.0541561905279,0.0558538767514,0.0567027198631,0.055174802262,0.0539864219056,0.0536468846609,0.054665496395,0.0567027198631,0.0558538767514,0.0561934139961,0.0572120257301,0.0567027198631,0.0589097119536,0.060607398177,0.0621353157781,0.0636632333792,0.0638330020016,0.0631539275122,0.0631539275122,0.0573817943525,0.0512701239481,0.044818916299,0.0368397910488,0.0)
ycorr <- c(-8.16953459145e-05,-8.1963371222e-05,-8.2764203309e-05,-8.40915276951e-05,-8.59503732106e-05,-8.83508557385e-05,-9.12965260785e-05,-9.42595160346e-05,-9.72432492481e-05,-0.000100249343672,-0.000103281014646,-0.00010633128195,-0.000109396929608,-0.000112478527982,-0.000115576585135,-0.000118682966289,-0.000121790910965,-0.000124897331016,-0.000127998054491,-0.000131092310419,-0.000134177203071,-0.000137250031453,-0.000140312601188,-0.000143366006619,-0.000146406948927,-0.000149434081203,-0.00015245366657,-0.000155464547083,-0.00015846995777,-0.00016147844968,-0.00016449583293,-0.000167531704721,-0.000170588427802,-0.000173664082872,-0.000176761882794,-0.000179887702975,-0.000183047177598,-0.000186239895471,-0.000189468195397,-0.000192732111013,-0.000196026529175,-0.000199338084502,-0.000202660114245,-0.000205988815899,-0.000209321697865,-0.000212648040581,-0.00021596051985,-0.00021925326735,-0.000222522676986,-0.000225759742376,-0.000228960513518,-0.000232121487803,-0.000235244359578,-0.000238324490246,-0.000241361462904,-0.000244361295724,-0.000247326248965,-0.000250257302022,-0.000253156517001,-0.000256019936618,-0.00025885314664,-0.00026165903021,-0.000264443616246,-0.000267213211758,-0.00026997319588,-0.000272725322822,-0.000275461597846,-0.000278187309789,-0.000280898888211,-0.000283596639216,-0.000286285972477,-0.000288966340929,-0.000291629657213,-0.000294269964133,-0.000296882662401,-0.000299461207178,-0.000302009442038,-0.00030452669231,-0.000307011725638,-0.000309469896092,-0.00031189413947,-0.000314286713244,-0.000316648372976,-0.000318989412441,-0.000321308456219,-0.000323614286857,-0.000325908650448,-0.000328183523223,-0.000330444578637,-0.000332690966892,-0.000334925435252,-0.000337145995517,-0.000339352629999,-0.000341542793544,-0.000343714943295,-0.000345865852512,-0.000347987896759,-0.00035009205107,-0.000352190500694,-0.00035428036018,-0.000356359861706,-0.000358429831228,-0.000360493822455,-0.000362545609254,-0.000364588964789,-0.000366613905251,-0.000368622140595,-0.000370611695059,-0.000372561295173,-0.000374460535919,-0.000376311630498,-0.000378102535275,-0.000379825674573,-0.000381484409683,-0.000383078986894,-0.00038460470381,-0.00038606908802,-0.0003874763875,-0.000388822089248,-0.000390110721836,-0.000391336732703,-0.000392502941947,-0.000393620630479,-0.00039469474516,-0.000395725046376,-0.000396716599591,-0.000397669956297,-0.000398574276388,-0.000399427029257,-0.000400244811017,-0.000401030669555,-0.00040179204496,-0.000402530672177,-0.000403237649056,-0.000403903907098,-0.000404523394693,-0.000405096498965,-0.00040562259653,-0.000406120769648,-0.000406589587632,-0.000407022034078,-0.000407425219021,-0.000407797424125,-0.000408136030365,-0.000408443961637,-0.000408735394382,-0.000409023134475,-0.000409307348423,-0.000409585732352,-0.000409849041053,-0.000410099943715,-0.000410329262035,-0.000410531279926,-0.000410710056279,-0.00041087294732,-0.000411023364361,-0.000411150396997,-0.000411240153422,-0.00041129415073,-0.000411312823428,-0.000411298668824,-0.00041125199522,-0.000411179649194,-0.000411092037653,-0.000410980258294,-0.000410828989596,-0.000410634578167,-0.000410404960557,-0.000410144201058,-0.000409849760658,-0.000409526310275,-0.000409177784931,-0.000408797156201,-0.000408375262425,-0.000407908182437,-0.000407415400261,-0.000406905826216,-0.000406392340469,-0.000405864598971,-0.000405321839378,-0.000404760571441,-0.000404183646511,-0.000403593623756,-0.000402998837542,-0.000402406793555,-0.000401810381155,-0.000401196029158,-0.000400552181414,-0.000399885190628,-0.000399204750282,-0.000398520585819,-0.000397836483439,-0.000397146773956,-0.000396445194189,-0.000395740580233,-0.000395030807906,-0.000394315184007,-0.000393600530612,-0.000392888624312,-0.000392175009999,-0.000391451241091,-0.000390706749608,-0.00038994104674,-0.000389155572208,-0.000388346551688,-0.000387507170755,-0.000386646232188,-0.000385770867664,-0.000384883189033,-0.000383988780439,-0.000383087541552,-0.000382186993282,-0.000381294056085,-0.000380413423352,-0.000379542997136,-0.000378694538043,-0.000377870996335,-0.000377067331247,-0.000376282492672,-0.000375515018479,-0.000374758071437,-0.000374009520404,-0.0003732771157,-0.000372556844391,-0.000371848429301,-0.000371152761825,-0.000370463078205,-0.000369780418348,-0.000369105050493,-0.000368422564539,-0.000367740706576,-0.000367068320006,-0.000366388973684,-0.000365700906814,-0.000365007648644,-0.000364302736538,-0.000363585654905,-0.000362859358053,-0.000362112736151,-0.000361360862651,-0.000360613055683,-0.000359855062042,-0.000359090831869,-0.000358330713565,-0.000357574969726,-0.000356822076021,-0.000356082878021,-0.000355351220778,-0.000354622311682,-0.000353897347047,-0.000353163378355,-0.00035242610797,-0.000351691519191,-0.000350950504035,-0.000350201087174,-0.000349433566318,-0.000348639684898,-0.0003478186582,-0.000346989107686,-0.000346155582295,-0.000345319957262,-0.00034448128701,-0.0003436368057,-0.000342788573825,-0.000341942797575,-0.000341107279011,-0.000340280570295,-0.000339472111873,-0.000338673112464,-0.000337870469009,-0.000337063576126,-0.000336251545725,-0.000335437503464,-0.000334616313305,-0.000333776016101,-0.000332925586894,-0.000332066954065,-0.000331203708515,-0.000330333130833,-0.00032946521066,-0.000328599836541,-0.000327733553712,-0.000326865058721,-0.000325990236635,-0.000325117956309,-0.000324247101659,-0.000323368630119,-0.000322474827054,-0.000321573147179,-0.000320651545872,-0.000319694944019,-0.000318710835371,-0.000317697797851,-0.000316669512948,-0.000315633096286,-0.00031458152645,-0.00031352873088,-0.000312472012333,-0.000311405460533,-0.000310330098985,-0.000309265711763,-0.000308223137984,-0.000307196946303,-0.000306190169825,-0.000305186793395,-0.000304180445278,-0.000303162456423,-0.000302122502892,-0.000301059868828,-0.000299981174327,-0.000298882117709,-0.000297753010816,-0.000296589225017,-0.00029538032599,-0.000294127416331,-0.000292839505172,-0.000291522722017,-0.000290194964785,-0.000288863963148,-0.000287531931641,-0.000286201807458,-0.000284866073119,-0.000283531522515,-0.000282203349219,-0.000280892792698,-0.000279596463402,-0.000278313774346,-0.000277040927462,-0.000275772380289,-0.000274507549817,-0.000273234063198,-0.000271960723896,-0.000270687846202,-0.000269407782422,-0.000268115756028,-0.000266814867974,-0.000265511251711,-0.000264202152876,-0.000262886570444,-0.000261554186695,-0.000260210095683,-0.000258859826163,-0.000257497768199,-0.000256131581163,-0.000254771220399,-0.000253416950388,-0.000252063089667,-0.000250710680915,-0.000249356712342,-0.000248011761214,-0.000246677931234,-0.000245355485685,-0.000244048360927,-0.000242757890511,-0.000241477310876,-0.000240199683256,-0.000238922072112,-0.000237645019366,-0.000236365108177,-0.000235085125443,-0.000233810469957,-0.00023254151753,-0.000231268270487,-0.00022998917329,-0.000228693661834,-0.000227386135875,-0.000226073242489,-0.000224755070907,-0.000223434582383,-0.000222106688601,-0.000220762638541,-0.000219394821182,-0.000218013823294,-0.000216617941046,-0.000215210279926,-0.00021379360471,-0.00021236033518,-0.00021090551812,-0.000209431242321,-0.000207944610803,-0.000206446133753,-0.000204938319933,-0.000203410910582,-0.000201860019395,-0.000200295941033,-0.000198721152477,-0.000197136989123,-0.000195551592826,-0.000193961873376,-0.000192356834959,-0.000190739577251,-0.000189106692378,-0.000187468308233,-0.000185831609637,-0.000184197615605,-0.000182559894201,-0.000180918578195,-0.000179267367239,-0.000177604956397,-0.00017593938645,-0.00017427241676,-0.000172604422951,-0.00017093384617,-0.000169263364851,-0.000167577570819,-0.000165877728457,-0.000164161516851,-0.00016242788427,-0.000160682515605,-0.000158925567637,-0.000157150184675,-0.000155356579972,-0.000153542057576,-0.000151707198045,-0.000149851586097,-0.000147982698812,-0.000146095675737,-0.00014419134072,-0.000142274689658,-0.000140339481914,-0.000138391430607,-0.000136434080648,-0.000134473047116,-0.000132501153057,-0.000130518814214,-0.000128525819657,-0.000126532198054,-0.000124545064773,-0.000122553225893,-0.000120561348778,-0.000118565404424,-0.000116560953917,-0.000114539571566,-0.000112503656376,-0.000110460955518,-0.000108410545732,-0.000106341557053,-0.000104238420764,-0.000102110986488,-9.99616030119e-05,-9.77844812614e-05,-9.55924883851e-05,-9.33945086096e-05,-9.11953542043e-05,-8.89940312313e-05,-8.67845349143e-05,-8.45725176536e-05,-8.23721712568e-05,-8.01804351972e-05,-7.79956506219e-05,-7.58294356353e-05,-7.36714152456e-05,-7.15138162246e-05,-6.93543182244e-05,-6.71900150037e-05,-6.50156982284e-05,-6.28350808392e-05,-6.06461678002e-05,-5.84449734198e-05,-5.62375090687e-05,-5.40119864839e-05,-5.1761495373e-05,-4.94962499047e-05,-4.72085266896e-05,-4.48933098591e-05,-4.25613660439e-05,-4.02166517069e-05,-3.78520432934e-05,-3.54689078022e-05,-3.30588162733e-05,-3.0633123367e-05,-2.81939864597e-05,-2.57458719068e-05,-2.32920230071e-05,-2.08440576765e-05,-1.83963941535e-05,-1.59483225721e-05,-1.35015715482e-05,-1.1059549671e-05,-8.62322470152e-06,-6.18777375514e-06,-3.75244039446e-06,-1.32304520183e-06,1.10314976809e-06,3.52761734593e-06,5.94568607855e-06,8.36593636681e-06,1.07857472582e-05,1.31988474248e-05,1.56106504002e-05,1.80154953997e-05,2.0402832814e-05,2.27838547556e-05,2.51639418747e-05,2.75501355395e-05,2.99457235298e-05,3.23468747425e-05,3.475173541e-05,3.71712985771e-05,3.96058985053e-05,4.20508619432e-05,4.45142812155e-05,4.69988991958e-05,4.9502398503e-05,5.20220351143e-05,5.45535217447e-05,5.7099834144e-05,5.96581236642e-05,6.22200568147e-05,6.47829997277e-05,6.73566054724e-05,6.99464191211e-05,7.25501268715e-05,7.51663866016e-05,7.77883027902e-05,8.04231451777e-05,8.30652983444e-05,8.57191163322e-05,8.83929139795e-05,9.10920156717e-05,9.38150519036e-05,9.6555694027e-05,9.93139666364e-05,0.000102092387114,0.000104897436631,0.000107731646852,0.000110588657487,0.000113474122605,0.000116383967536,0.000119320738608,0.000122284954852,0.000125275661328,0.000128297698122,0.000131346348022,0.000134422202184,0.000137522064343,0.000140655328855,0.000143834672815,0.000147063679579,0.000150337755776,0.000153655043738,0.000157014683741,0.000160424636995,0.00016388223539,0.000167391978082,0.000170951492329,0.000174563443771,0.000178210276993,0.000181878666712,0.000185566957738,0.000189279710474,0.000193025391585,0.000196794383711,0.000200585638874,0.000204401834658,0.000208235415489,0.000212088693755,0.000215967571143,0.000219891014736,0.000223861189091,0.000227873777241,0.000231928343953,0.00023602327835,0.000240171123437,0.000244365986512,0.000248613802909,0.000252918626942,0.000257278847063,0.000261685957902,0.000266130317898,0.000270616741778,0.0002751453421,0.000279709123445,0.000284302603448,0.000288927024589,0.000293586828355,0.000298279177186,0.000302997916822,0.00030773547478,0.000312500023526,0.000317291767734,0.000322108413892,0.000326953730726,0.000331825131043,0.000336719828762,0.000341624353227,0.000346529461402,0.000351432422159,0.000356347075901,0.000361279692365,0.000366245226569,0.0003712733968,0.00037639161073,0.00038162433246,0.000387118766568,0.000392351431231,0.000397449628141,0.000402438398568,0.000407333264499,0.000412152787479,0.000416919545479,0.000421604187624,0.00042617122026,0.000430593068495,0.000434840525714,0.000438775344408,0.000442916001734,0.000447135502389,0.000451420659523,0.000455748695162,0.000460099672291,0.000464452011616,0.000468817087843,0.000473198719358,0.000477591321367,0.000481994584212,0.000486414367717,0.000490866337784,0.000495346954077,0.000499852435381,0.000504373312454,0.000508908444088,0.000513450900494,0.000517983896249,0.000522520466327,0.000527058206044,0.000531599701397,0.000536128982944,0.000540642454059,0.00054514198877,0.000549622423065,0.000554092518146,0.00055854030523,0.000562976759031,0.000567398612879,0.000571792730321,0.000576159823372,0.000580496472761,0.000584807681856,0.000589087240229,0.000593343707763,0.000597577202265,0.000601785669542,0.00060597398004,0.000610131326171,0.00061427000285,0.000618387461488,0.000622483203681,0.000626548260876,0.000630581572753,0.000634575978145,0.00063852612936,0.00064242960427,0.000646284756748,0.00065009575714,0.000653855010753,0.000657559206323,0.000661208138021,0.000664806225246,0.000668360237813,0.000671866061167,0.000675325127409,0.000678732769937,0.000682085957785,0.000685380504205,0.000688615639818,0.000691790176299,0.000694904997865,0.000697959939545,0.000700948851329,0.000703866828935,0.00070671668745,0.000709503061211,0.000712228316715,0.00071489532924,0.000717507384811,0.00072005327507,0.000722540566771,0.000724960932642,0.00072731384222,0.000729608364237,0.000731847264578,0.000734033871491,0.00073616070521,0.000738221979791,0.000740214653039,0.000742143270828,0.000744010754793,0.000745819642794,0.000747567421799,0.000749248840794,0.000750852951508,0.000752376288062,0.000753819681047,0.000755187024283,0.000756477101252,0.000757701243959,0.000758848562274,0.000759906774392,0.000760876512637,0.000761764132541,0.000762570535456,0.000763299742029,0.000763949622699,0.000764511240658,0.000764984588361,0.000765358197189,0.000765623224473,0.000765796109498,0.000765883637139,0.000765873220164,0.00076576671883,0.000765564684601,0.000765257202556,0.000764846051255,0.000764328722282,0.000763702228397,0.00076298309951,0.000762166817804,0.000761237682131,0.000760203841165,0.000759068995932,0.000757828331121,0.000756479866662,0.000755033385788,0.000753491149598,0.000751861719623,0.00075014210493,0.000748324190967,0.000746418000932,0.000744430564486,0.000742348324356,0.000740170324576,0.000737905565378,0.000735558148496,0.000733131018518,0.000730622626493,0.000728041751984,0.000725393750724,0.0007226812483,0.000719895859506,0.000717041410907,0.00071413327193,0.000711167941372,0.000708137426974,0.000705036007006,0.00070186379066,0.000698610126888,0.0006952695868,0.000691836724166,0.000688317845377,0.000684708311856,0.000681005583603,0.000677212013788,0.000673335843501,0.000669385706855,0.000665367842509,0.000661284683219,0.000657143173545,0.000652945803808,0.000648699108317,0.000644412679573,0.000640089642938,0.000635731177695,0.000631329084388,0.000626884698471,0.00062239481148,0.000617855769969,0.000613271348503,0.000608646313363,0.000603978782456,0.000599269110361,0.000594507393922,0.000589702923499,0.000584856325046,0.000579967307659,0.000575042449883,0.000570084149108,0.000565099876526,0.000560084361368,0.000555040401538,0.000549965711908,0.000544875070987,0.000539765607557,0.000534638581367,0.000529494241607,0.000524333092032,0.000519153738511,0.000513956757151,0.000508751315404,0.000503542734433,0.000498336660863,0.00049313085772,0.000487918253935,0.000482707649378,0.000477499609566,0.000472302931958,0.000467119755073,0.000461947955972,0.000456782410311,0.000451613333735,0.00044643671366,0.000441251290613,0.000436065954975,0.000430880778636,0.000425700399648,0.0004205150729,0.000415324740817,0.000410128082566,0.000404930424273,0.000399736059157,0.000394551033592,0.000389372716027,0.000384203898583,0.000379041333835,0.000373887313551,0.000368750137337,0.000363640940742,0.000358563969312,0.000353528445602,0.000348526753168,0.000343557407292,0.000338619888677,0.000333719931169,0.00032885511013,0.000324023650222,0.00031921760459,0.000314425166629,0.00030964066334,0.000304857587089,0.000300082604204,0.000295323097398,0.000290577196286,0.000285842962343,0.000281120128452,0.000276416314421,0.000271733831905,0.000267074211121,0.000262450865686,0.000257864081857,0.000253313245699,0.000248786963742,0.000244293540961,0.000239832015408,0.000235410881,0.000231021879098,0.000226658222028,0.000222324282304,0.000218023515529,0.00021374300951,0.000209492541736,0.000205280489555,0.000201107519144,0.0001969757445,0.000192883539493,0.00018882654376,0.000184820422456,0.000180865864903,0.000176951038389,0.000173078856895,0.000169251647503,0.000165462323659,0.000161700436442,0.000157968573375,0.000154264840592,0.000150595237725,0.000146949790868,0.000143325702417,0.000139725228479,0.000136162065395,0.000132624679651,0.000129105998371,0.00012561679589,0.000122155337555,0.000118721818967,0.000115313601833,0.000111930996223,0.000108579783025,0.000105252468353,0.000101938885599,9.86406925428e-05,9.53724900551e-05,9.21347383505e-05,8.89205836281e-05,8.57268662642e-05,8.25496484936e-05,7.93872485162e-05,7.62430189567e-05,7.31204133547e-05,7.00164953095e-05,6.69373852159e-05,6.38752621633e-05,6.08238710157e-05,5.77870135906e-05,5.4767723164e-05,5.17788376087e-05,4.88180909015e-05,4.58794083443e-05,4.29581713963e-05,4.00554609216e-05,3.71784223471e-05,3.43368399793e-05,3.15280947684e-05,2.875602298e-05,2.6013014347e-05,2.32889816228e-05,2.05807783536e-05,1.78886653163e-05,1.52171540341e-05,1.2582158571e-05,9.97418385576e-06,7.38139914297e-06,4.79855625228e-06,2.22323946051e-06,-3.39395876132e-07,-2.88629481556e-06,-5.41121247223e-06,-7.91069101126e-06,-1.03834688407e-05,-1.28414072168e-05,-1.5296310377e-05,-1.77376651781e-05,-2.01560576709e-05,-2.25468219983e-05,-2.49114642151e-05,-2.72565092391e-05,-2.95829326587e-05,-3.18974720715e-05,-3.42045654598e-05,-3.64932369334e-05,-3.87553883296e-05,-4.0996247435e-05,-4.32148618422e-05,-4.54229396512e-05,-4.76229600649e-05,-4.98114696481e-05,-5.19888901255e-05,-5.41524331075e-05,-5.62929598165e-05,-5.84235286795e-05,-6.05401803047e-05,-6.26487101777e-05,-6.47499792864e-05,-6.68499736343e-05,-6.89433554427e-05,-7.10315739365e-05,-7.31102344253e-05,-7.51751574336e-05,-7.72265187448e-05,-7.92661686784e-05,-8.12912364404e-05,-8.33038240567e-05,-8.5305157193e-05,-8.72872793113e-05,-8.92558689137e-05,-9.12020677244e-05,-9.31303130671e-05,-9.50453508387e-05,-9.69611470622e-05,-9.88822157568e-05,-0.000100812538074,-0.000102745848262,-0.000104686726223,-0.000106623577702,-0.000108549204964,-0.000110465406209,-0.000112382832515,-0.000114308744902,-0.000116237305972,-0.00011814633561,-0.000120036572026,-0.000121910855576,-0.000123764314621,-0.000125612257138,-0.000127459586486,-0.000129312257676,-0.000131161079849,-0.000132995907403,-0.000134809640793,-0.000136615565304,-0.000138427515261,-0.000140242507258,-0.000142062030685,-0.00014388844922,-0.000145713179532,-0.000147541236433,-0.000149371274758,-0.000151206711514,-0.000153052100304,-0.000154918726702,-0.00015679480041,-0.000158672403456,-0.000160549012646,-0.000162417467791,-0.000164283844092,-0.000166145343663,-0.000167998189133,-0.00016984535347,-0.00017168746638,-0.00017350966272,-0.000175294560314,-0.00017704883605,-0.000178784641079,-0.0001805019923,-0.000182199325575,-0.000183874028327,-0.000185529961501,-0.00018717458349,-0.000188807367651,-0.000190430952891,-0.000192062150547,-0.000193710218746,-0.000195370589302,-0.000197040511582,-0.000198725251443,-0.000200428145574,-0.00020214738964,-0.000203868319752,-0.000205577143418,-0.000207281574191,-0.000208983971936,-0.0002106816712,-0.000212374015547,-0.000214059264869,-0.000215731138899,-0.000217378101418,-0.000219003966461,-0.00022060842457,-0.000222217217815,-0.000223830703977,-0.000225436276346,-0.000227024762807,-0.000228595068856,-0.000230140845799,-0.000231667169764,-0.000233183456583,-0.000234686915335,-0.000236182997627,-0.000237660679395,-0.000239114299026,-0.000240548766028,-0.000241966218215,-0.000243360370187,-0.000244740670115,-0.000246104946143,-0.000247446616073,-0.000248764670244,-0.000250068554387,-0.000251352697387,-0.000252619794452,-0.000253867637143,-0.000255105601616,-0.000256341067955,-0.000257574712067,-0.000258805103644,-0.000260043606652,-0.000261292796895,-0.000262550403666,-0.000263809700773,-0.000265072746854,-0.000266340130099,-0.000267609243581,-0.000268873360798,-0.000270135228944,-0.000271400930395,-0.000272658006774,-0.000273905721208,-0.000275137259669,-0.000276366427427,-0.00027758838196,-0.000278803957248,-0.000280018206158,-0.000281222869364,-0.0002824162486,-0.000283594546882,-0.000284758377278,-0.000285907019652,-0.000287039306574,-0.000288152143202,-0.000289239750062,-0.000290309431203,-0.000291354745941,-0.00029238352616,-0.000293399888422,-0.000294399882125,-0.000295383491238,-0.000296352192575,-0.000297316217281,-0.000298274296492,-0.000299230423471,-0.000300180325977,-0.000301120744281,-0.000302053434883,-0.000302978978633,-0.000303901482928,-0.00030482703539,-0.000305761359275,-0.000306693262941,-0.00030761754561,-0.000308538140064,-0.000309462650756,-0.000310393977315,-0.000311332138242,-0.0003122756527,-0.000313216560563,-0.000314158847219,-0.000315090356433,-0.000316010530987,-0.000316932909292,-0.000317851214641,-0.000318762402265,-0.000319662330642,-0.00032054517281,-0.000321414966203,-0.000322275813207,-0.000323124762769,-0.000323960847365,-0.000324790042069,-0.000325613723245,-0.000326430179619,-0.000327248316433,-0.000328061977876,-0.000328886125871,-0.000329718919742,-0.000330555710342,-0.000331390708147,-0.000332229511347,-0.000333068888843,-0.000333905058324,-0.000334741932826,-0.000335575282337,-0.000336400144672,-0.000337213488871,-0.000338009351634,-0.000338793372758,-0.00033957240776,-0.000340350964828,-0.000341121166899,-0.000341873596868,-0.000342609680535,-0.000343321531135,-0.00034402244514,-0.000344711418495,-0.000345391486446,-0.000346054419014,-0.000346695413153,-0.000347306588502,-0.00034789348418,-0.000348476838999,-0.0003490558956,-0.0003496389795,-0.000350219445415,-0.00035078679597,-0.000351336945163,-0.000351879123717,-0.000352414856029,-0.000352947104461,-0.000353477385881,-0.000353987717686,-0.000354463452018,-0.000354906261223,-0.000355309664054,-0.000355682438772,-0.000356021159921,-0.00035632728052,-0.000356594814719,-0.000356816659497,-0.000356990036072,-0.000357111988355,-0.000357198675581,-0.00035724937233,-0.000357266679811,-0.000357250174206,-0.000357201401868,-0.000357118058529,-0.000357004452818,-0.00035686500627,-0.000356709188969,-0.000356534659558,-0.000356343823343,-0.000356117312343,-0.00035585907325,-0.000355567064804,-0.000355238981363,-0.000354871047492,-0.000354464251713,-0.000354017314883,-0.000353511868413,-0.000352944834783,-0.000352316015618,-0.000351631486469,-0.000350894193694,-0.00035009999012,-0.000349250413772,-0.00034834356954,-0.000347489545631,-0.000346805290213,-0.00034628602782,-0.000345943773941,-0.000345775966524)
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(109)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('ChIP-seq_of_ZIPIC_in_S2_cells-GSM1313421.36mers.unique.MACS-2.1.0_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) : 109',bty='n')
dev.off()