# R script for Peak Model
#  -- generated by MACS
p <- c(0.0281504691109,0.0335586873145,0.0388282332565,0.0436124262827,0.0484312873743,0.0490206444863,0.0489513083555,0.0486392957668,0.04891664029,0.0488473041592,0.0487086318976,0.0484659554397,0.0478419302624,0.0480152705895,0.0480152705895,0.0471139008889,0.0469752286272,0.0471139008889,0.0476685899354,0.0478419302624,0.0475645857392,0.0464898757115,0.046108526992,0.0460045227958,0.0459005185996,0.0467325521694,0.0474605815429,0.0476685899354,0.0473912454121,0.0468365563656,0.0481886109165,0.0489513083555,0.0500606864485,0.0500953545139,0.0501646906447,0.0499220141869,0.0498180099906,0.0501300225793,0.0494019932058,0.0498873461215,0.048743299963,0.0487086318976,0.0487779680284,0.0484312873743,0.0483966193089,0.0475992538046,0.0471832370197,0.0462818673191,0.0471139008889,0.0473565773467,0.0472872412159,0.0469405605618,0.0469405605618,0.0474605815429,0.04763392187,0.0482232789819,0.0490899806171,0.0493673251403,0.0482579470473,0.0485352915706,0.0481192747857,0.0488473041592,0.0480499386549,0.0483619512435,0.0480846067203,0.0491593167479,0.0488126360938,0.0494713293366,0.0505113712988,0.0502340267755,0.0511353964761,0.0511700645415,0.0516207493918,0.0520714342421,0.0523487787654,0.051551413261,0.0517940897189,0.0512740687378,0.0508233838875,0.0516207493918,0.0513434048686,0.0506847116258,0.0507887158221,0.0500260183831,0.0499913503177,0.0504767032334,0.0503033629063,0.0503380309718,0.050442035168,0.0494713293366,0.0500953545139,0.0502686948409,0.0501993587101,0.0501993587101,0.0507887158221,0.0499913503177,0.0496446696636,0.0496100015982,0.0509620561491,0.0518287577843,0.0521061023075,0.0525221190924,0.0519674300459,0.0527647955503,0.0525914552232,0.053076808139,0.0535968291201,0.054186186232,0.0533888207276,0.0521407703729,0.0519327619805,0.0524181148962,0.0529381358773,0.0521061023075,0.0519327619805,0.0517940897189,0.0517594216535,0.0515860813264,0.0515860813264,0.0521754384384,0.0518287577843,0.0521754384384,0.0521407703729,0.0524527829616,0.0527301274849,0.0538395055779,0.0541168501012,0.0547755433439,0.0548795475401,0.0546022030169,0.0550528878672,0.0548102114093,0.0553302323904,0.0552262281942,0.0551915601288,0.0546368710823,0.0539435097741,0.0538741736433,0.0533888207276,0.0539781778395,0.0535274929893,0.0534928249238,0.0530074720081,0.0536314971855,0.0538741736433,0.0534928249238,0.0536314971855,0.053076808139,0.0538395055779,0.0532848165314,0.053250148466,0.0530074720081,0.0532848165314,0.053250148466,0.0529728039427,0.0535968291201,0.0537701694471,0.054359526559,0.0540475139704,0.0556422449791,0.0560929298294,0.0564396104835,0.0568902953338,0.0560235936986,0.0563009382219,0.0559542575678,0.0569249633992,0.0566129508105,0.057756996969,0.0577916650344,0.0578263330998,0.0585890305388,0.0585196944079,0.059629072501,0.0594557321739,0.0599757531551,0.0596984086318,0.0595944044356,0.0588317069966,0.057930337296,0.0578610011652,0.0571329717916,0.0575143205111,0.0559889256332,0.0564396104835,0.0559542575678,0.0561275978948,0.0563702743527,0.0564742785489,0.0569249633992,0.0574103163149,0.0577223289036,0.057930337296,0.0590397153891,0.0586583666696,0.0587277028004,0.0585543624733,0.0591090515199,0.0591783876507,0.0582423498847,0.0577916650344,0.0566822869413,0.0564049424181,0.0568556272684,0.0572716440533,0.058103677623,0.0586236986042,0.0584156902117,0.0585543624733,0.0600104212205,0.0602530976783,0.0612584715751,0.0621598412757,0.0624718538644,0.0625758580606,0.0611891354443,0.0613624757714,0.0611197993135,0.060565110267,0.0601490934821,0.0602877657437,0.060565110267,0.059802412828,0.0593517279777,0.0589357111928,0.0595250683048,0.0592130557161,0.0597677447626,0.0599064170242,0.0601144254167,0.0600104212205,0.0597677447626,0.0600104212205,0.0602877657437,0.0610157951173,0.0617438244908,0.0616398202946,0.0619518328833,0.0627838664531,0.0628532025839,0.0632692193688,0.0642745932656,0.0640665848731,0.0639279126115,0.0638932445461,0.0632692193688,0.0643785974618,0.0635812319574,0.0636852361537,0.0636505680883,0.0637199042191,0.0634078916304,0.0636852361537,0.0642052571348,0.0640319168077,0.0653493032932,0.0654533074894,0.0667706939749,0.066181336863,0.0665626855825,0.0670480384982,0.0667013578441,0.0662853410592,0.0658346562089,0.0663893452554,0.0653839713586,0.0646559419851,0.0645519377888,0.0651759629662,0.0648292823121,0.0645866058543,0.0653146352278,0.0659039923397,0.0666666897787,0.0673600510869,0.0685734333761,0.068989450161,0.0687814417686,0.0686427695069,0.0696134753384,0.0700294921232,0.0697868156654,0.069925487927,0.0700641601886,0.0695094711421,0.0693707988805,0.0695788072729,0.0702375005157,0.0703761727773,0.0704108408427,0.0715895550666,0.0721789121785,0.0728722734867,0.073322958337,0.0747443490187,0.075368374196,0.075368374196,0.0749176893457,0.0756803867847,0.0760270674387,0.0764084161582,0.0766857606815,0.0767897648777,0.0769284371393,0.0767550968123,0.0775871303821,0.0784191639519,0.0802565714185,0.0804992478763,0.0811232730537,0.0809152646612,0.080984600792,0.0819899746888,0.0819899746888,0.0825793318008,0.0816086259694,0.0823019872775,0.0818513024272,0.0823713234083,0.0821286469505,0.0819553066234,0.0831686889127,0.0834807015014,0.0841740628095,0.0843474031366,0.085491449295,0.0853874450988,0.085491449295,0.0855261173604,0.0860114702761,0.085664789622,0.0854221131642,0.0850407644447,0.0855261173604,0.0852834409026,0.0857341257529,0.0872595206308,0.0878142096773,0.0893742726207,0.0896862852093,0.0916623649376,0.0931877598155,0.0943318059739,0.0944011421047,0.0947824908242,0.0953718479362,0.094851826955,0.0953718479362,0.0955451882632,0.0959612050481,0.0951638395437,0.0940544614507,0.0939851253199,0.0943664740393,0.095441184067,0.0957185285902,0.0959612050481,0.0964465579638,0.096377221833,0.0973479276644,0.0988733225423,0.0998093603083,0.100329381289,0.100988074532,0.100502721616,0.100537389682,0.100814734205,0.100849402271,0.101404091317,0.101300087121,0.101196082925,0.100988074532,0.100676061944,0.100988074532,0.102028116494,0.102236124887,0.103137494587,0.104974902054,0.105425586904,0.106396292736,0.107228326306,0.108927061511,0.109932435407,0.1110418135,0.1110418135,0.112567208378,0.112775216771,0.112532540313,0.112983225163,0.114057935191,0.113745922602,0.113745922602,0.114057935191,0.114161939387,0.116207355246,0.115791338461,0.117212729143,0.117802086255,0.118564783694,0.118980800479,0.119743497918,0.11995150631,0.120922212142,0.123036964131,0.122794287674,0.12289829187,0.122620947346,0.122655615412,0.123487648982,0.124077006094,0.125221052252,0.125359724514,0.125706405168,0.125290388383,0.126191758083,0.127890493288,0.128237173943,0.128687858793,0.129103875578,0.129103875578,0.130421262063,0.132085329203,0.133853400539,0.134304085389,0.134616097977,0.136002820594,0.138082904518,0.139573631331,0.140891017816,0.143525790787,0.143941807572,0.145120521796,0.147027265393,0.148240647683,0.149627370299,0.149870046757,0.149419361907,0.151048760981,0.151568781962,0.151534113896,0.152990172643,0.153752870082,0.153822206213,0.155971626269,0.15860639924,0.15988911766,0.161899865453,0.163009243546,0.164777314882,0.165609348452,0.166129369433,0.167620096245,0.167620096245,0.166857398807,0.166580054283,0.167932108834,0.168937482731,0.169076154993,0.170012192759,0.169908188562,0.171606923767,0.173236322842,0.175177734504,0.177015141971,0.177119146167,0.178020515868,0.179303234288,0.180481948512,0.182180683717,0.184884792818,0.185994170911,0.186063507042,0.187207553201,0.188108922901,0.190189006826,0.191333052984,0.191714401704,0.19348247304,0.191853073965,0.191922410096,0.191749069769,0.19348247304,0.194557183067,0.194695855329,0.195597225029,0.196706603122,0.197850649281,0.198093325739,0.200901439037,0.202045485195,0.203189531354,0.202149489391,0.201837476803,0.204368245577,0.206552333698,0.206829678221,0.208667085688,0.210712501547,0.211648539313,0.212757917406,0.214144640022,0.217368770105,0.21944885403,0.220211551469,0.219795534684,0.222152963132,0.223609021879,0.22457972771,0.225169084822,0.224406387383,0.224891740299,0.223782362206,0.224337051252,0.224406387383,0.225307757084,0.224510391579,0.22284632444,0.221147589235,0.220662236319,0.222222299262,0.224059706729,0.224406387383,0.223262341225,0.223123668963,0.222291635393,0.223470349617,0.223921034467,0.223955702533,0.224683731906,0.224683731906,0.223539685748,0.224025038664,0.224406387383,0.224302383187,0.22374769414,0.221944954739,0.221598274085,0.221875618608,0.219622194357,0.219691530488,0.218200803675,0.216190055881,0.216398064274,0.214907337461,0.213867295499,0.21182187964,0.211405862855,0.208597749557,0.208563081492,0.206517665633,0.204160237185,0.204056232989,0.200069405467,0.198960027374,0.19778131315,0.196394590534,0.193898489824,0.193586477236,0.191853073965,0.19015433876,0.18797025064,0.186098175108,0.186028838977,0.184503444099,0.181591326605,0.180655288839,0.179545910746,0.17867920911,0.178332528456,0.177049810036,0.177569831017,0.176668461317,0.174900389981,0.17309765058,0.173687007692,0.172126944748,0.170358873413,0.168798810469,0.165886692975,0.166094701368,0.164499970359,0.162315882238,0.161934533519,0.161587852865,0.160305134444,0.160235798314,0.160062457987,0.159785113463,0.159646441202,0.1569423321,0.156283638857,0.155624945614,0.154966252372,0.153822206213,0.152366147466,0.15052874,0.14886467286,0.146645916674,0.144461828553,0.142867097544,0.139989648116,0.138568257434,0.137632219668,0.135482799613,0.133680060211,0.133125371165,0.131703980483,0.129831904951,0.130663938521,0.129970577213,0.129866573017,0.128133169746,0.126122421953,0.12591441356,0.124735699336,0.123418312851,0.122274266692,0.12161557345,0.119570157591,0.118634119825,0.117906090451,0.117802086255,0.116900716554,0.116796712358,0.117940758516,0.116762044293,0.116900716554,0.116519367835,0.115999346854,0.116034014919,0.115826006527,0.116172687181,0.116068682984,0.115548662003,0.113884594864,0.113329905817,0.112081855463,0.112393868051,0.112289863855,0.111145817697,0.11059112865,0.109585754753,0.108372372464,0.10591093982,0.105806935624,0.10546025497,0.104385544942,0.103761519765,0.10251346941,0.101993448429,0.101265419055,0.100710730009,0.10078006614,0.101404091317,0.100918738401,0.10123075099,0.101022742598,0.100641393878,0.100121372897,0.0998786964391,0.099358675458,0.0988733225423,0.0974172637952,0.0980412889725,0.0966545663562,0.0956838605248,0.0951638395437,0.0939504572544,0.0935344404696,0.092043713657,0.0908649994332,0.0897556213401,0.0896516171439,0.0879182138735,0.0878488777427,0.0873981928924,0.0878142096773,0.0875021970886,0.0867394996497,0.0872941886962,0.0875368651541,0.0872941886962,0.0872941886962,0.0872595206308,0.0875368651541,0.0871208483692,0.0873288567616,0.0860114702761,0.0865661593226,0.0864621551264,0.0865661593226,0.0860461383415,0.0857687938183,0.0844514073328,0.0845900795944,0.0845207434636,0.0833073611743,0.0842433989403,0.0838620502209,0.0828220082586,0.0824753276046,0.0829260124548,0.083619373763,0.0842433989403,0.0836887098938,0.083619373763,0.0838620502209,0.082683335997,0.0829260124548,0.0828220082586,0.0831686889127,0.0824059914737,0.0821286469505,0.0812272772499,0.0802219033531,0.0799445588298,0.0801872352877,0.0807419243342,0.0791818613908,0.0788351807368,0.0778298068399,0.0783844958865,0.0766857606815,0.0769977732702,0.0771017774664,0.0765124203545,0.076131071635,0.0757497229155,0.0761657397004,0.0764430842236,0.0761657397004,0.0754030422614,0.0752643699998,0.0748136851495,0.0741896599721,0.0740163196451,0.072733601225,0.0721095760477,0.0721095760477,0.0719015676552,0.0716588911974,0.0710348660201,0.0715548870012,0.0719709037861,0.0724909247672,0.0726295970288,0.0726989331596,0.0723522525055,0.0721442441131,0.0719015676552,0.0715202189358,0.0713122105433,0.0706188492352,0.0699948240578,0.0689201140302,0.0685734333761,0.0679147401334,0.068226752722,0.0674987233485,0.0671520426944,0.0673947191523,0.0673947191523,0.0680187443296,0.0673600510869,0.0667013578441,0.0664933494517,0.0660773326668,0.0661466687976,0.0657653200781,0.0664240133209,0.065245299097,0.0660773326668,0.0654879755549,0.0657999881435,0.0656266478165,0.0646212739197,0.0647252781159,0.0642399252002,0.0652106310316,0.0634772277612,0.0636852361537,0.0625758580606,0.0621251732103,0.0617784925562,0.0623331816028,0.0621945093411,0.0625758580606,0.0622985135374,0.0613278077059,0.0619171648179,0.0616398202946,0.0615358160984,0.0610851312481,0.060738450594,0.0601837615475,0.0608424547902,0.0606691144632,0.0610851312481,0.0611544673789,0.0605997783324,0.0613624757714,0.061501148033,0.0619865009487,0.0614318119022,0.0619865009487,0.0607731186594,0.0605304422016,0.0593170599123,0.058866375062,0.0594557321739,0.0590050473236,0.0578610011652,0.0568902953338,0.0572716440533,0.0570636356608,0.0576876608382,0.0578610011652,0.0581383456885,0.0586236986042,0.0583810221463,0.0584850263425,0.0594904002393,0.0592130557161,0.0593170599123,0.0590397153891,0.0587623708658,0.0577223289036,0.0577916650344,0.0572023079225,0.0567516230722,0.056231602091,0.0559542575678,0.0564742785489,0.056058261764,0.0556769130445,0.0567516230722,0.0567516230722,0.0574103163149,0.0566476188759,0.0563356062873,0.0559889256332,0.0555382407829,0.0556769130445,0.0556769130445,0.055884921437,0.0546715391477,0.0549835517364,0.0538395055779,0.0546368710823,0.0547755433439,0.0554342365867,0.0552608962596,0.0546368710823,0.0539435097741,0.0530421400735,0.0529034678119,0.0526954594195,0.0531461442698,0.0522101065038,0.0525567871578,0.0525914552232,0.0522101065038,0.0516554174572,0.053076808139,0.0535274929893,0.0529728039427,0.0528341316811,0.0526261232887,0.0529381358773,0.053423488793,0.0522101065038,0.0529728039427,0.053423488793,0.0531461442698,0.0531461442698,0.0538048375125,0.0536314971855,0.0541515181666,0.054359526559,0.0542208542974,0.055122223998,0.0546715391477,0.055122223998,0.0539781778395,0.0542901904282,0.0541168501012,0.0547755433439,0.0542555223628,0.0542901904282,0.0540821820358,0.0539435097741,0.0545328668861,0.0543941946244,0.0552262281942,0.0547755433439,0.0547755433439,0.0545675349515,0.0535968291201,0.0532848165314,0.0525914552232,0.0525567871578,0.0523141107,0.0522101065038,0.0524181148962,0.0520367661767,0.0518980939151,0.0519674300459,0.0518287577843,0.0517247535881,0.0520367661767,0.0515167451956,0.0510660603453,0.0512394006724,0.0504767032334,0.0507887158221,0.0506500435604,0.0506500435604,0.0518980939151,0.0526954594195,0.0525221190924,0.0529034678119,0.0529728039427,0.0531114762044,0.0527301274849,0.0530074720081,0.0537355013817,0.054012845905,0.0537701694471,0.0536661652509,0.0531808123352,0.0535621610547,0.054012845905,0.0533194845968,0.0533888207276,0.0530074720081,0.0523487787654,0.051378072934,0.0511007284107,0.0506500435604,0.0505807074296,0.0500606864485,0.0487086318976,0.0486392957668,0.0484659554397,0.0486739638322,0.0480499386549,0.0482232789819,0.0486739638322,0.047807262197,0.0480152705895,0.0474952496083,0.0482579470473,0.0481886109165,0.0480152705895,0.0483272831781,0.0486392957668,0.0478765983278,0.047807262197,0.0483272831781,0.0474952496083,0.0472872412159,0.0469752286272,0.0470098966926,0.04763392187,0.0466632160386,0.0470098966926,0.0477379260662,0.0475645857392,0.0471832370197,0.0480152705895,0.0482232789819,0.0483272831781,0.0480499386549,0.0478765983278,0.0480499386549,0.0483619512435,0.0483272831781,0.0477032580008,0.0484659554397,0.0481192747857,0.0479112663932,0.047980602524,0.0487779680284,0.0492633209441,0.049505997402,0.0491939848133,0.0493326570749,0.0495753335328,0.0492633209441,0.0491593167479,0.0495406654674,0.0494019932058,0.0488819722246,0.048569959636,0.0487779680284,0.048569959636,0.0488473041592,0.0491246486825,0.0497486738598,0.0502340267755,0.050615375495,0.0503380309718,0.0504767032334,0.0499913503177,0.0495406654674,0.0492979890095,0.0485006235052,0.0488473041592,0.0482926151127,0.0471485689543,0.0469058924964,0.0470792328234,0.0465938799077,0.0473565773467,0.0470098966926,0.0470098966926,0.0474605815429,0.0468365563656,0.0463165353845,0.0471139008889,0.0472525731505,0.047980602524,0.0486739638322,0.0481192747857,0.0483272831781,0.0481539428511,0.0477032580008,0.0472872412159,0.0468018883002,0.046697884104,0.045761846338,0.0451031530952,0.0441324472638,0.0444097917871,0.044063111133,0.043889770806,0.0440977791984,0.0443751237217,0.0450684850298,0.0450684850298,0.0456231740763,0.0448604766374,0.0454498337493,0.0454151656839,0.0459698547304,0.0458311824688,0.0455191698801,0.0453111614877,0.0453458295531,0.0450684850298,0.0450338169644,0.045172489226,0.0448604766374,0.0443404556563,0.0442017833946,0.0448604766374,0.0456231740763,0.0454498337493,0.0457965144034,0.0464552076461,0.0464552076461,0.0470098966926,0.0473219092813,0.0470792328234,0.0474952496083,0.0467325521694,0.0463858715153,0.0467325521694,0.0456925102071,0.0444791279179,0.0444097917871,0.044063111133,0.0439591069368,0.0431964094978,0.0430230691708,0.0428843969091,0.0431617414324,0.0432657456286,0.0436817624135,0.0447218043757,0.0445831321141,0.0446178001795,0.0447911405065,0.0465592118423,0.0458658505342,0.0467325521694,0.0465938799077,0.0465938799077,0.046871224431,0.0468365563656,0.0471139008889,0.0479112663932,0.0477725941316,0.0473219092813,0.0477032580008,0.0483966193089,0.0480152705895,0.0481886109165,0.0478419302624,0.0467325521694,0.0460738589266,0.0455538379455,0.0451031530952,0.0455885060109,0.0453111614877,0.0436817624135,0.0430924053016,0.0435430901519,0.04423645146,0.0453111614877,0.0454498337493,0.0457271782726,0.046108526992,0.045761846338,0.0456925102071,0.0465592118423,0.0472525731505,0.0465592118423,0.0460738589266,0.0456925102071,0.0463512034499,0.0463858715153,0.0469058924964,0.046871224431,0.0468018883002,0.047044564758,0.0462818673191,0.0461431950574,0.0464552076461,0.0467325521694,0.0464898757115,0.0460391908612,0.0453804976185,0.0449298127682,0.0446178001795,0.0435084220865,0.0437510985443,0.0440977791984,0.0437164304789,0.0432310775632,0.0432657456286,0.0434390859557,0.0428497288437,0.0431617414324,0.0428843969091,0.0439937750022,0.0444444598525,0.0442711195254,0.0438551027405,0.0441671153292,0.0438551027405,0.0433350817594,0.0436817624135,0.0432310775632,0.0441324472638,0.0438204346751,0.0437510985443,0.0435430901519,0.0439244388714,0.0443751237217,0.04423645146,0.0447218043757,0.0455191698801,0.0453111614877,0.045172489226,0.0445831321141,0.0447218043757,0.0441671153292,0.0446871363103,0.0444444598525,0.0452418253568,0.0455191698801,0.0447564724411,0.0448604766374,0.0442711195254,0.0449644808336,0.0454151656839,0.0458658505342,0.0456925102071,0.0452418253568,0.044825808572,0.0443404556563,0.0445484640487,0.0447564724411,0.0447564724411,0.0443404556563,0.0436470943481,0.0436470943481,0.0429537330399,0.0439591069368,0.0432310775632,0.0432657456286,0.0432657456286,0.0434044178902,0.0440284430676,0.0444097917871,0.0439591069368,0.0435430901519,0.0435430901519,0.0425030481897,0.043127073367,0.0429884011054,0.0428843969091,0.0427803927129,0.0430230691708,0.0422257036664,0.0382735442099,0.0343213847535,0.0302652211008,0.0260357171211,0.0)
m <- c(0.0263695102019,0.0307990342253,0.0351593469359,0.0396234766157,0.0437069440748,0.0433262818541,0.0436031271055,0.0431186479155,0.0433262818541,0.0433262818541,0.042357323474,0.0422189008482,0.0421496895354,0.0414229707503,0.0419420555968,0.0422535065047,0.0423919291304,0.0430494366026,0.0428071970076,0.0430148309462,0.0440183949827,0.0439837893263,0.043637732762,0.0442606345778,0.0445028741728,0.044122211952,0.0440530006392,0.0440876062956,0.0445374798292,0.0448835363936,0.0437069440748,0.0436723384184,0.0442952402342,0.0443990572035,0.0441914232649,0.0441568176085,0.0439837893263,0.0439837893263,0.0439145780134,0.0434993101362,0.0442952402342,0.0441568176085,0.0437761553877,0.0442606345778,0.0441568176085,0.0452295929579,0.0450911703322,0.0457486778044,0.0457832834608,0.0461293400251,0.0464061852766,0.046440790933,0.0460255230558,0.0454026212401,0.0452641986143,0.0442952402342,0.044675902455,0.0436031271055,0.0426341687254,0.0418728442839,0.0414575764067,0.041803632971,0.0420112669096,0.0425303517561,0.0421150838789,0.0425303517561,0.0420458725661,0.0417690273146,0.0422881121611,0.0422881121611,0.0423227178175,0.0425649574125,0.0433954931669,0.0430494366026,0.0434993101362,0.0433608875105,0.0442952402342,0.0443990572035,0.0444336628599,0.0447797194243,0.0447451137678,0.0445720854857,0.0440530006392,0.0437415497313,0.0439837893263,0.0439145780134,0.0433608875105,0.0439491836699,0.0443644515471,0.0446066911421,0.0445028741728,0.0443298458906,0.0446066911421,0.0449873533629,0.0450911703322,0.0460947343687,0.0459909173994,0.0460601287123,0.0458524947737,0.0455756495222,0.0457486778044,0.0462331569944,0.0458524947737,0.0459909173994,0.0457832834608,0.0451949873015,0.0454718325529,0.0452295929579,0.0453334099272,0.0455410438658,0.0461293400251,0.0455410438658,0.0464753965895,0.0458871004301,0.0452641986143,0.0447105081114,0.0440183949827,0.0435339157927,0.0439837893263,0.0444336628599,0.0437761553877,0.0451257759886,0.0451949873015,0.0464061852766,0.0476865945646,0.0483787076933,0.048517130319,0.0490016095091,0.0492784547605,0.0488631868833,0.0485517359755,0.0477212002211,0.0470636927488,0.046440790933,0.0464753965895,0.0466138192152,0.0471675097181,0.0473059323439,0.0468560588102,0.0469252701231,0.0473059323439,0.0464061852766,0.046198551338,0.0458871004301,0.045160381645,0.0447105081114,0.0442260289213,0.0446412967985,0.0437069440748,0.0435685214491,0.0434300988234,0.0440183949827,0.0447105081114,0.0456448608351,0.0456448608351,0.0458871004301,0.0457486778044,0.0456448608351,0.0472021153746,0.0477558058775,0.048032651129,0.0485517359755,0.0485517359755,0.0476519889082,0.0482056794111,0.0486209472883,0.0495206943556,0.0491400321348,0.0488977925398,0.0486901586012,0.0492092434477,0.0493476660734,0.0494168773863,0.0494860886991,0.0492784547605,0.0490708208219,0.0491400321348,0.049555300012,0.0495206943556,0.0492784547605,0.0494168773863,0.0488977925398,0.0487247642576,0.0481364680983,0.0484825246626,0.0486555529448,0.0481710737547,0.0483441020369,0.0480672567854,0.0483787076933,0.0474443549696,0.0472021153746,0.0466830305281,0.0479634398161,0.0472713266874,0.0470636927488,0.0478250171904,0.0473059323439,0.0473405380003,0.0474097493132,0.047478960626,0.0477212002211,0.0473405380003,0.0474097493132,0.0470982984053,0.0467868474974,0.0463715796202,0.0463369739637,0.0467868474974,0.0465792135588,0.0465792135588,0.0463023683073,0.0468906644667,0.0462677626509,0.0475135662825,0.0477904115339,0.0475135662825,0.0478596228468,0.047236721031,0.0470290870924,0.0470290870924,0.0471675097181,0.0466830305281,0.0469598757795,0.0461639456816,0.0467868474974,0.0468214531538,0.0466484248716,0.0468906644667,0.0473751436567,0.0476519889082,0.0478596228468,0.0490708208219,0.0496591169813,0.0502128074842,0.0498667509199,0.0502474131407,0.0512163715208,0.0514240054594,0.0512509771772,0.0515624280851,0.0517354563673,0.0513201884901,0.0509049206129,0.0507318923307,0.0504204414228,0.0503166244535,0.0494514830427,0.0492438491041,0.0494860886991,0.0493476660734,0.0494860886991,0.0492784547605,0.0493476660734,0.0488977925398,0.0488285812269,0.0487939755705,0.0491054264784,0.0486209472883,0.049555300012,0.049555300012,0.0490016095091,0.0490362151655,0.0488631868833,0.0490362151655,0.049555300012,0.0496591169813,0.0493822717298,0.0501435961714,0.049313060417,0.0486555529448,0.0489323981962,0.0491054264784,0.0489323981962,0.0491054264784,0.0485517359755,0.0489323981962,0.0496245113249,0.0494514830427,0.0486209472883,0.0494514830427,0.0493822717298,0.0487939755705,0.0488631868833,0.0489323981962,0.0494860886991,0.0489670038526,0.0478250171904,0.0479288341597,0.0484825246626,0.0488285812269,0.0487247642576,0.0495206943556,0.0495206943556,0.0494168773863,0.0491746377912,0.0486209472883,0.0497283282942,0.0495899056684,0.0499013565763,0.0487939755705,0.0494168773863,0.049797539607,0.0495899056684,0.0498321452635,0.0497629339506,0.0499013565763,0.0487247642576,0.0492784547605,0.049555300012,0.050593469705,0.0500743848585,0.0499359622328,0.05035123011,0.0512163715208,0.0516662450544,0.052669809091,0.0539156127226,0.0538810070661,0.0538464014097,0.0540886410047,0.0545731201948,0.0542962749433,0.0546077258512,0.053154288281,0.0529812599989,0.0524967808088,0.0519776959623,0.0523583581831,0.0520469072752,0.0515624280851,0.0511817658644,0.0515624280851,0.051389399803,0.0520123016187,0.0516662450544,0.0517700620237,0.0523237525266,0.0522545412138,0.0522891468702,0.0525313864652,0.0536387674711,0.0536733731275,0.0541232466612,0.0535003448454,0.0542962749433,0.0540886410047,0.0544693032255,0.0538810070661,0.0538810070661,0.0538810070661,0.0533965278761,0.0532927109068,0.0538464014097,0.0551960220106,0.0547115428205,0.055472867262,0.055230627667,0.0559919521085,0.0565802482679,0.057064727458,0.0571339387708,0.0572377557401,0.0567186708936,0.056026557765,0.0562341917036,0.0563034030164,0.0566494595808,0.0563380086729,0.0558881351392,0.0551614163541,0.0563380086729,0.0567186708936,0.05626879736,0.0567878822065,0.0566840652372,0.0561303747343,0.0559919521085,0.0556805012006,0.056511036955,0.0577914462431,0.0567186708936,0.0566840652372,0.0575838123045,0.0572377557401,0.0575146009916,0.0585181650281,0.0584835593717,0.0587604046232,0.058102897151,0.0579990801817,0.0585527706846,0.0580682914945,0.0576184179609,0.057549206648,0.057549206648,0.0576530236173,0.0578952632124,0.0579298688688,0.0578952632124,0.0578952632124,0.0573761783659,0.0578952632124,0.0577568405866,0.0589334329053,0.0589334329053,0.0593140951261,0.0584143480588,0.058587376341,0.0590718555311,0.0581721084638,0.0578952632124,0.0574453896787,0.0582759254331,0.0575146009916,0.0577914462431,0.0564764312986,0.057064727458,0.0573415727094,0.0580682914945,0.0588988272489,0.0594525177518,0.0597639686597,0.0591756725004,0.0604906874448,0.0602484478498,0.0603522648191,0.0600408139112,0.0603176591627,0.0596947573469,0.0602138421934,0.0605252931013,0.06170188542,0.0617364910764,0.0614942514814,0.0619095193586,0.0631553229902,0.0633975625852,0.0631899286466,0.0634667738981,0.0633283512723,0.0631899286466,0.0626016324872,0.0622555759229,0.0625670268308,0.0628438720823,0.0629476890516,0.0647125775296,0.0653354793454,0.0663736490384,0.0662006207563,0.0671003678235,0.06713497348,0.0683115657987,0.0677924809522,0.0684845940808,0.0688306506452,0.0674118187314,0.0675502413572,0.0669273395414,0.0668581282285,0.0665466773206,0.0670311565107,0.067377213075,0.0674118187314,0.067861692265,0.0682423544858,0.0695573694303,0.0709415956876,0.0711492296262,0.0719105540677,0.0719451597241,0.0724642445706,0.0727064841657,0.0742291330487,0.0739176821408,0.0729141181043,0.0718067370984,0.0713222579083,0.0713568635648,0.0715991031598,0.072014371037,0.0723258219449,0.0719451597241,0.0721527936627,0.0721873993192,0.0727756954785,0.0744713726437,0.0747482178952,0.0751634857724,0.0762362611218,0.0769975855634,0.0772398251584,0.0787624740414,0.0777589100049,0.0781049665692,0.0782779948514,0.077689698692,0.0773090364712,0.0777589100049,0.0773090364712,0.0775166704098,0.0773436421277,0.0773436421277,0.077931938287,0.078727868385,0.0798698550473,0.081046447366,0.0808734190838,0.0808388134274,0.0805965738324,0.0810118417096,0.0811848699917,0.0808388134274,0.0816693491818,0.0813232926175,0.081046447366,0.0808734190838,0.0817385604947,0.0833304206906,0.0842647734143,0.0855105770459,0.0866179580517,0.0877945503704,0.088002184309,0.0876561277447,0.089040354002,0.0893518049099,0.0904245802593,0.0903553689465,0.0923624970196,0.091912623486,0.0920856517681,0.0922586800503,0.0916011725781,0.093677511964,0.0941619911541,0.0951309495342,0.0946118646877,0.0941273854977,0.0935736949947,0.0940581741848,0.0940235685284,0.0953731891293,0.0956846400372,0.0963767531658,0.096549781448,0.0963767531658,0.0981070359875,0.0997335018398,0.0995950792141,0.0989375717419,0.0999757414348,0.0989375717419,0.100771671533,0.100737065876,0.100287192343,0.100114164061,0.0992836283062,0.0996988961834,0.100494826281,0.101706024256,0.101359967692,0.101498390318,0.101463784661,0.101706024256,0.103886180612,0.104612899397,0.106585421814,0.105997125654,0.10710450666,0.107485168881,0.108834789482,0.109976776144,0.110530466647,0.110841917555,0.10963071958,0.111257185432,0.111049551493,0.113748792695,0.112502989064,0.114060243603,0.114337088855,0.115998160363,0.115825132081,0.116724879148,0.118593584596,0.119839388227,0.12098137489,0.12039307873,0.121915727613,0.122884685993,0.124891814067,0.124580363159,0.126760519514,0.127694872238,0.128248562741,0.12932133809,0.129494366372,0.130013451219,0.130878592629,0.130947803942,0.131570705758,0.133854679083,0.135135088371,0.13669234291,0.13728063907,0.137903540885,0.139737640676,0.140464359461,0.140810416026,0.141779374406,0.142921361068,0.142955966725,0.14357886854,0.144201770356,0.14513612308,0.146797194589,0.14755851903,0.149046562257,0.152126465679,0.153130029716,0.154514255973,0.156867440611,0.158493906463,0.159359047874,0.160016555346,0.160535640193,0.161643021198,0.163996205836,0.164203839774,0.167214531884,0.167041503602,0.168737180767,0.170156012681,0.172336169036,0.17423948014,0.175589100741,0.176627270434,0.177907679722,0.179880202139,0.181056794457,0.183859852628,0.183340767782,0.184275120506,0.185278684542,0.186870544738,0.188566221903,0.190573349976,0.189915842504,0.193030351583,0.193757070368,0.194829845718,0.197217636011,0.198532650956,0.1998476659,0.202304667507,0.202581512759,0.203585076795,0.204830880427,0.204865486083,0.205592204868,0.205730627494,0.205972867089,0.206595768905,0.208741319604,0.209606461014,0.209917911922,0.210748447677,0.21227109656,0.212513336155,0.214728098167,0.216769831896,0.218984593908,0.220714876729,0.22061105976,0.222237525613,0.223656357526,0.225698091256,0.22760140236,0.227324557108,0.226078753477,0.226909289231,0.226113359133,0.226494021354,0.226113359133,0.225974936507,0.226009542164,0.224832949845,0.22410623106,0.225836513882,0.226147964789,0.224348470655,0.224659921563,0.223725568839,0.224521498937,0.224175442373,0.225005978127,0.223310300962,0.223414117931,0.221130144607,0.221718440766,0.222375948238,0.22206449733,0.221026327637,0.218984593908,0.216354564019,0.213897562412,0.214243618976,0.212513336155,0.212547941811,0.211094504241,0.209468038389,0.208083812131,0.208672108291,0.208256840414,0.207633938598,0.207599332941,0.205834444463,0.204104161642,0.203031386292,0.19946700368,0.198221200048,0.196006438036,0.193237985522,0.193272591178,0.193099562896,0.192684295019,0.192303632798,0.193237985522,0.191127040479,0.192511266737,0.192442055424,0.192545872393,0.192338238454,0.190919406541,0.189812025535,0.188808461498,0.188773855842,0.18655909383,0.186143825953,0.186316854235,0.18462117707,0.183998275254,0.182717865966,0.181472062334,0.179776385169,0.176800298716,0.173997240545,0.173132099134,0.172024718128,0.16929087127,0.168460335516,0.166626235725,0.166487813099,0.164549896339,0.165068981185,0.166037939565,0.165726488657,0.164861347247,0.165207403811,0.165380432093,0.164238445431,0.162992641799,0.161573809886,0.161089330695,0.158251666868,0.156729017985,0.154860312538,0.154098988096,0.152576339213,0.150430788514,0.14949643579,0.14960025276,0.148977350944,0.147523913374,0.147593124687,0.146278109742,0.146381926711,0.145447573988,0.144478615608,0.143959530761,0.143855713792,0.142090825314,0.140325936836,0.140845021682,0.139910668958,0.138837893609,0.137107610787,0.137107610787,0.136000229782,0.134685214837,0.132366635856,0.131328466163,0.130636353034,0.12835237971,0.127348815673,0.126864336483,0.127106576078,0.125203264974,0.123992066999,0.123092319932,0.123057714276,0.124649574472,0.124303517907,0.124891814067,0.123922855686,0.123922855686,0.122365601147,0.121984938926,0.122192572865,0.121673488018,0.120358473074,0.118766612878,0.117382386621,0.116240399958,0.11641342824,0.114613934106,0.114717751075,0.113229707849,0.111257185432,0.110980340181,0.112606806033,0.111014945837,0.111222579776,0.110668889273,0.110149804426,0.110253621395,0.110253621395,0.111014945837,0.111914692904,0.110980340181,0.10963071958,0.108419521604,0.108384915948,0.108108070697,0.106793055752,0.105997125654,0.104924350305,0.104336054145,0.10322867314,0.10215589779,0.100875488502,0.101325362036,0.100010347091,0.0983838812389,0.0977955850796,0.0973111058895,0.0973457115459,0.0959268796322,0.0958922739758,0.0972418945766,0.0962729361965,0.0957884570065,0.0957192456936,0.0956846400372,0.0954770060986,0.0953731891293,0.0952347665035,0.09575385135,0.0952001608471,0.0943696250927,0.0947848929699,0.0942658081234,0.0935736949947,0.0939197515591,0.0941273854977,0.094231202467,0.0938505402462,0.0931584271175,0.0926047366146,0.0916011725781,0.0917049895474,0.0920164404553,0.0915319612652,0.0910474820751,0.0903899746029,0.0902515519772,0.088555874812,0.0882790295605,0.0874138881497,0.0869986202725,0.0855797883587,0.0843685903836,0.0848184639172,0.0836418715985,0.0834688433163,0.0832958150342,0.0826037019055,0.0830881810956,0.0830881810956,0.0828459415005,0.0832958150342,0.0837110829113,0.0830189697827,0.083122786752,0.0824652792798,0.0812540813046,0.082084617059,0.0808388134274,0.0816693491818,0.081288686961,0.0809772360531,0.0802851229245,0.0795930097958,0.0791431362622,0.0784510231335,0.0783126005078,0.0780703609128,0.0781049665692,0.0761324441525,0.0749904574902,0.0744367669873,0.0741253160794,0.0742291330487,0.0746097952695,0.0744713726437,0.074332950018,0.0747136122388,0.0741945273923,0.0741945273923,0.0742637387051,0.073294780325,0.0727064841657,0.072256610632,0.0718413427548,0.0714260748776,0.0719797653806,0.0704571164975,0.0695227637738,0.0697996090253,0.0704571164975,0.0706993560926,0.0705263278104,0.0703532995282,0.0691767072095,0.069695792056,0.0687268336759,0.0690036789273,0.0695573694303,0.0688652563016,0.067861692265,0.0683461714551,0.0685191997373,0.0676886639829,0.0692113128659,0.0686230167066,0.0675156357007,0.0672733961057,0.0669619451978,0.067861692265,0.068415382768,0.067377213075,0.0668235225721,0.0674464243879,0.0653700850019,0.0659929868177,0.0668235225721,0.0667197056028,0.0664428603513,0.0656469302533,0.065300873689,0.0655085076276,0.0654046906583,0.0645395492475,0.0645741549039,0.0633629569288,0.0627746607694,0.0617710967328,0.0614942514814,0.0605945044141,0.0611135892606,0.0608713496656,0.0602138421934,0.060421476132,0.0611828005735,0.0610443779478,0.0610097722913,0.0614942514814,0.0620825476407,0.0626362381437,0.0618403080457,0.0613558288556,0.0616326741071,0.0613212231992,0.0610097722913,0.0610789836042,0.060663715727,0.0613904345121,0.0603176591627,0.0603522648191,0.0602138421934,0.060663715727,0.0601446308805,0.0601792365369,0.0602484478498,0.0596601516904,0.0590718555311,0.0578952632124,0.0582067141202,0.0587257989667,0.0591410668439,0.0591410668439,0.0599023912855,0.0595217290647,0.0593487007825,0.0597985743162,0.0605252931013,0.0609405609785,0.0609405609785,0.0602830535062,0.059867785629,0.0601100252241,0.0599716025983,0.0601100252241,0.0599023912855,0.0599369969419,0.0592448838132,0.0587257989667,0.0590026442182,0.0584835593717,0.0585181650281,0.0579990801817,0.0574799953352,0.0573415727094,0.0571339387708,0.0569955161451,0.057306967053,0.0579644745252,0.0565802482679,0.0563726143293,0.0561303747343,0.0567878822065,0.057064727458,0.0575146009916,0.0578952632124,0.0576876292738,0.0575838123045,0.0576530236173,0.0595217290647,0.0601100252241,0.0602830535062,0.0598331799726,0.0596601516904,0.0591064611875,0.0581721084638,0.0577568405866,0.0580336858381,0.0576184179609,0.0569955161451,0.0572723613966,0.056511036955,0.0563726143293,0.0565802482679,0.0575146009916,0.0580336858381,0.0586219819974,0.0581721084638,0.0573415727094,0.05626879736,0.0555766842313,0.0563034030164,0.05626879736,0.0564418256422,0.0558881351392,0.0561995860471,0.0562341917036,0.0555420785749,0.0555074729185,0.0561303747343,0.0557497125135,0.0545731201948,0.0535695561582,0.0525659921217,0.0525659921217,0.0525313864652,0.0527044147474,0.0534311335325,0.0539848240354,0.0537771900968,0.0535695561582,0.0536041618147,0.0536387674711,0.053707978784,0.0534311335325,0.0534311335325,0.0531196826246,0.0530850769682,0.0531196826246,0.0528082317167,0.052669809091,0.0540540353483,0.0550575993848,0.0556458955442,0.0553344446363,0.0549191767591,0.0549191767591,0.0550229937284,0.0540540353483,0.053707978784,0.0541232466612,0.0531888939375,0.0519084846494,0.0514240054594,0.0520123016187,0.0520123016187,0.0505588640486,0.0504204414228,0.0512855828337,0.051873878993,0.0522199355573,0.0527736260603,0.0531888939375,0.0530850769682,0.0529466543424,0.0532581052503,0.0536041618147,0.0530504713117,0.0524275694959,0.0521507242445,0.0519776959623,0.0509741319258,0.0509395262693,0.0505588640486,0.0502820187971,0.0494168773863,0.0502128074842,0.0501089905149,0.0501089905149,0.0495206943556,0.0493822717298,0.0501782018278,0.0494860886991,0.0497629339506,0.0491400321348,0.0499359622328,0.0494860886991,0.0498321452635,0.0505588640486,0.0509741319258,0.0514586111158,0.0508703149565,0.0517700620237,0.0528082317167,0.0524621751524,0.0516662450544,0.0519084846494,0.051631639398,0.0515970337416,0.0506626810179,0.0498321452635,0.0505588640486,0.0509049206129,0.0495206943556,0.0502128074842,0.0498667509199,0.0499013565763,0.0499013565763,0.0499013565763,0.0514240054594,0.0514586111158,0.0508703149565,0.0499013565763,0.0502474131407,0.0501782018278,0.0504896527357,0.0502128074842,0.0506280753614,0.0506972866743,0.0500743848585,0.0488631868833,0.0488977925398,0.0488977925398,0.0484825246626,0.0481018624418,0.048274890724,0.0483787076933,0.0481364680983,0.0478596228468,0.0476519889082,0.0486901586012,0.0481018624418,0.0478250171904,0.0480672567854,0.0482056794111,0.0485863416319,0.0483787076933,0.0481364680983,0.0479634398161,0.0484133133497,0.0490016095091,0.0499359622328,0.0509741319258,0.0504550470793,0.0504550470793,0.0499705678892,0.0495206943556,0.0499013565763,0.0496591169813,0.0488285812269,0.0478596228468,0.0474097493132,0.0465100022459,0.0470982984053,0.0468560588102,0.0467522418409,0.0423227178175,0.0372356863219,0.0324601057341,0.0282036099929,0.0)
ycorr <- c(2.14600874105e-05,2.12919202043e-05,2.07897693465e-05,1.99535534679e-05,1.8779435252e-05,1.72702372588e-05,1.54214278264e-05,1.35428679196e-05,1.16343378932e-05,9.69915926163e-06,7.73926992217e-06,5.75559932396e-06,3.74986817207e-06,1.71954236648e-06,-3.33702452408e-07,-2.4114597213e-06,-4.50982162319e-06,-6.62940958507e-06,-8.76994543156e-06,-1.09351596751e-05,-1.31288752722e-05,-1.5350269072e-05,-1.75999982149e-05,-1.98799203594e-05,-2.21898522233e-05,-2.45278601949e-05,-2.68920154823e-05,-2.92830314222e-05,-3.16970310865e-05,-3.4133790537e-05,-3.6591267348e-05,-3.90719430245e-05,-4.15809410742e-05,-4.41115410535e-05,-4.6668316275e-05,-4.92492153864e-05,-5.1858291166e-05,-5.44957292185e-05,-5.71646198624e-05,-5.98661973162e-05,-6.26029784922e-05,-6.53714612463e-05,-6.81678309388e-05,-7.09940325416e-05,-7.3852428721e-05,-7.67385550435e-05,-7.96523659056e-05,-8.25897151616e-05,-8.554955123e-05,-8.85354984947e-05,-9.15464688918e-05,-9.45773166352e-05,-9.76311638031e-05,-0.000100707640632,-0.000103801706553,-0.000106920541192,-0.000110062281447,-0.000113230860421,-0.000116427963486,-0.00011964701445,-0.000122889285799,-0.000126154382442,-0.000129444685221,-0.000132758621268,-0.000136091330736,-0.000139440254627,-0.000142802435007,-0.000146172497911,-0.000149545723447,-0.000152919536655,-0.000156294411114,-0.000159666617741,-0.000163032047744,-0.000166389050764,-0.000169740133657,-0.000173085173833,-0.000176418930919,-0.000179741907164,-0.000183058276668,-0.00018637230408,-0.000189685005352,-0.000192998222408,-0.00019630577315,-0.000199610146246,-0.000202906981728,-0.000206194930678,-0.000209479191304,-0.00021276434476,-0.000216044116503,-0.000219312296167,-0.000222557007056,-0.000225776906711,-0.000228974063105,-0.000232147472575,-0.000235294534102,-0.000238415041214,-0.000241504170039,-0.000244558049014,-0.000247578840633,-0.000250567055165,-0.000253527755201,-0.000256465977885,-0.000259377138716,-0.000262258146698,-0.000265116047661,-0.000267945024201,-0.000270747645066,-0.000273519318424,-0.00027625856785,-0.000278967046179,-0.000281647081214,-0.000284298182214,-0.000286922710338,-0.00028952777807,-0.000292107349755,-0.000294665461638,-0.000297209276836,-0.000299743028008,-0.000302270484207,-0.000304791613951,-0.000307301333171,-0.000309796279358,-0.000312277481037,-0.000314739530819,-0.000317182658973,-0.000319613510888,-0.000322020214007,-0.000324401590309,-0.000326752185161,-0.00032907210458,-0.000331362056922,-0.000333620786378,-0.000335846443375,-0.000338037412114,-0.000340196261931,-0.000342316167275,-0.000344399058573,-0.000346448451343,-0.000348467930217,-0.000350456106981,-0.000352417379905,-0.000354357203834,-0.000356280304795,-0.000358191128246,-0.00036009071363,-0.000361981148444,-0.000363864566351,-0.000365735057757,-0.000367592530009,-0.000369432852194,-0.000371252884876,-0.000373048193089,-0.000374811439711,-0.000376543044041,-0.000378241565548,-0.000379902495018,-0.000381526845882,-0.000383119180204,-0.000384680657841,-0.000386212971212,-0.000387720275044,-0.000389204484084,-0.000390668961169,-0.000392114319633,-0.000393537422097,-0.00039494129202,-0.000396327950859,-0.000397692052815,-0.000399029013548,-0.000400342243257,-0.000401630541911,-0.000402891286825,-0.000404126558088,-0.000405335197963,-0.000406517321361,-0.000407672246183,-0.000408796792924,-0.00040989398768,-0.000410968334181,-0.000412019578849,-0.000413044511348,-0.000414045547449,-0.000415026274137,-0.000415986427845,-0.000416926338368,-0.000417847234096,-0.000418752536124,-0.00041964785609,-0.000420531812241,-0.00042140704244,-0.000422275196963,-0.000423139992656,-0.000423995074072,-0.000424836630104,-0.000425669206308,-0.00042649239348,-0.000427306270107,-0.000428107592044,-0.000428891334621,-0.000429656074257,-0.000430402352996,-0.000431126150331,-0.000431828609684,-0.000432513229082,-0.000433177983198,-0.000433823013868,-0.000434452168727,-0.000435063262178,-0.000435661616091,-0.000436247956329,-0.000436822158328,-0.000437382451751,-0.00043793397318,-0.000438475607226,-0.000439010067117,-0.000439537230236,-0.000440052179939,-0.000440550381553,-0.000441034707433,-0.000441501802239,-0.000441950359395,-0.000442381600066,-0.000442792570625,-0.00044318512551,-0.000443557066005,-0.000443907510338,-0.000444238306777,-0.000444554005396,-0.000444853825556,-0.000445136986793,-0.000445405509315,-0.000445662011998,-0.000445908190161,-0.000446141910537,-0.000446362400612,-0.000446572268155,-0.000446768640226,-0.000446952918465,-0.000447123556695,-0.000447282738282,-0.0004474319497,-0.000447569388823,-0.000447694582983,-0.000447809098287,-0.000447917122817,-0.00044801884557,-0.000448114191867,-0.000448206210643,-0.000448293727201,-0.000448379375721,-0.000448463456464,-0.000448546133044,-0.000448628024693,-0.000448707366434,-0.000448780026298,-0.00044884113481,-0.000448891759776,-0.000448929300492,-0.000448953497939,-0.000448963660356,-0.000448955994775,-0.000448932528137,-0.000448889655361,-0.000448828545125,-0.000448750470438,-0.000448658431255,-0.000448553576035,-0.000448433361992,-0.000448300755537,-0.000448154738183,-0.000447996732197,-0.000447827575267,-0.000447643885551,-0.000447451971432,-0.000447248950707,-0.000447036112648,-0.000446814102864,-0.000446586484981,-0.000446353319769,-0.000446112151012,-0.000445864818146,-0.000445608709523,-0.000445346682369,-0.000445075446815,-0.00044479635345,-0.000444510558342,-0.000444217308549,-0.000443913779837,-0.000443596319783,-0.000443265007802,-0.000442919189508,-0.000442560583234,-0.000442192139954,-0.000441812118501,-0.000441420176651,-0.000441011371066,-0.000440585581231,-0.000440142383783,-0.000439685763541,-0.000439220079252,-0.000438744915861,-0.000438259846175,-0.000437764450773,-0.000437256407369,-0.000436735278116,-0.000436204595356,-0.000435664242146,-0.000435114204103,-0.000434553704824,-0.000433980018127,-0.000433392316528,-0.000432794032579,-0.000432182298516,-0.000431555495916,-0.000430917387349,-0.000430268937542,-0.000429610040456,-0.000428942625394,-0.000428267176934,-0.000427582493567,-0.000426888642058,-0.00042618233875,-0.000425463381425,-0.000424736637307,-0.000424000423145,-0.000423252326047,-0.000422494207463,-0.000421726882816,-0.000420948738621,-0.000420164200909,-0.000419375591798,-0.000418580039382,-0.000417780203014,-0.00041697437243,-0.00041616503318,-0.00041535449416,-0.000414540241562,-0.000413719336979,-0.000412892459345,-0.000412057134551,-0.000411210216828,-0.000410354693806,-0.000409492920166,-0.000408624867329,-0.000407749564112,-0.000406863248255,-0.000405967139252,-0.000405063993922,-0.000404152699942,-0.000403231341136,-0.000402301733954,-0.000401361892761,-0.000400407921214,-0.000399440574798,-0.000398457265175,-0.000397460617777,-0.000396449851141,-0.000395421950732,-0.000394378469637,-0.000393322770759,-0.000392255172649,-0.000391177022019,-0.000390089346087,-0.00038899438349,-0.000387892949127,-0.000386786395175,-0.000385672919487,-0.000384554738945,-0.000383431643835,-0.000382302576581,-0.000381164700719,-0.000380019038052,-0.000378868942591,-0.000377712345569,-0.000376548557821,-0.000375375474335,-0.00037419597188,-0.000373009272204,-0.000371816292099,-0.000370619135832,-0.000369418269951,-0.000368213153101,-0.000367001862729,-0.000365782180579,-0.000364555318224,-0.000363321875281,-0.000362080885009,-0.000360833237558,-0.000359577912262,-0.000358312045112,-0.000357035243482,-0.000355747602133,-0.00035444962225,-0.000353143127181,-0.000351827827074,-0.000350503706105,-0.000349171128963,-0.000347830532053,-0.000346479457652,-0.000345119246361,-0.000343751433698,-0.000342374986737,-0.000340986915379,-0.000339588989334,-0.000338180409926,-0.000336761136023,-0.000335331330696,-0.000333889131868,-0.00033243582287,-0.000330971363138,-0.000329497339889,-0.000328014109925,-0.00032652678948,-0.000325033253338,-0.000323532773867,-0.000322026028072,-0.000320514641846,-0.000319000062805,-0.000317483266191,-0.000315964480998,-0.000314441112328,-0.000312911212817,-0.000311372115999,-0.000309823594534,-0.000308269426705,-0.000306708348147,-0.000305139544573,-0.000303558860431,-0.000301964500385,-0.000300353428287,-0.000298726589265,-0.000297087573184,-0.000295437042027,-0.000293775437156,-0.000292099395764,-0.000290407881193,-0.000288698630617,-0.000286974256676,-0.000285237650247,-0.000283489430429,-0.000281731454424,-0.000279961476874,-0.000278177413535,-0.000276376649291,-0.000274559778561,-0.000272726999028,-0.000270881704842,-0.000269025816342,-0.00026715805483,-0.000265278262932,-0.000263386816667,-0.000261482110849,-0.000259564304743,-0.000257636786587,-0.000255700721928,-0.00025375632444,-0.000251799664866,-0.000249827781005,-0.000247841865388,-0.000245843075613,-0.000243832096,-0.000241809864628,-0.00023977865964,-0.000237737016871,-0.00023568223406,-0.0002336145392,-0.000231534294632,-0.000229444718756,-0.000227344741753,-0.000225233319698,-0.000223106001842,-0.000220961210985,-0.000218797710874,-0.000216615035052,-0.0002144152476,-0.000212202045257,-0.000209976908813,-0.00020774038763,-0.000205491398429,-0.000203230323381,-0.000200958322258,-0.000198678024455,-0.000196387715556,-0.000194085510802,-0.000191771451101,-0.000189443566378,-0.000187098022804,-0.000184735024977,-0.000182354809534,-0.000179957726296,-0.000177541301233,-0.0001751061506,-0.000172653747267,-0.000170187576451,-0.000167709205138,-0.00016521893339,-0.000162717738752,-0.000160202608422,-0.000157671996801,-0.000155125437114,-0.000152565268929,-0.000149992156192,-0.000147403029971,-0.000144796093699,-0.000142167897216,-0.000139515462738,-0.000136840543171,-0.00013414373009,-0.000131428055092,-0.000128693148503,-0.000125938972807,-0.000123163887332,-0.000120372861683,-0.000117565963875,-0.000114745126582,-0.000111913543006,-0.000109070406404,-0.000106214771141,-0.000103346106513,-0.000100465797416,-9.7575126565e-05,-9.46732420586e-05,-9.17597004433e-05,-8.88323772413e-05,-8.58931047765e-05,-8.29372137995e-05,-7.99657664742e-05,-7.69821492044e-05,-7.39825717548e-05,-7.09672121556e-05,-6.79341713672e-05,-6.48835074252e-05,-6.18153946962e-05,-5.87291565216e-05,-5.56235212464e-05,-5.25012622482e-05,-4.9365478456e-05,-4.6212610896e-05,-4.30444621515e-05,-3.9861412808e-05,-3.66634233755e-05,-3.34505894179e-05,-3.02222600213e-05,-2.69818349638e-05,-2.37294652849e-05,-2.04653768071e-05,-1.71841441625e-05,-1.38849760848e-05,-1.05702113877e-05,-7.23895082776e-06,-3.89413066901e-06,-5.37437889058e-07,2.83077563938e-06,6.21173402337e-06,9.6109177215e-06,1.30251883261e-05,1.64537251823e-05,1.98935191344e-05,2.33448647386e-05,2.68084851667e-05,3.02847617946e-05,3.37753401873e-05,3.72814229879e-05,4.08045523862e-05,4.43421357006e-05,4.78960565159e-05,5.14685429067e-05,5.5057759694e-05,5.86644959299e-05,6.22880720081e-05,6.5931682611e-05,6.95956596173e-05,7.32801684648e-05,7.69834412228e-05,8.07018308886e-05,8.44341571145e-05,8.81753982029e-05,9.19290512717e-05,9.56976707359e-05,9.94818913682e-05,0.000103280687191,0.000107091174858,0.000110913653846,0.000114748520492,0.000118598500844,0.000122466554228,0.000126356245969,0.00013026734197,0.000134196264267,0.000138141459543,0.000142112740309,0.000146125276768,0.000150192453824,0.000154324589794,0.000158581070002,0.000162685058104,0.000166690442798,0.000170605929682,0.000174443611976,0.000178215851729,0.000181929988754,0.000185578411804,0.000189145478909,0.000192620186772,0.00019599253053,0.000199201619418,0.000202521338674,0.000205898714359,0.000209322794615,0.000212784408196,0.000216273774795,0.000219783257228,0.000223309769487,0.000226852690528,0.000230410895973,0.000233984398948,0.000237574730777,0.000241180589425,0.000244802424569,0.000248440764741,0.000252094145983,0.000255761275649,0.000259443081661,0.00026314056367,0.000266854688809,0.000270584157928,0.000274329841959,0.000278092718528,0.000281876919817,0.000285679165772,0.000289499617602,0.000293336301641,0.000297189379583,0.000301057944545,0.000304943101811,0.000308846311583,0.000312765379482,0.00031669876451,0.000320643016445,0.000324598094895,0.000328565598316,0.000332545976365,0.000336542099108,0.000340553779454,0.000344580236089,0.0003486193059,0.000352671644879,0.00035673845126,0.000360817843719,0.000364911117588,0.000369015236207,0.00037313194729,0.000377257222276,0.000381389337224,0.000385524140465,0.000389662487489,0.00039380511945,0.000397950019685,0.00040209981628,0.000406255622077,0.000410417212321,0.000414581756341,0.000418746733442,0.000422914398824,0.000427086430389,0.000431264930958,0.0004354489086,0.000439638394143,0.000443832867114,0.000448030297707,0.000452229075113,0.000456431720503,0.000460641671412,0.00046485837089,0.000469083749747,0.000473315378745,0.000477553615084,0.000481796795556,0.000486042256188,0.00049028951406,0.000494538660631,0.000498788624575,0.000503036184887,0.000507281510752,0.000511522183659,0.000515756589526,0.000519981602543,0.000524196692475,0.000528403147473,0.000532602499314,0.000536795045771,0.000540977702755,0.000545150627933,0.000549313034725,0.000553461833131,0.000557596730394,0.000561716983725,0.000565821107982,0.000569905290181,0.000573965544522,0.000577997279052,0.000582000583511,0.000585976492432,0.000589921730797,0.000593834238857,0.000597715113484,0.000601563161783,0.000605380361445,0.000609170073885,0.000612932081771,0.000616668866308,0.000620379632579,0.000624059066686,0.000627708008149,0.000631329935862,0.000634921102357,0.000638480585094,0.000642007298924,0.000645495983813,0.00064894602779,0.000652359087667,0.000655730840282,0.00065906445885,0.000662357124731,0.000665604590536,0.000668803707896,0.000671956366004,0.000675057981854,0.00067810625985,0.000681099857472,0.00068403543101,0.000686911749196,0.000689731177383,0.000692491630106,0.0006951964286,0.000697846106192,0.000700438073133,0.000702972367788,0.000705453164831,0.000707879178164,0.000710248489323,0.000712560249639,0.000714810996015,0.000716997391904,0.000719115773923,0.000721163348935,0.000723139485772,0.000725045184685,0.00072687814174,0.000728635961739,0.00073032051832,0.000731931494549,0.000733468046241,0.000734933551825,0.000736330291855,0.000737659003515,0.000738921630862,0.000740117744899,0.000741246126031,0.000742307910202,0.000743302318673,0.000744230556603,0.000745092005312,0.000745887240611,0.000746610874348,0.000747264068935,0.000747844810436,0.000748351835508,0.000748783217391,0.000749138698176,0.000749416019572,0.000749614388579,0.000749732831437,0.000749771683908,0.000749732729842,0.000749620235555,0.000749433425701,0.000749175130535,0.000748844484571,0.000748444335616,0.000747977685017,0.000747446534979,0.000746852382689,0.000746196475012,0.000745479335949,0.000744695688151,0.00074384401837,0.000742919458881,0.000741925151799,0.000740862850737,0.000739730004801,0.000738527083803,0.000737253953483,0.000735908306365,0.000734490563635,0.000733002597023,0.000731449023958,0.000729832340319,0.00072815806881,0.000726422672561,0.000724627841714,0.000722774636746,0.000720862921854,0.000718895091913,0.00071687370172,0.000714798306776,0.000712668509756,0.000710484558208,0.000708243059761,0.000705944028929,0.000703588583395,0.000701177178842,0.000698711765004,0.000696192919618,0.000693620308627,0.000690996414314,0.000688321118878,0.000685596432467,0.000682825468528,0.000680010154607,0.000677151946342,0.000674252719118,0.000671311931561,0.000668328710192,0.0006653019792,0.000662231163689,0.000659115565943,0.000655958826733,0.00065275949702,0.000649517800421,0.000646234541987,0.000642908563205,0.000639540726634,0.000636133285389,0.000632688759828,0.00062920998259,0.000625698515317,0.000622152120076,0.000618569210658,0.000614953644916,0.000611302925839,0.000607618005467,0.000603901169776,0.000600150264634,0.000596365826689,0.000592548602253,0.000588699903662,0.000584822462657,0.000580919465314,0.0005769905797,0.000573037230921,0.000569060710359,0.000565062747164,0.000561043354049,0.000557006858618,0.000552950983071,0.000548876255992,0.000544781441224,0.000540666707604,0.000536532525322,0.000532380432555,0.000528211310571,0.000524025692238,0.000519825018082,0.000515607787779,0.00051137521619,0.000507130780254,0.000502874976104,0.000498609999441,0.000494334466244,0.000490050947998,0.000485761038096,0.000481464997137,0.00047716473319,0.000472860272406,0.000468553732875,0.000464242924914,0.000459927828525,0.000455609026524,0.000451287792787,0.000446965291283,0.000442639737284,0.000438308561002,0.000433970562035,0.000429627097317,0.000425279620039,0.000420927646902,0.000416574168926,0.000412217864161,0.000407855887929,0.000403486352825,0.000399108233398,0.000394722372389,0.000390332872335,0.000385939321354,0.00038153982446,0.000377135515009,0.000372728071724,0.000368316188769,0.000363902744114,0.000359490969041,0.000355082209281,0.000350677657321,0.000346277828874,0.000341881597929,0.000337490583087,0.000333104555441,0.000328721691356,0.00032434228608,0.00031996862644,0.000315600487078,0.000311238884445,0.000306886110068,0.00030254128276,0.000298205340794,0.000293878482822,0.000289561809281,0.000285257459195,0.000280966066237,0.000276687155197,0.000272417219826,0.000268156099653,0.0002639019617,0.000259655558592,0.000255416055012,0.000251183546981,0.000246954834839,0.00024272968944,0.000238506538753,0.000234284405307,0.000230063618935,0.000225844174135,0.000221626304542,0.000217412393978,0.000213200086749,0.000208989560804,0.000204784663192,0.00020058782094,0.000196398678657,0.000192219021478,0.000188051519853,0.000183897936851,0.000179760463185,0.000175633884237,0.000171517911593,0.000167412958183,0.000163321287675,0.000159237023815,0.00015516325521,0.000151099112371,0.000147042975883,0.000142993498452,0.000138949821284,0.000134913636659,0.000130891971459,0.000126885491968,0.000122891818497,0.000118910898378,0.000114941481448,0.000110983240677,0.000107035224171,0.000103101563736,9.91819648455e-05,9.52758676234e-05,9.13799380912e-05,8.74922604876e-05,8.36139059356e-05,7.97479784053e-05,7.5896753217e-05,7.20628942596e-05,6.82453260911e-05,6.44414981906e-05,6.06491075059e-05,5.68687330232e-05,5.3099907376e-05,4.93458163219e-05,4.56057656764e-05,4.1877765042e-05,3.81627688242e-05,3.44573270533e-05,3.07657118059e-05,2.70899933203e-05,2.34351859081e-05,1.98007919816e-05,1.61872848794e-05,1.2593714353e-05,9.01911552146e-06,5.46525815656e-06,1.93063465236e-06,-1.58717452813e-06,-5.08810194611e-06,-8.57720611906e-06,-1.20563821629e-05,-1.55273389269e-05,-1.89888980927e-05,-2.24408118718e-05,-2.58810830858e-05,-2.93122177083e-05,-3.27351601991e-05,-3.61441507551e-05,-3.95381695816e-05,-4.29118324429e-05,-4.62655246205e-05,-4.95978564648e-05,-5.29071670117e-05,-5.61940530128e-05,-5.9461429941e-05,-6.27079669903e-05,-6.59301482352e-05,-6.91296328781e-05,-7.23092525328e-05,-7.54731396636e-05,-7.86241358478e-05,-8.17595797903e-05,-8.48803711371e-05,-8.79869167918e-05,-9.10775892969e-05,-9.41522949399e-05,-9.72111710203e-05,-0.000100253417712,-0.000103278840863,-0.000106288135057,-0.0001092790129,-0.000112251619173,-0.000115207563123,-0.000118144547974,-0.000121065116559,-0.000123964765829,-0.000126844796926,-0.000129705353662,-0.000132548902303,-0.000135370110383,-0.000138168938469,-0.000140945790141,-0.000143698281976,-0.00014642806118,-0.000149134635646,-0.000151819042605,-0.000154487114923,-0.000157136884418,-0.000159768918483,-0.000162383370467,-0.000164980498131,-0.000167558208732,-0.000170115791755,-0.000172656135959,-0.000175176648715,-0.00017768071334,-0.000180161752482,-0.000182621733065,-0.000185057589443,-0.000187469523749,-0.000189857769975,-0.000192224751095,-0.000194571821012,-0.000196898287314,-0.000199204578616,-0.000201490189309,-0.00020375549532,-0.000206003480879,-0.000208232447858,-0.000210443870438,-0.00021263760819,-0.000214812467524,-0.000216971941761,-0.000219116027527,-0.000221244103258,-0.000223354557513,-0.000225447749387,-0.00022752149778,-0.000229573935073,-0.000231606906546,-0.000233621272613,-0.000235617140463,-0.000237595120523,-0.00023955153908,-0.000241487233998,-0.000243403671828,-0.000245304731858,-0.000247189954698,-0.000249061809394,-0.000250921515298,-0.000252766408662,-0.000254598673693,-0.000256415398087,-0.000258217350496,-0.000260003152478,-0.000261773058452,-0.000263520347336,-0.00026524540944,-0.000266949132932,-0.000268630870617,-0.000270290902954,-0.000271929349839,-0.000273543592275,-0.000275136284299,-0.000276707831112,-0.000278261694008,-0.000279800310714,-0.000281326878494,-0.000282839322959,-0.000284337504183,-0.000285819159389,-0.000287286575135,-0.000288741983958,-0.000290187746204,-0.000291624851528,-0.00029305060214,-0.000294464214527,-0.000295865594575,-0.000297255656305,-0.000298634458,-0.000300004710846,-0.000301367065424,-0.000302718887702,-0.00030405722537,-0.000305379050751,-0.000306683423971,-0.000307973450531,-0.000309246742786,-0.000310503275681,-0.000311742265464,-0.000312964063536,-0.000314164584317,-0.000315347521701,-0.000316511733851,-0.000317660487513,-0.000318796543109,-0.000319919780759,-0.000321030277505,-0.00032213019254,-0.000323216881612,-0.000324292736491,-0.000325354859884,-0.000326405999771,-0.000327444726036,-0.000328472262688,-0.000329485448949,-0.000330481307491,-0.000331458922735,-0.000332416451604,-0.000333353809711,-0.000334270068923,-0.000335165986297,-0.000336039769918,-0.000336889920668,-0.000337717685301,-0.000338523543646,-0.000339310394046,-0.000340076854221,-0.000340824450625,-0.000341556304807,-0.000342272219738,-0.000342977184549,-0.000343671208469,-0.000344357721784,-0.000345034498981,-0.000345700744449,-0.000346356372936,-0.000347001058896,-0.000347637004532,-0.000348262607787,-0.00034887738526,-0.000349476867816,-0.000350058224042,-0.000350618393365,-0.000351158174968,-0.000351677801796,-0.000352175945389,-0.00035265496183,-0.000353111993148,-0.000353549816683,-0.000353966102444,-0.000354358819266,-0.000354729140932,-0.000355080584146,-0.000355413760918,-0.000355728763911,-0.000356025221765,-0.000356304589679,-0.000356566478632,-0.000356808047746,-0.00035702832206,-0.000357231278039,-0.000357418125612,-0.000357592389025,-0.000357749655593,-0.000357890219494,-0.000358011611675,-0.000358114343331,-0.000358196193275,-0.000358254295244,-0.000358291197871,-0.000358307554047,-0.00035830084781,-0.000358283562907,-0.000358269546179,-0.000358256458555,-0.000358247845861,-0.000358243578875)
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(173)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('WT_dUTX663_3-GSM1017401.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) : 173',bty='n')
dev.off()