# R script for Peak Model
#  -- generated by MACS
p <- c(0.0195049586205,0.0228102447784,0.0258390431209,0.0291568969069,0.0323490744131,0.0324621830648,0.0327763737643,0.0329648881839,0.0327261032524,0.0325375888327,0.0330151586958,0.032939752928,0.033480160931,0.0338446221423,0.0339451631661,0.0338948926542,0.0340582718179,0.0344478682852,0.0344604359132,0.0349505734043,0.03510138494,0.0350636820561,0.0347494913567,0.0343598948894,0.034548409309,0.0347997618686,0.0343473272614,0.034020568934,0.0341462452138,0.0337440811185,0.0332916465113,0.0337189458626,0.0335304314429,0.0335304314429,0.033492728559,0.0331534026036,0.0330654292077,0.0331534026036,0.0334173227911,0.0332790788834,0.0333921875352,0.0331659702316,0.0336309724667,0.0334047551631,0.0333670522792,0.0334424580471,0.0336561077227,0.0333796199072,0.0330528615798,0.033455025675,0.0338697573983,0.0339702984221,0.0337692163745,0.0342467862376,0.0343724625174,0.0349505734043,0.0350888173121,0.0350008439162,0.0350008439162,0.0347369237287,0.0344101654013,0.0344101654013,0.0347117884727,0.0346740855888,0.0346363827049,0.0343724625174,0.0339828660501,0.0344353006572,0.0347620589847,0.0350636820561,0.0352773317317,0.03510138494,0.0352019259639,0.0352396288478,0.0352521964758,0.0353904403835,0.0361444980621,0.0360690922943,0.0360942275502,0.0360942275502,0.0358303073627,0.03621990383,0.0359936865264,0.0360942275502,0.0361696333181,0.0359936865264,0.0353653051276,0.0352270612198,0.0352270612198,0.0353024669877,0.0361193628062,0.0364335535056,0.0365843650413,0.0365843650413,0.0365969326693,0.0370242320205,0.0377154515593,0.0380296422587,0.0382684271903,0.0387208617974,0.0383312653301,0.0380673451426,0.0383689682141,0.0380924803986,0.0384695092379,0.0382684271903,0.0378285602111,0.0381176156545,0.0380296422587,0.0375772076515,0.037866263095,0.0378159925831,0.0376149105355,0.0379668041188,0.0382432919343,0.0386454560296,0.0390978906368,0.0394372165921,0.0394623518481,0.0398896511993,0.0399901922231,0.0399776245951,0.0404677620863,0.0404426268303,0.0403546534345,0.0401158685029,0.0400907332469,0.0398142454314,0.0399776245951,0.0400027598511,0.0396634338957,0.0398268130594,0.039525189988,0.0400278951071,0.0399022188273,0.0402289771547,0.040606005994,0.0404928973422,0.0406939793898,0.0408699261815,0.0410458729732,0.0413726313006,0.0417873630239,0.0418124982798,0.0419381745596,0.0414983075804,0.0411966845089,0.0413600636726,0.041158981625,0.0408950614375,0.0409578995774,0.0411966845089,0.0407819527857,0.0406562765059,0.0406437088779,0.0409830348333,0.0413223607887,0.0420512832114,0.042277500515,0.0421518242352,0.0423152033989,0.0418753364197,0.0424660149346,0.0426419617263,0.0430064229376,0.0432703431251,0.0434839928008,0.0429184495418,0.0427676380061,0.0430943963335,0.043345748893,0.043898724524,0.0437981835002,0.0441123741996,0.0441249418276,0.0440369684318,0.0439741302919,0.0445145382949,0.0445773764348,0.0448664318782,0.0448915671342,0.0448664318782,0.0449041347622,0.0450926491818,0.0453188664854,0.0458718421164,0.0456833276968,0.0454822456491,0.0462111680718,0.0463871148635,0.0466133321671,0.0466887379349,0.0470909020302,0.0470406315183,0.0469526581224,0.0467390084468,0.0474302279856,0.0475433366374,0.0474302279856,0.0474804984975,0.0473548222177,0.0478952302207,0.0481214475243,0.0481717180362,0.0483476648279,0.0485613145035,0.0486618555273,0.0489132080869,0.0491017225065,0.0496421305095,0.049943753581,0.049918618325,0.0497803744173,0.0503207824203,0.0506098378638,0.0511502458668,0.0512130840067,0.0512256516347,0.0515147070781,0.0516403833579,0.0519545740573,0.0519294388014,0.0520676827091,0.0522687647568,0.052670928852,0.0530605253193,0.0535129599265,0.0542418823492,0.0545560730486,0.0547320198403,0.055423239379,0.0560641884058,0.0571450044119,0.0574968979952,0.0579116297185,0.0579870354863,0.0583514966977,0.0580121707423,0.0583640643256,0.0585148758614,0.0586028492572,0.0587536607929,0.05815041465,0.0583766319536,0.0582635233018,0.0582635233018,0.0583012261858,0.0590050133525,0.059243798284,0.0594951508436,0.0599098825668,0.0597465034031,0.0602492085222,0.0607896165252,0.0610912395967,0.0613048892723,0.0615939447158,0.0621343527188,0.0622977318825,0.0632403039808,0.0629261132813,0.0637555767278,0.0641703084511,0.064182876079,0.0648363927338,0.0657915324601,0.0659549116238,0.0664450491149,0.0667215369304,0.0663696433471,0.0673122154453,0.0679405968442,0.0686569516389,0.0693104682937,0.0698885791806,0.0703284461598,0.0707557455111,0.0708562865349,0.0712584506301,0.0721381845885,0.0722135903564,0.0723644018921,0.0731687300827,0.0736337323178,0.0742872489726,0.0739604906452,0.0741615726929,0.075192118187,0.0760467168894,0.0764237457287,0.0769892889877,0.0774417235949,0.0771652357794,0.0774668588508,0.0780701049937,0.0792514620236,0.0804956571933,0.0807972802648,0.081224579616,0.0820289078065,0.0827829654851,0.0834616173959,0.0844544600061,0.0850074356371,0.0847686507055,0.0855604112681,0.0863898747146,0.0868297416938,0.0880488016076,0.0888279945421,0.0896197551047,0.0904869214351,0.0911907086018,0.092208686468,0.0930507175424,0.0935031521496,0.0940686954086,0.0946468062955,0.0946091034116,0.0947976178313,0.094935861739,0.0956145136498,0.0962680303046,0.0969466822153,0.0980400658493,0.0991083142274,0.0994350725548,0.0999629129298,0.100138859722,0.101169405216,0.102853467365,0.103846309975,0.104424420862,0.105216181424,0.105781724683,0.105819427567,0.106322132686,0.107390381064,0.109866203776,0.110947019782,0.111198372341,0.111864456624,0.113322301469,0.114202035428,0.114780146315,0.116212855904,0.11741934819,0.118575569964,0.118588137592,0.119442736294,0.120372740765,0.120925716396,0.121415853887,0.121918559006,0.123087348408,0.123338700967,0.123577485899,0.124180732042,0.125148439396,0.125424927211,0.126568581357,0.12729750378,0.127599126851,0.128189805366,0.129207783233,0.13052738417,0.132261716831,0.133895508468,0.1341342934,0.135114568382,0.135918896572,0.137514985325,0.138583233703,0.140330133992,0.141498923394,0.142780821448,0.144188395781,0.144200963409,0.146752191889,0.147820440267,0.148536795061,0.149755854975,0.150773832841,0.151615863916,0.152998302993,0.153287358437,0.154330471559,0.156378994919,0.156517238827,0.158188733348,0.159671713449,0.160300094848,0.161669966297,0.162486862116,0.162612538396,0.164409709196,0.165465389946,0.166144041857,0.167023775816,0.168041753682,0.169838924483,0.170680955557,0.171837177331,0.173345292688,0.175393816048,0.17662544359,0.177052742941,0.177128148709,0.179013292906,0.179629106677,0.180257488076,0.181815873945,0.183185745394,0.184505346332,0.185133727731,0.186126570341,0.187659820954,0.189306180219,0.190072805526,0.192184167026,0.193528903219,0.195074721461,0.197462570776,0.19868163069,0.200767856934,0.201220291541,0.202326242803,0.204425036675,0.205719502357,0.206033693057,0.206938562271,0.208383839488,0.209288708703,0.210595742012,0.211538314111,0.213888460542,0.215258331992,0.21613806595,0.217721587075,0.219631866528,0.221341063933,0.222509853335,0.223502695945,0.224017968692,0.224709188231,0.226280141728,0.227788257085,0.229510022118,0.229987591981,0.230691379148,0.231395166314,0.23272733488,0.233695042234,0.235278563359,0.236774111089,0.237817224211,0.239199663288,0.240205073526,0.241838865163,0.242781437262,0.244314687875,0.244855095878,0.247129836542,0.248436869851,0.249769038417,0.251918102801,0.253275406622,0.253338244762,0.253627300206,0.255298794727,0.256542989897,0.257334750459,0.256920018736,0.258239619673,0.258968542096,0.258088808138,0.258151646278,0.260426386941,0.262273828254,0.262927344909,0.263580861564,0.26453600129,0.266333172091,0.266333172091,0.267401420469,0.268394263079,0.269123185502,0.269110617874,0.269211158897,0.269688728761,0.269563052481,0.269801837412,0.268771291918,0.268834130058,0.268545074615,0.267300879445,0.267602502516,0.268193181031,0.26875872429,0.268168045775,0.267627637772,0.267351149957,0.267288311817,0.267162635537,0.266823309582,0.267275744189,0.267539664376,0.266672498046,0.265227220829,0.264360054498,0.263882484635,0.262763965745,0.262148151974,0.261004497828,0.25987341131,0.259182191772,0.257058262644,0.255939743754,0.255449606262,0.255738661706,0.254368790256,0.254682980956,0.253061756947,0.252772701503,0.251980940941,0.251214315634,0.249882147069,0.248549978503,0.246991592634,0.245445774393,0.244339823131,0.242706031494,0.241688053628,0.240393587946,0.23950128636,0.237126004672,0.236409649877,0.234637614332,0.234122341585,0.232438279436,0.231646518874,0.23023894454,0.229396913466,0.227888798109,0.226720008707,0.226229871216,0.224269321251,0.223477560689,0.221768363284,0.220008895367,0.21837510373,0.216728744465,0.214831032641,0.2129710237,0.210683715408,0.209200735307,0.208610056792,0.206624371571,0.206247342732,0.206435857152,0.205003147562,0.203784087649,0.202627865875,0.201924078708,0.200365692839,0.198819874598,0.197525408916,0.197839599615,0.195891617279,0.193981337827,0.193767688151,0.192712007401,0.19197051735,0.191404974091,0.1909148366,0.190412131481,0.189959696874,0.189155368683,0.188388743377,0.188715501704,0.188112255561,0.188728069332,0.189079962915,0.188049417421,0.18787347063,0.187659820954,0.187546712302,0.185661568106,0.184530481588,0.182381417204,0.180496273007,0.178284370483,0.175921656423,0.17364691576,0.171120822536,0.168167429962,0.165214037387,0.162801052815,0.160878205735,0.159395225634,0.157107917342,0.154619527002,0.152369921594,0.150786400469,0.149755854975,0.148863553389,0.146563677469,0.145482861463,0.143220688427,0.140883109623,0.139965672781,0.13854553082,0.137351606162,0.136032005224,0.134335375447,0.132814692462,0.131658470688,0.13046454603,0.130175490587,0.128302914018,0.127435747688,0.12624182303,0.125713982655,0.124809113441,0.123414106735,0.122308155473,0.121566665422,0.121139366071,0.119983144297,0.119907738529,0.118525299452,0.117947188565,0.115948935717,0.115345689574,0.114830416827,0.113711897937,0.113171489934,0.111575401181,0.110796208246,0.109552013076,0.10853403521,0.107553760228,0.107101325621,0.106372403198,0.105693751287,0.105731454171,0.103758336579,0.102501573781,0.101898327638,0.101521298799,0.10101859368,0.100050886326,0.0994979106947,0.0979269571975,0.0967833030516,0.0949735646229,0.0953505934622,0.0953757287182,0.0942697774562,0.0935534226615,0.0924223361436,0.0915300345572,0.0898459724083,0.0895443493368,0.0890793471017,0.0890542118457,0.0880739368635,0.0866663625301,0.0855227083842,0.0849445974972,0.0848189212174,0.083964322515,0.0840271606549,0.0831222914405,0.0824059366458,0.0814633645476,0.0808475507767,0.0802945751457,0.0802820075177,0.0800683578421,0.0788618655563,0.0786607835087,0.0780072668538,0.0774919941068,0.0770898300115,0.076260366565,0.0755565793983,0.0749030627435,0.0741615726929,0.0728294041273,0.0723266990082,0.071911967285,0.0715223708177,0.0711830448623,0.0702781756479,0.0699011468086,0.0699011468086,0.0697629029009,0.06914708913,0.0690214128502,0.0690968186181,0.068581545871,0.0680160026121,0.0673499183293,0.0666964016745,0.0667466721864,0.0661811289274,0.0662942375792,0.0660805879036,0.0652511244571,0.064773554594,0.0642834171029,0.0640949026832,0.0643462552427,0.0646604459422,0.0645222020344,0.0640823350552,0.0633031421206,0.063102060073,0.0630140866772,0.0619709735551,0.0617698915074,0.0610158338288,0.0599601530787,0.0595579889835,0.0587787960489,0.0584771729774,0.0578613592066,0.0569816252482,0.0560516207779,0.0567931108285,0.0562401351975,0.0560767560338,0.0566297316648,0.0558002682183,0.0553226983552,0.0553478336111,0.0553226983552,0.0552598602153,0.0553604012391,0.0547445874682,0.0542921528611,0.0538899887658,0.0530730929473,0.0530353900634,0.052670928852,0.0516655186139,0.051602680474,0.0509742990751,0.0508988933072,0.0506475407477,0.0506349731197,0.0501699708846,0.0498683478131,0.0496169952536,0.0498683478131,0.049956321209,0.0493405074381,0.0495290218577,0.0491645606464,0.0486367202714,0.0486618555273,0.0484984763636,0.0478449597088,0.0473548222177,0.0466133321671,0.0462614385837,0.0463996824914,0.0459598155122,0.046110627048,0.0459346802563,0.0457210305807,0.045557651417,0.0457335982087,0.0459598155122,0.046110627048,0.0461860328158,0.0456581924408,0.0460100860242,0.045570219045,0.0455953543009,0.0452685959735,0.0451806225777,0.045017243414,0.0447281879705,0.0442129152234,0.0440244008038,0.0440369684318,0.0436222367085,0.0435971014526,0.0430943963335,0.0428807466579,0.0429310171698,0.0424911501906,0.0422146623751,0.0425539883305,0.0420889860953,0.0419256069316,0.0413600636726,0.0405431678541,0.0407568175297,0.0409201966934,0.0405054649702,0.0404174915743,0.0407065470178,0.040078165619,0.0402541124106,0.0399273540832,0.0397262720356,0.0401033008749,0.0396382986398,0.0391104582647,0.0392989726844,0.0391984316606,0.038431806354,0.0387711323093,0.0384569416099,0.0384946444939,0.0385826178897,0.0387711323093,0.0388214028213,0.0387082941695,0.0386957265415,0.0388842409611,0.038972214357,0.0387711323093,0.0389973496129,0.0385197797498,0.038419238726,0.0379919393748,0.0381050480266,0.0380296422587,0.0378034249551,0.0375772076515,0.0378285602111,0.0382432919343,0.038431806354,0.0388214028213,0.0387585646814,0.0391607287766,0.0391984316606,0.0392361345445,0.0390601877528,0.0387836999373,0.0386454560296,0.0379416688629,0.0374389637438,0.0371750435563,0.0373886932319,0.0372378816961,0.0370367996485,0.0372881522081,0.0373761256039,0.0379291012349,0.0378159925831,0.0382055890504,0.037841127839,0.0380045070027,0.0377280191872,0.0371750435563,0.0368482852289,0.0366723384372,0.0361696333181,0.0357926044788,0.035654360571,0.0354407108954,0.0359811188984,0.0360565246663,0.0361193628062,0.0361570656901,0.0358931455026,0.0353778727555,0.0355035490353,0.0354281432674,0.035692063455,0.0352396288478,0.0346992208448,0.0346740855888,0.0344981387971,0.0347871942406,0.0346740855888,0.0348500323805,0.035113952568,0.0350888173121,0.0348500323805,0.0349003028924,0.0353904403835,0.0351893583359,0.0352773317317,0.0346363827049,0.034548409309,0.0346866532168,0.0347117884727,0.0348123294966,0.0346615179608,0.034573544565,0.0344227330293,0.0340708394459,0.0342970567495,0.034598679821,0.0350762496841,0.0347620589847,0.0346489503329,0.0348751676364,0.0349003028924,0.0348751676364,0.0343850301453,0.0344730035412,0.0342090833537,0.0339074602822,0.0335932695828,0.0337817840024,0.0335807019548,0.0330528615798,0.0332162407435,0.0331534026036,0.0330905644637,0.0334173227911,0.0332539436274,0.0333042141393,0.0332665112554,0.0332413759994,0.0331408349756,0.0330402939518,0.0326129946006,0.0326381298565,0.0327763737643,0.0326381298565,0.0325627240887,0.0327638061363,0.0328015090202,0.0327386708803,0.0330277263238,0.0329271853,0.032902050044,0.0332916465113,0.0336058372108,0.0330654292077,0.0331282673476,0.0332539436274,0.0335304314429,0.0336686753506,0.0335304314429,0.0341462452138,0.0341336775858,0.0341462452138,0.0339702984221,0.0341085423298,0.0343221920055,0.0341713804697,0.0339325955382,0.0338069192584,0.0333293493953,0.0328643471601,0.0329900234399,0.0326632651125,0.0324621830648,0.0326632651125,0.0326632651125,0.0323113715291,0.0324998859488,0.0320851542255,0.0322233981333,0.0321354247374,0.0320348837136,0.0320097484577,0.0318840721779,0.0313939346868,0.0309163648237,0.0311425821272,0.031305961291,0.0319846132017,0.0323113715291,0.0326255622285,0.0328894824161,0.0327763737643,0.0329271853,0.0335052961869,0.0336309724667,0.0337566487465,0.0330151586958,0.0324998859488,0.0321605599934,0.03180866641,0.0312305555231,0.0314944757106,0.0311677173832,0.0307781209159,0.0308158237998,0.0310420411034,0.0313310965469,0.031280826035,0.0313939346868,0.0316452872463,0.0321856952493,0.0318840721779,0.0321228571095,0.0319971808297,0.0317458282702,0.0312431231511,0.0315573138505,0.0317206930142,0.0319092074339,0.0320851542255,0.0318589369219,0.0318966398059,0.0319217750618,0.032374209669,0.0330905644637,0.0331156997197,0.0328769147881,0.0327261032524,0.0328266442762,0.0326506974845,0.0328015090202,0.0328769147881,0.0331534026036,0.0330654292077,0.0326506974845,0.0328643471601,0.0326632651125,0.0326255622285,0.0326129946006,0.0322988039011,0.0321605599934,0.0324998859488,0.0322862362732,0.0325627240887,0.0325124535768,0.0325878593446,0.0330402939518,0.0333042141393,0.0330654292077,0.0332288083714,0.0332665112554,0.0326129946006,0.0324244801809,0.0324747506928,0.0323239391571,0.0324496154369,0.0323365067851,0.0322988039011,0.0321354247374,0.0320725865976,0.0321982628773,0.032361642041,0.032399344925,0.0317960987821,0.0319846132017,0.0316829901303,0.031255690779,0.0309792029635,0.0312179878951,0.0311048792433,0.0306775798921,0.0309792029635,0.0312054202671,0.0316452872463,0.03180866641,0.0314065023148,0.0314442051987,0.0316704225023,0.0313185289189,0.0311551497552,0.0317081253862,0.0312054202671,0.0311802850112,0.0312431231511,0.0311174468713,0.0317458282702,0.0321605599934,0.0319343426898,0.0322108305053,0.0325375888327,0.0323490744131,0.0328894824161,0.032952320556,0.0327638061363,0.0321354247374,0.031821234038,0.0317458282702,0.0317709635261,0.0315950167344,0.0316955577582,0.0315573138505,0.031255690779,0.0309037971957,0.0310294734755,0.0316075843624,0.0316327196184,0.031280826035,0.0315698814785,0.0314065023148,0.0310169058475,0.0307655532879,0.0308283914278,0.0309540677076,0.0305267683564,0.0306524446361,0.0305519036123,0.0306147417522,0.0305142007284,0.0310797439874,0.0311048792433,0.0313436641749,0.0313939346868,0.0309289324516,0.0310671763594,0.0308786619397,0.0309289324516,0.0308912295677,0.0310420411034,0.0306775798921,0.0309289324516,0.0310043382195,0.0308032561719,0.0315321785945,0.0319971808297,0.0321731276214,0.0323365067851,0.032374209669,0.0325250212047,0.0326255622285,0.0322108305053,0.0324370478089,0.0322233981333,0.0316704225023,0.0309666353356,0.0311551497552,0.0314316375707,0.0317458282702,0.0312054202671,0.0312305555231,0.0314442051987,0.0310546087314,0.0316327196184,0.0321982628773,0.0325878593446,0.0322233981333,0.0318840721779,0.0316578548743,0.0317835311541,0.0315321785945,0.0318589369219,0.0319594779458,0.031821234038,0.0311802850112,0.0309163648237,0.0310797439874,0.0311174468713,0.0310043382195,0.0311425821272,0.0310546087314,0.030715282776,0.0305896064963,0.0304387949605,0.0305896064963,0.0309163648237,0.0307655532879,0.0306524446361,0.0307027151481,0.0307027151481,0.0308283914278,0.0307781209159,0.0310797439874,0.0309666353356,0.0310923116153,0.0306901475201,0.0303382539367,0.030200010029,0.0296721696539,0.0292323026747,0.029647034398,0.030187442401,0.0300743337492,0.030187442401,0.0302377129129,0.0309666353356,0.0311425821272,0.0312179878951,0.031846369294,0.0321856952493,0.0321102894815,0.0317206930142,0.0317081253862,0.031833801666,0.0316578548743,0.0312054202671,0.0310294734755,0.0310169058475,0.0308283914278,0.0304136597046,0.0299486574694,0.0301497395171,0.0297224401658,0.0297350077938,0.0298732517016,0.0300240632373,0.0301371718891,0.0299612250974,0.0300491984932,0.0300491984932,0.0303131186808,0.0300617661212,0.0300366308653,0.02963446677,0.0265428302876,0.0232501117576,0.0203344220669,0.0174941381441,0.0)
m <- c(0.0179639903305,0.0212416306715,0.0242293259054,0.0273052653023,0.0303307794632,0.0302677479182,0.0301416848282,0.029700464013,0.0300030154291,0.0298895586481,0.0299399838841,0.02948615676,0.029713070322,0.0293979125969,0.029473550451,0.029763495558,0.0300156217381,0.0302173226822,0.0307215750423,0.0308098192054,0.0309989138404,0.0313897094195,0.0315031662006,0.0317300797626,0.0318183239257,0.0314275283465,0.0315409851276,0.0317552923806,0.0312258274025,0.0313897094195,0.0313771031105,0.0309358822954,0.0306837561153,0.0305450867163,0.0301795037552,0.0302677479182,0.0301668974462,0.0299273775751,0.0298139207941,0.0299904091201,0.0299525901931,0.0301668974462,0.0301795037552,0.0304064173172,0.0303559920812,0.0307846065874,0.0310241264584,0.0309106696774,0.0312636463295,0.0309989138404,0.0306081182613,0.0305702993343,0.0304064173172,0.0306207245703,0.0310493390764,0.0307215750423,0.0305072677893,0.0304946614803,0.0304946614803,0.0300660469741,0.0300912595921,0.0301416848282,0.0304316299352,0.0301795037552,0.0302551416092,0.0303559920812,0.0302803542272,0.0304316299352,0.0300786532831,0.0307846065874,0.0307593939693,0.0306585434973,0.0303055668452,0.0302047163732,0.0299904091201,0.0300912595921,0.0302173226822,0.0303559920812,0.0305324804073,0.0304946614803,0.0305829056433,0.0306459371883,0.0308476381324,0.0307846065874,0.0309358822954,0.0306207245703,0.0304694488623,0.0304316299352,0.0304568425533,0.0300534406651,0.0302803542272,0.0300912595921,0.0303433857722,0.0306207245703,0.0304064173172,0.0306711498063,0.0310367327674,0.0312258274025,0.0310745516944,0.0312510400205,0.0316292292906,0.0317552923806,0.0315283788186,0.0317174734536,0.0320830564147,0.0319317807067,0.0314401346556,0.0309989138404,0.0312258274025,0.0312384337115,0.0306837561153,0.0307972128964,0.0306459371883,0.0303812046992,0.0298643460301,0.0294357315239,0.029498763069,0.029624826159,0.0293474873609,0.0290071170178,0.0292340305799,0.0292214242709,0.0293474873609,0.0291583927259,0.029637432468,0.0298895586481,0.029763495558,0.0299021649571,0.0300282280471,0.0303938110082,0.0304316299352,0.0306711498063,0.0303938110082,0.0302047163732,0.0299778028111,0.0302299289912,0.0302929605362,0.0301921100642,0.0301668974462,0.0304568425533,0.0304568425533,0.0304568425533,0.0309863075314,0.0317300797626,0.0316796545266,0.0317426860716,0.0320578437967,0.0317426860716,0.0316040166726,0.0316418355996,0.0318561428527,0.0315157725096,0.0316292292906,0.0312384337115,0.0310493390764,0.0309106696774,0.0307467876603,0.0310241264584,0.0312762526385,0.0307972128964,0.0303938110082,0.0303433857722,0.0301542911372,0.0298895586481,0.0300030154291,0.0298265271031,0.0299651965021,0.0299147712661,0.0301668974462,0.0302047163732,0.0303055668452,0.0306963624243,0.0306459371883,0.0308602444414,0.0307593939693,0.0305829056433,0.0304442362442,0.0305576930253,0.0301164722101,0.0303181731542,0.0304946614803,0.0304946614803,0.0305955119523,0.0305324804073,0.0310115201494,0.0312132210935,0.0314275283465,0.0316292292906,0.0322721510498,0.0324486393759,0.0321839068868,0.0321460879598,0.0321839068868,0.0325242772299,0.0321208753418,0.0323856078308,0.0319695996337,0.0320956627237,0.0315283788186,0.0312258274025,0.0313771031105,0.0313266778745,0.0314401346556,0.0313644968015,0.0314905598916,0.0318561428527,0.0320452374877,0.0319191743977,0.0321208753418,0.0323099699768,0.0323477889038,0.0323099699768,0.0319569933247,0.0319443870157,0.0321839068868,0.0323099699768,0.0326503403199,0.0327007655559,0.032789009719,0.0326629466289,0.0327007655559,0.0327007655559,0.032789009719,0.0326377340109,0.0325747024659,0.0322721510498,0.0322343321228,0.0318939617797,0.0314653472736,0.0312384337115,0.0314905598916,0.0315535914366,0.0314905598916,0.0317426860716,0.0321586942688,0.0319569933247,0.0322595447408,0.0327259781739,0.0330915611351,0.0335327819502,0.0333815062421,0.0337723018213,0.0340748532374,0.0339235775293,0.0336588450402,0.0336462387312,0.0333310810061,0.0332806557701,0.033003316972,0.032763797101,0.0325747024659,0.0323477889038,0.0323225762858,0.0324738519939,0.0325620961569,0.0327133718649,0.03277640341,0.0326377340109,0.032965498045,0.0336336324222,0.0336336324222,0.0334445377872,0.0338605459843,0.0341000658554,0.0341252784734,0.0340496406193,0.0341378847824,0.0343395857264,0.0347555939236,0.0341630974004,0.0344656488165,0.0348312317776,0.0343143731084,0.0344152235805,0.0345034677435,0.0347429876146,0.0346295308335,0.0345286803615,0.0342891604904,0.0347177749965,0.0345664992885,0.0346547434515,0.0348186254686,0.0343900109624,0.0339740027653,0.0338353333663,0.0337849081303,0.0339992153833,0.0336210261132,0.0335075693322,0.0337849081303,0.0336210261132,0.0335579945682,0.0337470892033,0.0341630974004,0.0341757037094,0.0344908614345,0.0341378847824,0.0351968147387,0.0354993661548,0.0353102715197,0.0355371850818,0.0359027680429,0.036079256369,0.03619271315,0.0367852096732,0.0369616979992,0.0369869106172,0.036369201476,0.036280957313,0.036293563622,0.036356595167,0.036331382549,0.036167500532,0.0358649491159,0.0355371850818,0.0354111219918,0.036205319459,0.036331382549,0.036280957313,0.0366843592011,0.0364952645661,0.036079256369,0.0365330834931,0.0367726033642,0.0367473907462,0.0367095718192,0.036117075296,0.03631877624,0.036369201476,0.0360414374419,0.036180106841,0.0366591465831,0.036268351004,0.036243138386,0.036331382549,0.0364322330211,0.036243138386,0.0359279806609,0.0359153743519,0.036104468987,0.036343988858,0.0360162248239,0.036167500532,0.0363944140941,0.0366213276561,0.0366969655101,0.0374281314324,0.0379828090285,0.0381845099726,0.0381340847366,0.0384744550797,0.0387644001868,0.0388526443498,0.0391678020749,0.0390921642209,0.0387391875688,0.0383357856806,0.0386383370967,0.0390921642209,0.039382109328,0.0389408885128,0.03935689671,0.039508172418,0.0392434399289,0.0392560462379,0.039583810272,0.0400880626322,0.0396972670531,0.0391299831479,0.0390165263669,0.0388904632768,0.0386635497147,0.0387770064958,0.0387517938778,0.0383609982987,0.0385626992427,0.0385248803157,0.0379828090285,0.0383231793716,0.0381971162816,0.0383988172257,0.0385248803157,0.0386131244787,0.0390669516029,0.039508172418,0.0391425894569,0.0390921642209,0.039432534564,0.0388400380408,0.0392182273109,0.039419928255,0.0391678020749,0.0389282822038,0.0387896128048,0.0386383370967,0.0387139749508,0.0393190777829,0.0398359364521,0.0405292834473,0.0405166771383,0.0407940159364,0.0410713547345,0.0413108746055,0.0414747566226,0.0419537963647,0.04289926954,0.0423445919439,0.042874056922,0.0432396398831,0.0436052228442,0.0435421912992,0.0439708058054,0.0443363887665,0.0443363887665,0.0446893654186,0.0447271843456,0.0450549483797,0.0447902158906,0.0448028221996,0.0449288852896,0.0449667042167,0.0446893654186,0.0446137275646,0.0446641528006,0.0446893654186,0.0446641528006,0.0450423420707,0.0455339881218,0.0455844133578,0.045987815246,0.0464416423701,0.0467441937862,0.0469837136573,0.0477022732705,0.0482821634847,0.0485216833557,0.0490133294069,0.0488116284628,0.049416731295,0.0492024240419,0.049467156531,0.0500218341272,0.0502739603073,0.0497192827111,0.0496058259301,0.0499209836552,0.0495932196211,0.04922763666,0.0492024240419,0.049328487132,0.049240242969,0.0488242347718,0.0490007230979,0.0496310385481,0.0499461962732,0.0499714088912,0.0505765117234,0.0515724101347,0.0515219848987,0.0519379930958,0.052606127473,0.0531229861421,0.0535389943393,0.0543584044245,0.0543710107335,0.0550391451107,0.0549509009477,0.0551147829647,0.0553921217628,0.05593419305,0.05606025614,0.0567031778992,0.0567788157532,0.0565771148092,0.0570813671693,0.0571443987144,0.0575982258385,0.0579764151086,0.0583546043787,0.0584932737778,0.059262258627,0.0588966756659,0.059136195537,0.0595522037341,0.059388321717,0.0598799677682,0.0598799677682,0.0601320939483,0.0604220390554,0.0605733147634,0.0604472516734,0.0610397481965,0.0618213393548,0.062439048496,0.0636618604693,0.0637627109414,0.0642165380655,0.0648468535157,0.0655023815839,0.0664478547592,0.0672294459174,0.0677463045866,0.0679858244577,0.0677715172046,0.0678093361316,0.0681497064747,0.0689060850149,0.069296880594,0.0698263455722,0.0698767708082,0.0701919285333,0.0708726692195,0.0719820244119,0.0726123398621,0.0730913796042,0.0738351518354,0.0744024357406,0.0743520105046,0.0749571133368,0.0752848773709,0.0753605152249,0.0761925316191,0.0762177442372,0.0769741227774,0.0772388552665,0.0776674697726,0.0781212968967,0.0792306520891,0.0793062899431,0.0806425586975,0.0813863309287,0.082180528396,0.0826595681381,0.0834663719144,0.0847774280508,0.085609444445,0.0864918860753,0.0865044923843,0.0881054936278,0.0878911863747,0.088748415387,0.088824053241,0.0895426128542,0.0900090462873,0.0899712273603,0.0909923383896,0.0914209528958,0.0926563711781,0.0926941901052,0.0938917894605,0.0944464670567,0.0950137509619,0.0959214052101,0.0963752323343,0.0977619263247,0.0982409660668,0.0995142032762,0.0998923925463,0.100711802632,0.101089991902,0.102274984948,0.103346521213,0.104014655591,0.104682789968,0.105476987435,0.105729113615,0.105628263143,0.106951925588,0.107279689623,0.108149524944,0.108779840394,0.109952227131,0.110948125543,0.112687796185,0.11325508009,0.115171239059,0.116570539358,0.117200854809,0.118726218198,0.120541526695,0.121423968325,0.122924119096,0.124058686907,0.12452512034,0.125747932313,0.125760538622,0.126706011797,0.127386752484,0.128533926603,0.129605462868,0.130235778319,0.130840881151,0.132391457158,0.133526024969,0.134837081105,0.136917122091,0.138883706295,0.141304117624,0.142678205305,0.143901017279,0.146497916934,0.148615776846,0.150166352854,0.152296819075,0.153897820319,0.155322333236,0.156847696626,0.157793169801,0.160730439799,0.163302126836,0.164714033444,0.165596475074,0.167689122369,0.170386872496,0.172580370262,0.175492427642,0.177534649701,0.180421494463,0.181039203604,0.181656912745,0.183989079911,0.186598585875,0.187657515831,0.187997886174,0.18932154862,0.189258517074,0.190380478576,0.190418297503,0.191653715785,0.192700039433,0.192725252051,0.192800889905,0.193897638788,0.194527954238,0.194603592092,0.195952467156,0.197011397112,0.198625004664,0.198977981316,0.199330957969,0.200415100543,0.200944565521,0.201650518825,0.203264126378,0.204083536463,0.205482836762,0.205596293543,0.205722356633,0.206844318135,0.208911752811,0.209466430408,0.210525360364,0.212151574225,0.212655826586,0.215567883965,0.216248624652,0.217496649243,0.220585194949,0.222198802501,0.224190599324,0.226081545675,0.228489350694,0.229800406831,0.231363589147,0.23195608567,0.233796606785,0.235183300775,0.234931174595,0.235977498243,0.23601531717,0.237364192233,0.238397909571,0.239847635107,0.241272148024,0.241801613002,0.241990707638,0.243213519611,0.244222024331,0.245180103815,0.246566797806,0.2473988142,0.248331681066,0.248961996517,0.249920076001,0.251294163682,0.25309686587,0.255038237456,0.256450144065,0.257357798313,0.257799019128,0.25815199578,0.258681460759,0.259009224793,0.259778209642,0.259286563591,0.259589115007,0.259828634878,0.260774108053,0.262034738954,0.262791117494,0.264455150282,0.265488867621,0.267304176117,0.267442845516,0.269485067575,0.271048249891,0.27118691929,0.272195424011,0.272271061865,0.273203928731,0.273027440405,0.273014834096,0.271792022123,0.272649251135,0.271804628432,0.270695273239,0.271628140106,0.271199525599,0.271136494054,0.2698002253,0.269157303541,0.268829539507,0.268942996288,0.267846247404,0.267783215859,0.26764454646,0.266068757835,0.264934190024,0.264278661956,0.264543394445,0.264908977406,0.263408826635,0.262022132645,0.26208516419,0.261656549683,0.260711076508,0.259463051917,0.258391515651,0.256916577498,0.255592915053,0.254143189517,0.254382709388,0.253159897415,0.251395014154,0.250285658962,0.249025028062,0.24790306656,0.247045837548,0.246705467205,0.245570899395,0.243679953044,0.24144863635,0.240578801029,0.239280351202,0.238990406095,0.236708664165,0.23538500172,0.233065440863,0.231136675585,0.230392903354,0.229699556359,0.228577594857,0.22816158666,0.226711861125,0.224341875032,0.223219913531,0.222337471901,0.22183321954,0.221228116708,0.219135469414,0.217320160917,0.21665202654,0.214975387442,0.213878638559,0.212151574225,0.210676636072,0.209239516846,0.208394894142,0.206667829809,0.205558474616,0.204083536463,0.201776581915,0.199494839986,0.198120752304,0.196519751061,0.195435608486,0.19450274162,0.192624401579,0.191515046386,0.190267021795,0.189422399092,0.188149161882,0.187128050853,0.185880026261,0.184997584631,0.183686528495,0.182085527251,0.181329148711,0.180118943047,0.178442303949,0.176236199874,0.175505033951,0.174244403051,0.172656008116,0.171357558289,0.170739849148,0.169390974084,0.167714334987,0.165861207563,0.164940947006,0.163856804432,0.162709630312,0.161902826536,0.160806077653,0.159734541388,0.158915131302,0.15881428083,0.157830988728,0.15742758684,0.156494719974,0.156393869502,0.155864404523,0.153923032937,0.153103622852,0.152284212766,0.150632786287,0.14906960397,0.147695516289,0.146371853843,0.14565329423,0.144922128308,0.142539535906,0.141846188911,0.140358644449,0.139501415436,0.138581154879,0.137169248271,0.136009467842,0.135164845139,0.133097410462,0.132051086815,0.131130826258,0.131029975786,0.130487904499,0.129189454671,0.128370044586,0.127701910209,0.127626272355,0.126201759437,0.125823570167,0.124298206778,0.123945230126,0.123037575877,0.123037575877,0.12211731532,0.121134023218,0.119306108412,0.117957233349,0.117856382877,0.116999153865,0.116595751976,0.116091499616,0.114742624553,0.113053379146,0.111981842881,0.110935519234,0.110645574127,0.109447974771,0.107973036618,0.107531815803,0.106208153357,0.1052878928,0.104455876406,0.104165931299,0.103573434775,0.10288008778,0.102325410184,0.102237166021,0.101405149627,0.100648771087,0.100421857525,0.0993629275682,0.098921706753,0.0975098001446,0.0970181540935,0.0961735313902,0.095354121305,0.0942447661126,0.0941313093316,0.0934253560274,0.0927950405772,0.0923538197621,0.0917487169299,0.0912066456427,0.0908662752996,0.0906141491195,0.0901225030684,0.0892148488201,0.0882441630268,0.0876768791216,0.0870843825985,0.0867440122553,0.0858237516981,0.0851430110119,0.0844370577076,0.0838571674935,0.082445260885,0.08225616625,0.0816132444908,0.0805417082255,0.0794323530331,0.07909198269,0.0786255492569,0.0782473599868,0.0767346029063,0.0761547126921,0.0761925316191,0.075663066641,0.0751083890448,0.0752218458258,0.0747680187017,0.0736460572004,0.072423245227,0.0720324496479,0.0721333001199,0.0717298982318,0.0717425045408,0.0709104881465,0.0710113386186,0.0704188420954,0.0696876761732,0.0695616130831,0.0700280465163,0.0693977310661,0.0688682660879,0.0682505569467,0.0668512566473,0.0670277449734,0.0654771689659,0.0648972787517,0.0651494049318,0.0641409002115,0.0638005298684,0.0631450018002,0.062615536822,0.062426442187,0.0628802693111,0.06251468635,0.0627794188391,0.062590324204,0.0623634106419,0.0627920251481,0.0619600087538,0.0619600087538,0.0622247412429,0.0617078825737,0.0608506535615,0.0602833696563,0.0595900226611,0.059161408155,0.0582915728337,0.0574091312034,0.0570057293153,0.0567662094442,0.055946799359,0.055871161505,0.0555938227069,0.0552786649818,0.0556820668699,0.0553290902178,0.0553543028358,0.0549635072567,0.0548248378577,0.0543079791885,0.0541819160985,0.0533120807772,0.0532238366142,0.0529591041251,0.052795222108,0.0521523003488,0.0519505994048,0.052593521164,0.0523666076019,0.0522279382029,0.0518245363147,0.0520640561858,0.0516606542977,0.0516102290617,0.0505512991054,0.0508664568305,0.0503243855433,0.0491519988059,0.0484334391927,0.0482695571757,0.0481308877766,0.0477022732705,0.0479165805236,0.0473114776914,0.0475888164895,0.0472862650734,0.0468072253312,0.0467568000952,0.0473240840004,0.0471602019833,0.0472484461464,0.0474375407814,0.0467694064042,0.0465929180782,0.0464290360611,0.04593739001,0.046050846791,0.046101272027,0.0457482953749,0.0455465944308,0.0446767591096,0.0444624518565,0.0446515464916,0.0444120266205,0.0439329868783,0.0437438922433,0.0439329868783,0.0436808606983,0.0434917660632,0.0436178291532,0.0442733572214,0.0438825616423,0.0436430417713,0.0434413408272,0.0436556480803,0.0436682543893,0.0432018209561,0.0434917660632,0.0436178291532,0.0432774588101,0.042861450613,0.042735387523,0.042672355978,0.0429623010851,0.0423698045619,0.042672355978,0.042823631686,0.0425462928879,0.0425084739609,0.0421681036178,0.0422185288538,0.0418403395837,0.0415756070946,0.0414369376956,0.0413486935326,0.0408444411724,0.0408192285544,0.0401510941772,0.0399619995421,0.0401132752502,0.0401132752502,0.0402393383402,0.0403023698852,0.0401637004862,0.0403275825032,0.0402897635762,0.0401006689412,0.0403780077393,0.0403654014303,0.0399619995421,0.03960902289,0.0392686525469,0.039369503019,0.0392182273109,0.0391551957659,0.0390039200578,0.0384114235347,0.0384744550797,0.0381340847366,0.0382097225906,0.0382475415176,0.0383231793716,0.0378441396295,0.0378567459385,0.0379071711745,0.0377811080845,0.0382979667536,0.0378945648655,0.0375037692864,0.0373272809603,0.0368482412182,0.0368482412182,0.0366717528921,0.0368608475272,0.0366969655101,0.0367978159822,0.0366087213471,0.0367347844372,0.0371003673983,0.0371381863253,0.0372264304883,0.0373146746513,0.0377685017755,0.0372138241793,0.0370499421623,0.0369995169262,0.0366339339651,0.0364826582571,0.0364196267121,0.036343988858,0.0364700519481,0.0364700519481,0.0358145238799,0.0355371850818,0.0358397364979,0.0357388860259,0.036293563622,0.036217925768,0.0358271301889,0.0358901617339,0.0357514923349,0.0354489409188,0.0354489409188,0.0359279806609,0.0352598462837,0.0349446885586,0.0341000658554,0.0342387352544,0.0346799560695,0.0347429876146,0.0347051686875,0.0344530425075,0.0349068696316,0.0345917119065,0.0347177749965,0.0354615472278,0.0354867598458,0.0352850589017,0.0349572948676,0.0347934128506,0.0347934128506,0.0348942633226,0.0349194759406,0.0350581453396,0.0353102715197,0.0348438380866,0.0354237283008,0.0353102715197,0.0354741535368,0.0357388860259,0.0358649491159,0.036104468987,0.0358019175709,0.0355750040088,0.0350203264126,0.0347303813055,0.0342135226364,0.0343395857264,0.0343521920354,0.0339740027653,0.0336840576582,0.0336840576582,0.0337975144393,0.0339992153833,0.0343521920354,0.0346799560695,0.0343774046534,0.0341252784734,0.0338731522933,0.0337975144393,0.0340874595464,0.0339361838383,0.0341378847824,0.0344152235805,0.0341630974004,0.0337849081303,0.0341378847824,0.0344278298895,0.0343395857264,0.0344026172715,0.0342387352544,0.0343900109624,0.0342891604904,0.0337849081303,0.0338227270573,0.0339109712203,0.0339235775293,0.0338227270573,0.0337218765852,0.0333941125511,0.0336588450402,0.0335579945682,0.033078954826,0.0332302305341,0.0334445377872,0.0335706008772,0.0335579945682,0.0338227270573,0.0337218765852,0.0340118216923,0.0339866090743,0.0336966639672,0.0338731522933,0.0337470892033,0.0338605459843,0.0337218765852,0.0337092702762,0.0337344828942,0.0341883100184,0.0340874595464,0.0337470892033,0.0306585434973,0.0273304779203,0.0240402312703,0.0205230710582,0.0)
ycorr <- c(6.49967527636e-05,6.48436355136e-05,6.43836607957e-05,6.36200092283e-05,6.25546250116e-05,6.1188124577e-05,5.95200976623e-05,5.78226331195e-05,5.60974092676e-05,5.43472217984e-05,5.25761448075e-05,5.07875302047e-05,4.89837015342e-05,4.71672846903e-05,4.53391410777e-05,4.35004891618e-05,4.16546780791e-05,3.98033950137e-05,3.79466957265e-05,3.6085572217e-05,3.42191773226e-05,3.23458521884e-05,3.04648890505e-05,2.85763524911e-05,2.66801828834e-05,2.47757345869e-05,2.28616606769e-05,2.09356764975e-05,1.89983225775e-05,1.70491526273e-05,1.5086209467e-05,1.31102855546e-05,1.11219347617e-05,9.12100346272e-06,7.10528264536e-06,5.07459253402e-06,3.02916363028e-06,9.69136058885e-07,-1.10503857457e-06,-3.19536165223e-06,-5.30154475363e-06,-7.42390449265e-06,-9.56540586887e-06,-1.17276003396e-05,-1.39110243123e-05,-1.61152550538e-05,-1.83420006187e-05,-2.05921719361e-05,-2.28656402656e-05,-2.51621374448e-05,-2.74802405648e-05,-2.982046831e-05,-3.21806358511e-05,-3.45582910121e-05,-3.69521521948e-05,-3.93615818756e-05,-4.1786287413e-05,-4.42249354334e-05,-4.6678219612e-05,-4.91453567967e-05,-5.16267829402e-05,-5.41224570299e-05,-5.66322856163e-05,-5.91571963197e-05,-6.16979102021e-05,-6.42547978797e-05,-6.68277073049e-05,-6.94160530229e-05,-7.20199446843e-05,-7.46390064964e-05,-7.72743623541e-05,-7.99261797923e-05,-8.25937648651e-05,-8.52772914923e-05,-8.79752199177e-05,-9.06865697964e-05,-9.34103140734e-05,-9.6145326753e-05,-9.8891729741e-05,-0.000101648829361,-0.000104415600543,-0.000107191342424,-0.000109975855414,-0.000112769525318,-0.000115571950971,-0.000118385005941,-0.000121208591541,-0.000124045106557,-0.000126894339398,-0.000129756379899,-0.000132630866338,-0.000135516677673,-0.000138413713047,-0.00014132020593,-0.000144235869832,-0.000147159465067,-0.000150089965199,-0.000153024545487,-0.000155961290685,-0.00015889871839,-0.000161835456547,-0.000164772559949,-0.000167709715686,-0.000170646875875,-0.000173582647611,-0.000176515786716,-0.000179445675267,-0.000182371962008,-0.000185295396624,-0.00018821513564,-0.000191131635418,-0.000194042440942,-0.000196945383009,-0.000199839389902,-0.00020272353775,-0.000205599484825,-0.000208465695868,-0.000211320564726,-0.00021416286029,-0.000216993485101,-0.000219812907287,-0.000222620602428,-0.000225417129725,-0.000228202375563,-0.000230976518351,-0.000233737737293,-0.000236485351752,-0.000239219910426,-0.000241942241074,-0.000244651828667,-0.00024734623287,-0.000250023600506,-0.000252684089255,-0.000255327872246,-0.000257954634331,-0.000260563242873,-0.000263153470293,-0.000265724578112,-0.000268276347257,-0.000270809511691,-0.000273323160491,-0.000275818285021,-0.000278293467134,-0.000280748027106,-0.00028318256361,-0.000285597605547,-0.000287994543177,-0.000290375268995,-0.000292738655757,-0.000295083147687,-0.000297407829156,-0.000299714315199,-0.000302004044694,-0.000304279342953,-0.000306539512596,-0.000308783018433,-0.000311009037487,-0.000313216464995,-0.000315404541456,-0.000317573655189,-0.000319724310933,-0.000321856742282,-0.000323970652453,-0.00032606435928,-0.000328137193952,-0.000330190145861,-0.000332223737349,-0.000334236787936,-0.000336229468231,-0.000338200909979,-0.000340152414862,-0.000342084559996,-0.000343996463049,-0.000345886940363,-0.000347755913757,-0.000349603631593,-0.000351429309202,-0.000353234071986,-0.000355018481403,-0.000356783293189,-0.000358528918768,-0.000360254621085,-0.000361961233297,-0.000363649260583,-0.000365318785266,-0.00036696973176,-0.000368602969131,-0.000370218541666,-0.000371816273183,-0.000373397150251,-0.000374961474677,-0.000376508152116,-0.000378036368286,-0.000379545274671,-0.000381035870116,-0.000382508475478,-0.000383963757421,-0.00038540120993,-0.000386822083755,-0.00038822597176,-0.00038961223782,-0.000390982318802,-0.000392337485725,-0.000393678887237,-0.000395007291153,-0.00039632263324,-0.000397625220589,-0.000398914653892,-0.000400189891635,-0.000401450898666,-0.00040269759467,-0.000403929474395,-0.000405144741427,-0.000406343155905,-0.000407524750684,-0.00040868978365,-0.000409836257302,-0.000410963847027,-0.000412073184212,-0.000413164696396,-0.000414238073343,-0.000415293069022,-0.000416329791606,-0.000417348513916,-0.000418347892675,-0.000419328156065,-0.00042028910989,-0.000421233750188,-0.00042216254967,-0.000423074258528,-0.000423968881853,-0.000424846677269,-0.000425709249399,-0.000426557115818,-0.00042739099048,-0.000428211477368,-0.000429019287928,-0.000429814144373,-0.000430595729672,-0.000431364628923,-0.000432122305007,-0.000432867780944,-0.000433600938544,-0.000434321924632,-0.000435031037755,-0.00043572797004,-0.000436414003787,-0.000437088051941,-0.000437749300981,-0.000438396328915,-0.000439028255678,-0.000439645541864,-0.000440249013378,-0.000440837851626,-0.000441411646184,-0.000441970314028,-0.000442513368179,-0.000443039408673,-0.00044354881858,-0.00044404299809,-0.000444523117447,-0.000444990256852,-0.000445444280443,-0.000445885353568,-0.000446314270367,-0.000446730059471,-0.000447132221325,-0.000447521756612,-0.000447899532209,-0.00044826609736,-0.000448620775677,-0.000448962572495,-0.000449290841777,-0.000449605993516,-0.000449908332381,-0.000450198811571,-0.000450478450354,-0.000450748675829,-0.000451008813925,-0.000451259774622,-0.000451501253228,-0.000451733667723,-0.000451956791426,-0.000452170636578,-0.000452374408669,-0.000452568105083,-0.000452751319426,-0.00045292263337,-0.000453081616943,-0.000453227957648,-0.000453361329149,-0.000453481252951,-0.000453588509789,-0.000453683382962,-0.00045376563185,-0.000453834767002,-0.000453891155943,-0.000453934834022,-0.000453967143285,-0.000453986459931,-0.000453992720341,-0.000453986531975,-0.000453968164361,-0.000453937622438,-0.000453896072706,-0.000453844016938,-0.000453781519661,-0.000453707521534,-0.000453621684045,-0.000453524435343,-0.000453418205795,-0.000453303906102,-0.000453180690892,-0.000453048978736,-0.000452908288995,-0.000452758042855,-0.000452598469769,-0.000452431092077,-0.000452256903172,-0.000452076218995,-0.000451887988751,-0.000451690321333,-0.000451483451476,-0.000451266325599,-0.000451038560573,-0.00045080053342,-0.00045055227332,-0.000450294198391,-0.000450025061277,-0.000449744985691,-0.000449453707083,-0.000449152121104,-0.000448841492344,-0.000448521789554,-0.000448194157488,-0.000447859253733,-0.000447516925237,-0.000447166596013,-0.000446808126219,-0.000446442348162,-0.000446068985466,-0.000445687805482,-0.000445297848062,-0.000444898516198,-0.000444489528976,-0.000444070600033,-0.000443640579123,-0.000443199337301,-0.000442747306715,-0.000442284069502,-0.000441809735978,-0.00044132494924,-0.00044083032653,-0.000440327699586,-0.00043981746125,-0.000439299824941,-0.000438775529641,-0.000438245245997,-0.000437709093269,-0.000437167341756,-0.000436619894706,-0.000436066277477,-0.000435506031323,-0.000434938557326,-0.000434361817296,-0.000433775891941,-0.000433181331822,-0.000432577984238,-0.000431965567041,-0.000431343659673,-0.000430712511216,-0.000430072207119,-0.000429422996303,-0.000428764253381,-0.000428097542776,-0.00042742295754,-0.000426739819837,-0.000426046718796,-0.000425344144071,-0.000424632555951,-0.000423911790115,-0.000423182028511,-0.000422442768778,-0.000421694464512,-0.000420937767667,-0.000420171241215,-0.000419395240614,-0.000418611311892,-0.000417819599505,-0.000417019948219,-0.000416212314018,-0.000415396310736,-0.000414571576893,-0.000413738908374,-0.000412896784725,-0.000412045845862,-0.000411186794434,-0.000410319708742,-0.000409443712002,-0.000408557755407,-0.000407661946347,-0.000406756653895,-0.00040584253115,-0.000404918680513,-0.000403985087839,-0.000403042591274,-0.000402090076085,-0.000401126571082,-0.000400152660883,-0.000399169438969,-0.000398177300646,-0.000397175620342,-0.000396163651876,-0.000395141926114,-0.000394111225881,-0.000393071311103,-0.000392022525879,-0.000390965590286,-0.000389900436719,-0.000388826390104,-0.000387742575063,-0.000386649920737,-0.00038554887135,-0.000384439071057,-0.000383320320144,-0.000382192403619,-0.000381055064911,-0.000379908043121,-0.000378751253523,-0.000377585339936,-0.000376409962326,-0.00037522451572,-0.000374028705724,-0.000372821906661,-0.000371604503449,-0.000370376297186,-0.000369136844551,-0.000367886378572,-0.000366624506646,-0.000365350860887,-0.000364065274259,-0.000362768383417,-0.000361460609048,-0.000360142622474,-0.000358814511843,-0.000357476112646,-0.000356127847186,-0.000354770306069,-0.000353402925571,-0.000352025669159,-0.000350638735527,-0.000349242127896,-0.00034783533572,-0.000346417894086,-0.000344988769922,-0.000343547448562,-0.000342094041958,-0.000340627401172,-0.000339147679346,-0.000337655246484,-0.000336149929843,-0.000334631203121,-0.000333098740284,-0.000331552937524,-0.000329993741698,-0.000328422278752,-0.000326838591049,-0.000325242054937,-0.000323633034941,-0.000322010599834,-0.000320375103297,-0.000318726564356,-0.00031706557433,-0.000315391838916,-0.000313705199147,-0.000312005556464,-0.000310291982357,-0.000308565358842,-0.00030682600484,-0.000305073639796,-0.00030330848464,-0.000301530467556,-0.000299738586448,-0.000297932530311,-0.000296112716853,-0.000294278266642,-0.000292429570196,-0.000290566555595,-0.000288688246273,-0.000286795147642,-0.00028488755829,-0.00028296455813,-0.000281025908834,-0.000279072420712,-0.000277103992106,-0.000275121393588,-0.000273124541469,-0.000271112517248,-0.000269085121366,-0.000267041938307,-0.000264981807285,-0.000262904563192,-0.000260811543894,-0.000258701852203,-0.000256574904486,-0.000254429020319,-0.000252263550886,-0.000250079523743,-0.000247877678283,-0.000245658649155,-0.000243422793235,-0.00024117097502,-0.000238902521656,-0.000236617091038,-0.000234315806841,-0.000231999253228,-0.000229668509016,-0.000227322795541,-0.000224961396742,-0.000222583371859,-0.00022018830346,-0.000217776425441,-0.000215347395773,-0.000212901925654,-0.00021043920265,-0.00020795915808,-0.000205461154431,-0.000202945391704,-0.0002004119631,-0.000197861222939,-0.000195293860123,-0.000192709219123,-0.000190106963131,-0.00018748592208,-0.000184845638132,-0.000182186222948,-0.000179507462966,-0.000176809542721,-0.000174092078493,-0.000171354778851,-0.000168596955027,-0.000165818336732,-0.000163018933189,-0.000160199492205,-0.000157361015892,-0.000154502904927,-0.000151624953015,-0.000148726841018,-0.000145808974117,-0.000142871820051,-0.000139915425991,-0.000136940255547,-0.000133946823035,-0.000130934638564,-0.000127902855676,-0.000124851649154,-0.00012178185201,-0.000118693446286,-0.000115586091566,-0.000112459239254,-0.000109313041121,-0.000106147585372,-0.00010296199196,-9.97559106587e-05,-9.65297927655e-05,-9.3283960189e-05,-9.00181572316e-05,-8.67319912697e-05,-8.34259366396e-05,-8.01008013211e-05,-7.67563989354e-05,-7.33916678434e-05,-7.00072721051e-05,-6.66040859539e-05,-6.31818553486e-05,-5.97407590967e-05,-5.62805259724e-05,-5.28005732874e-05,-4.93006777284e-05,-4.57803916129e-05,-4.22385398255e-05,-3.86755325429e-05,-3.50915648557e-05,-3.14858049282e-05,-2.78577558661e-05,-2.42069678082e-05,-2.05334473626e-05,-1.68380534029e-05,-1.31209485401e-05,-9.3819532396e-06,-5.6183319229e-06,-1.82527463601e-06,2.00250857316e-06,5.8693642067e-06,9.79696056733e-06,1.36468528552e-05,1.74373246594e-05,2.1172555684e-05,2.48577211558e-05,2.84976263003e-05,3.20949950814e-05,3.56472133026e-05,3.91487826319e-05,4.259528446e-05,4.59816305464e-05,4.92858329711e-05,5.26457519534e-05,5.60430656212e-05,5.94733548025e-05,6.29322986325e-05,6.64147059392e-05,6.99172879521e-05,7.34399641068e-05,7.69829018306e-05,8.05458055832e-05,8.41295288253e-05,8.77345577999e-05,9.13611988274e-05,9.50090421713e-05,9.86784263307e-05,0.000102369110505,0.000106081025448,0.00010981419025,0.000113567903323,0.000117342045971,0.000121135434916,0.000124946091205,0.000128772948188,0.000132615511322,0.000136472257363,0.000140342446408,0.000144225346547,0.000148120530087,0.000152026790652,0.000155943355753,0.000159870064228,0.000163807759735,0.000167757190198,0.000171718866681,0.000175693340731,0.00017968189599,0.000183685099342,0.000187702947147,0.000191735904797,0.000195784500141,0.00019984899898,0.000203928920917,0.000208023586979,0.00021213336158,0.000216257706272,0.000220395479844,0.000224546317179,0.000228709729106,0.000232886238983,0.000237074974026,0.000241275810116,0.000245489001037,0.000249714785009,0.000253952642104,0.000258202374669,0.000262464598458,0.000266739662025,0.000271027301107,0.000275326532701,0.000279637587119,0.000283960222355,0.000288294332528,0.000292639254304,0.000296994717915,0.000301359844048,0.000305733434031,0.000310113439263,0.00031449962548,0.00031889123048,0.000323288048769,0.000327689282653,0.000332094328298,0.000336502531997,0.000340912847755,0.000345325215481,0.00034973998909,0.000354157278229,0.000358577283023,0.000362999673239,0.000367423866856,0.000371849804861,0.000376276226912,0.000380702891257,0.000385129668565,0.000389556216327,0.000393980642831,0.000398402712556,0.00040282155724,0.000407236271288,0.00041164622354,0.000416051176588,0.000420450682281,0.000424844304764,0.000429231787477,0.000433612264893,0.000437986192248,0.000442353439245,0.000446712772479,0.000451064131755,0.000455407151186,0.000459740805498,0.000464064518657,0.000468377380072,0.000472678446596,0.000476967068642,0.000481241954053,0.000485501705574,0.000489745812652,0.000493973919793,0.000498184767554,0.000502377373671,0.000506551436165,0.000510706377955,0.000514840928382,0.000518954607485,0.00052304701472,0.000527118128616,0.000531167691873,0.000535194941069,0.000539199486584,0.000543181076085,0.000547139716493,0.0005510743555,0.000554984609369,0.000558870696362,0.000562732410022,0.000566568196551,0.000570377677555,0.000574159742615,0.000577913816636,0.000581639116056,0.000585334617314,0.000588999535286,0.000592634124573,0.000596237361977,0.000599808564312,0.000603348009737,0.000606854809609,0.000610328247072,0.000613768708768,0.000617175973982,0.00062054914396,0.000623888541585,0.000627193625218,0.000630462903425,0.000633695807634,0.000636891148925,0.00064004815615,0.000643167607701,0.000646248316163,0.000649289047153,0.000652289484433,0.000655249734739,0.000658168184836,0.000661045128506,0.000663880361915,0.000666673868771,0.000669425726997,0.000672135016897,0.000674801022049,0.000677424165595,0.000680004784549,0.000682542021371,0.000685035652383,0.000687485804958,0.000689891287103,0.000692252201224,0.000694568053252,0.000696838046198,0.000699062038153,0.00070123948893,0.000703369183096,0.000705449868892,0.000707481171659,0.000709462122887,0.000711392875095,0.000713273009747,0.000715101794635,0.000716879477427,0.000718606383377,0.000720281267711,0.000721904100107,0.000723475053409,0.000724994708083,0.000726462670739,0.000727878713171,0.000729241600577,0.000730551141824,0.000731806705507,0.000733006857805,0.000734151519816,0.000735241001079,0.000736274814801,0.000737252106833,0.000738171662883,0.00073903347907,0.000739837469418,0.000740584247909,0.000741273756785,0.000741906133925,0.000742481486421,0.000742998887687,0.000743458300705,0.000743859829025,0.0007442044387,0.000744492423119,0.000744724476964,0.000744899802778,0.000745018028669,0.000745078781587,0.000745082143844,0.000745027911561,0.000744916367213,0.00074474692295,0.000744519550948,0.000744233846811,0.000743889248842,0.000743485154661,0.000743021949727,0.000742499733517,0.000741919447761,0.000741281774419,0.000740586776769,0.000739834845386,0.00073902608663,0.000738160089997,0.000737237163618,0.000736258138367,0.000735222883247,0.000734131920102,0.000732984373112,0.000731779934116,0.00073051797514,0.000729199142575,0.000727823750541,0.000726392361207,0.000724905440853,0.000723363237193,0.000721765845283,0.00072011306991,0.00071840552614,0.000716644148799,0.000714829517682,0.000712962477684,0.00071104316674,0.000709071991024,0.000707049788883,0.000704976584909,0.000702853404042,0.00070068199506,0.000698463411014,0.000696197876439,0.000693886892029,0.000691530431421,0.000689128343257,0.000686681440459,0.00068418994758,0.000681654326408,0.000679075046654,0.000676451422247,0.0006737829139,0.000671069792615,0.000668311635489,0.000665508259614,0.000662661135409,0.000659770835077,0.000656837176182,0.000653860439122,0.000650840774615,0.000647779196127,0.000644676628011,0.000641533670781,0.000638351062391,0.000635129729927,0.000631869823379,0.00062857082336,0.00062523313798,0.000621858393913,0.000618447193494,0.000615000007214,0.000611517564712,0.000608000220746,0.000604447996649,0.000600861816397,0.000597242718627,0.000593591603822,0.000589909624496,0.000586197097736,0.000582455120158,0.000578684832028,0.000574886283525,0.000571060157428,0.000567207823183,0.000563330310947,0.000559427576146,0.000555501114092,0.000551551705529,0.000547579322583,0.00054358420092,0.000539565609094,0.00053552405402,0.000531460250496,0.000527374004606,0.000523264822353,0.000519132768531,0.000514978197155,0.000510800284983,0.000506600263805,0.000502378810091,0.000498137172435,0.000493876009891,0.000489595078924,0.00048529532258,0.000480977805812,0.000476644153125,0.000472294495901,0.000467929613956,0.000463549925136,0.000459155197466,0.000454745762753,0.000450321630848,0.000445883481351,0.000441432310455,0.000436968126407,0.000432490942409,0.000428001079735,0.000423500012154,0.000418987818897,0.00041446506785,0.000409931647286,0.000405388814339,0.000400837903961,0.000396278583041,0.000391711124211,0.000387136307798,0.000382554183605,0.000377964842512,0.000373368603589,0.000368766799539,0.000364160557371,0.00035955052681,0.000354936832406,0.000350320216655,0.000345701960467,0.000341082614846,0.000336462914446,0.000331843037362,0.00032722291765,0.000322602322088,0.000317981261043,0.000313359383982,0.000308736967945,0.000304114381759,0.00029949096213,0.000294866313482,0.00029024082803,0.000285615273417,0.000280991326553,0.000276369309576,0.00027174962573,0.000267132328095,0.000262517770352,0.000257905916304,0.00025329691476,0.000248690996211,0.000244088454528,0.000239489027423,0.000234891733382,0.000230296131557,0.00022570306975,0.000221112933984,0.000216526053174,0.000211943202309,0.000207365286889,0.000202793106067,0.000198227126844,0.000193668032313,0.000189116395592,0.000184572803091,0.00018003710898,0.000175509545538,0.000170990324991,0.000166479369911,0.00016197605957,0.000157480223645,0.000152991569985,0.000148509629733,0.000144035452884,0.000139569731513,0.000135112905109,0.000130666033654,0.00012622979845,0.000121804147084,0.000117389833849,0.000112987992678,0.000108599131632,0.000104224681092,9.98649339364e-05,9.55194218106e-05,9.11885063023e-05,8.6872460965e-05,8.25706224935e-05,7.82832731987e-05,7.40117849708e-05,6.97561928784e-05,6.55169325267e-05,6.12938565736e-05,5.70860447742e-05,5.28946615359e-05,4.87195210662e-05,4.45602474197e-05,4.04173533018e-05,3.62912198833e-05,3.21812931713e-05,2.80866046968e-05,2.40073378313e-05,1.9943148179e-05,1.58948961608e-05,1.18627589048e-05,7.84665313686e-06,3.84732607448e-06,-1.35187843632e-07,-4.10070380265e-06,-8.04910659919e-06,-1.19792066239e-05,-1.5890443871e-05,-1.97826964433e-05,-2.36558316345e-05,-2.7510529277e-05,-3.13468081555e-05,-3.51647641011e-05,-3.89644830962e-05,-4.27456692445e-05,-4.65082894874e-05,-5.02527819406e-05,-5.39801821395e-05,-5.76898893256e-05,-6.13820144917e-05,-6.50565056155e-05,-6.87126997722e-05,-7.23509188565e-05,-7.59705796018e-05,-7.9572095512e-05,-8.31559005709e-05,-8.67215385833e-05,-9.0268035562e-05,-9.37959042597e-05,-9.73052054949e-05,-0.000100795055505,-0.000104265447877,-0.000107716409516,-0.000111147318408,-0.000114558252912,-0.000117948214784,-0.000121316544012,-0.000124663380254,-0.000127987991509,-0.000131290476749,-0.000134570508227,-0.00013782832946,-0.000141063507527,-0.000144275361617,-0.000147464112515,-0.000150630098715,-0.0001537744243,-0.000156897339866,-0.000159999430702,-0.000163080141158,-0.000166139600079,-0.000169178548644,-0.000172196754505,-0.000175195627948,-0.000178175759836,-0.000181136660877,-0.000184077552118,-0.000186998407358,-0.000189898377237,-0.000192777702813,-0.000195636706441,-0.000198474052593,-0.00020129005195,-0.000204084542589,-0.000206856382286,-0.000209605340249,-0.000212331143391,-0.000215033172692,-0.000217711172212,-0.000220366252147,-0.000222998440461,-0.000225608316899,-0.000228195725116,-0.000230759862938,-0.00023330066254,-0.000235818206414,-0.000238313586001,-0.000240787552699,-0.000243241607271,-0.000245674878455,-0.000248086696374,-0.000250476416374,-0.000252844072313,-0.000255190644932,-0.000257516551458,-0.000259821582726,-0.000262105713398,-0.000264368312213,-0.000266609291839,-0.000268827651762,-0.000271024316466,-0.00027319945167,-0.000275353535651,-0.000277487099458,-0.000279598626801,-0.000281688220409,-0.000283756352923,-0.000285803069841,-0.000287827616737,-0.000289830053372,-0.000291810375215,-0.000293768290569,-0.000295703646723,-0.000297615223903,-0.000299502459934,-0.000301366908009,-0.000303208184326,-0.000305025934373,-0.000306819381913,-0.000308588441953,-0.000310332948804,-0.000312053200521,-0.000313749311043,-0.000315421623068,-0.000317071629985,-0.000318698955948,-0.000320302326585,-0.000321881919014,-0.000323438817475,-0.000324974087,-0.000326488438352,-0.000327981376214,-0.000329452212655,-0.000330900379672,-0.000332325785102,-0.000333727018184,-0.000335105248329,-0.000336462028246,-0.000337796400348,-0.000339107089198,-0.000340392874967,-0.000341653723183,-0.000342890434131,-0.000344103502949,-0.000345293179219,-0.000346459689043,-0.000347603637056,-0.000348722753161,-0.000349817274906,-0.000350888964659,-0.000351938151602,-0.000352966292051,-0.000353972839682,-0.000354957668529,-0.000355920444149,-0.000356861098392,-0.000357777622441,-0.000358670701223,-0.000359540620713,-0.000360385992501,-0.000361206697154,-0.000362001425664,-0.000362769014611,-0.000363508832253,-0.000364221120594,-0.000364905966866,-0.000365564163648,-0.000366197202381,-0.000366805220307,-0.000367388836119,-0.000367948335196,-0.000368483253417,-0.000368995076005,-0.000369484917012,-0.000369952827737,-0.000370398715766,-0.000370822873711,-0.000371224485203,-0.000371602404394,-0.000371954813207,-0.000372280991592,-0.000372580625789,-0.000372841515215,-0.000373052029552,-0.000373211242524,-0.000373318718192,-0.000373372957842)
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(215)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('A549-100nM-Dex-8h-p300.pooled.sorted.MACS-2.1.0.p1e-1_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) : 215',bty='n')
dev.off()