# R script for Peak Model
#  -- generated by MACS
p <- c(0.0357059663319,0.0416304824363,0.0477624117675,0.0536074930191,0.0594834656023,0.0594636068891,0.0595364221708,0.0598012050135,0.0600615748088,0.0601741075169,0.0604190316463,0.0604433034069,0.0605293578308,0.0608978472868,0.0609044668579,0.0605911404941,0.0603528359357,0.0601365966142,0.0597681071581,0.0597151505896,0.0597019114475,0.0595893787394,0.0593356285151,0.0591833783806,0.0591767588096,0.0594614003654,0.059620270071,0.0595452482656,0.0597305962554,0.0598298898214,0.0598497485346,0.0599358029585,0.0599490421006,0.0598519550583,0.059889465961,0.0597614875871,0.0596026178815,0.0596820527343,0.0595298025998,0.059591585263,0.059520976505,0.0594944982207,0.0596114439762,0.0598144441556,0.059889465961,0.0601829336116,0.0605050860702,0.0605756948282,0.060619825302,0.0605403904492,0.0605072925939,0.0604609555964,0.0604984664991,0.0602667815118,0.060350629412,0.0601255639957,0.0599335964348,0.0598916724847,0.060024063906,0.0602182379907,0.0603373902699,0.0604940534518,0.0603903468384,0.0604962599754,0.0604675751675,0.0605293578308,0.0606440970626,0.0606617492521,0.0607786950076,0.0605734883046,0.0606374774915,0.0604962599754,0.0604609555964,0.0605823143993,0.0605337708782,0.0602645749881,0.0602623684644,0.060222651038,0.0602270640854,0.0602270640854,0.0602094118959,0.0602623684644,0.0600924661404,0.0599733138612,0.0599468355769,0.0602116184196,0.0599711073375,0.0600681943798,0.0599159442453,0.0598629876768,0.0596423353079,0.0596599874974,0.0598607811531,0.0596335092131,0.0596423353079,0.0596467483553,0.0598100311082,0.0596599874974,0.0596092374526,0.0596224765947,0.0598607811531,0.0599490421006,0.060052748714,0.060449922978,0.0602778141303,0.0601983792775,0.0602380967039,0.0602976728435,0.0604366838358,0.0607124992969,0.0605006730228,0.0605050860702,0.0605271513071,0.0603087054619,0.0604433034069,0.0604697816912,0.0602910532724,0.0604278577411,0.0603881403147,0.0601674879458,0.0604057925042,0.0603285641751,0.060216031467,0.0603704881252,0.0605072925939,0.0607213253917,0.0608162059103,0.0607169123443,0.0606573362047,0.0607257384391,0.0606926405837,0.0609265320948,0.0610192060897,0.061080988753,0.0610147930423,0.0608779885736,0.0609794886633,0.0608581298604,0.0608779885736,0.0609243255711,0.0609044668579,0.0607588362944,0.0607411841049,0.0606043796362,0.0607764884839,0.0608956407631,0.060853716813,0.0610765757056,0.0612244127927,0.061080988753,0.0609949343291,0.0610699561345,0.0611493909873,0.0610721626582,0.0609971408528,0.0608448907183,0.0610478908976,0.0611229127031,0.0611692497005,0.0613104672166,0.0614825760643,0.0615421522039,0.0616657175305,0.0618223807124,0.0620893700787,0.0622416202133,0.0621467396947,0.0621180548867,0.0621202614104,0.0622570658791,0.0622967833055,0.0622835441634,0.0624335877742,0.0622195549764,0.062051859176,0.0620584787471,0.0620033156549,0.0619238808021,0.0617142610517,0.061619380533,0.0616326196752,0.0618069350466,0.0617451523833,0.0620231743681,0.0620739244129,0.0619393264679,0.0620650983182,0.0620408265576,0.0621136418393,0.0622217615001,0.0623365007319,0.0623166420187,0.0621533592657,0.0621401201236,0.0621974897395,0.0622967833055,0.0622261745475,0.0623828377294,0.0624710986769,0.0624975769612,0.062385044253,0.0622239680238,0.0620474461287,0.0620959896498,0.0621665984079,0.0621665984079,0.0621776310263,0.0620915766024,0.061917261231,0.06195256561,0.0616877827674,0.0619371199442,0.0621555657894,0.0621004026972,0.061945946039,0.0620761309366,0.0622394136896,0.0622394136896,0.0626652727615,0.0624710986769,0.0627645663275,0.062577011814,0.0626520336194,0.0624733052006,0.0626498270957,0.0626432075246,0.0628285555145,0.0627800119933,0.0626674792852,0.0629499143174,0.0630271426465,0.06321469716,0.0632014580179,0.0633161972497,0.0633095776786,0.0632853059181,0.063179392781,0.0633801864367,0.0631948384468,0.0632124906363,0.063243381968,0.063108784023,0.0630955448808,0.0633338494392,0.0633360559629,0.0635809800924,0.063448588671,0.0634265234342,0.0635809800924,0.0634816865264,0.0637552954638,0.063775154177,0.0641061327303,0.064178948012,0.0642672089596,0.0643731220966,0.0645143396127,0.0646621766999,0.0648872421161,0.0653108946644,0.0652093945747,0.065540373128,0.0652535250485,0.0654035686593,0.0654476991331,0.0653881229935,0.0656882102152,0.0657168950231,0.0659794713421,0.0658448733971,0.065866938634,0.0661935041399,0.066539928359,0.0665796457854,0.0666061240697,0.0665465479301,0.0666767328277,0.0669304830519,0.0668775264834,0.0669525482888,0.0672702877,0.067206298513,0.0672438094158,0.0675858205875,0.0680447775148,0.0684640170157,0.0686648106713,0.0687574846663,0.0691370067407,0.0694194417729,0.069432680915,0.0695628658127,0.0699953444557,0.0699379748398,0.0700262357873,0.0703307360564,0.0705800732332,0.0709971062104,0.0713633891427,0.0719679766334,0.0726917164034,0.0732565864677,0.0738876522427,0.0747548160524,0.0754763492986,0.0762442195423,0.0773541009578,0.0783933736152,0.0791811025721,0.079834233584,0.0803307014139,0.0809132236678,0.081400865403,0.0820164855122,0.0825747360054,0.0829983885537,0.0828152470875,0.0827887688033,0.083066790788,0.083060171217,0.0833977693414,0.0838699654108,0.0841832917746,0.0843178897196,0.0846135638939,0.0848231836443,0.0849158576392,0.0853792276139,0.0855403038432,0.0859573368203,0.086321413229,0.0864140872239,0.0867847832036,0.0871929900861,0.0872900771284,0.0874908707841,0.0880998713222,0.0882410888382,0.0883028715015,0.0887243175261,0.0888898068027,0.089050883032,0.0892913941141,0.0893752420143,0.0895672095752,0.0898143402283,0.0899224598891,0.0899224598891,0.0902291666818,0.0902755036793,0.0904586451455,0.0908668520279,0.090582210472,0.0906770909907,0.0907344606066,0.0908403737436,0.0910875043968,0.0913787655237,0.0916126570347,0.0920054182513,0.0921245705305,0.0919745269197,0.092340809852,0.0927048862607,0.0930888213825,0.0932300388986,0.0935874957362,0.0939206808132,0.0943178550772,0.094333300743,0.0945804313961,0.0952203232659,0.0952401819791,0.0952843124528,0.0955005517743,0.0955866061982,0.0953637473056,0.0956770736694,0.0954475952058,0.0957278237143,0.0959683347964,0.0959396499884,0.096431704771,0.0965354113844,0.0967957811797,0.0976121949445,0.0982587063853,0.0985102500859,0.0990023048684,0.0992295768084,0.0994458161299,0.100039371002,0.100299740797,0.100641751969,0.100970523999,0.101083056707,0.101411828737,0.101943600946,0.102234862073,0.102435655728,0.102841656087,0.102885786561,0.103424178341,0.103991254929,0.104628940275,0.105094516773,0.105348266997,0.105663799885,0.106241909091,0.106921518388,0.107504040641,0.107817367005,0.108384443593,0.108631574246,0.109158933408,0.109516390246,0.110138629926,0.11045195629,0.111034478543,0.111314707052,0.111908261924,0.112616556028,0.112905610631,0.113763948346,0.113955915907,0.114584775159,0.114957677662,0.115568884724,0.115787330569,0.116566233431,0.116923690269,0.11773789751,0.118567550417,0.119247159713,0.12007681262,0.120407791173,0.121533118255,0.122530466962,0.123503543909,0.124108131399,0.12502383873,0.125566643558,0.126091796196,0.126566198789,0.12702736224,0.128018091376,0.128121797989,0.128503526588,0.129130179315,0.130109875833,0.130902017837,0.131725051173,0.132682682454,0.133697683351,0.134547194971,0.135317271738,0.136522033673,0.137422295338,0.138373307047,0.139048503296,0.139898014916,0.140946113669,0.141634549059,0.14252598463,0.143735159611,0.144827388837,0.145701172218,0.14666542307,0.147715728346,0.148783685811,0.149869295466,0.150837959365,0.151859579833,0.152812798067,0.153679961877,0.154688343202,0.156065213984,0.157104486642,0.15829380291,0.159425749562,0.160412065651,0.161590349301,0.162949567893,0.164103579782,0.165401015711,0.166374092658,0.167563408926,0.168898355758,0.169822889184,0.17081361832,0.172077956394,0.173501164173,0.175076622087,0.176446873297,0.177784026653,0.179244745335,0.180765040156,0.182596454818,0.184374912911,0.186506414795,0.18828045984,0.190021407031,0.191824136885,0.193984323576,0.196016531893,0.197975924929,0.199774241735,0.201546080257,0.203406179727,0.205155953012,0.206925585011,0.208999717278,0.210255229257,0.211773317555,0.213553982172,0.215420701212,0.216859354658,0.218463497379,0.220056607483,0.221488641357,0.22283682733,0.223428175679,0.224599839758,0.225577329752,0.225948025732,0.226625428504,0.227062320195,0.227172646379,0.227247668184,0.226801950399,0.226411395706,0.225500101423,0.224341676486,0.223247240737,0.221960837426,0.220180172809,0.218454671285,0.216576919625,0.214542504784,0.212666959649,0.21037658806,0.208397336311,0.206314377949,0.204423387148,0.202614037723,0.200773796966,0.198960034494,0.197077869788,0.195224389889,0.19328706209,0.191325462531,0.189886809086,0.188351068598,0.186173229718,0.184357260722,0.182159563128,0.18033035499,0.178401853286,0.176656493048,0.175279622266,0.174028523335,0.172689163455,0.171281401342,0.169600030291,0.16822977908,0.167322897844,0.165535613656,0.164324232151,0.163543122765,0.16191912133,0.160312772085,0.158774825074,0.157616400137,0.156711725425,0.155661420149,0.15430440808,0.153902820769,0.153015798246,0.151658786178,0.151010068213,0.15049374167,0.149858262848,0.149284566689,0.148757207527,0.148006989473,0.147470804216,0.146367542372,0.145341508857,0.14422500787,0.143390941916,0.142537017248,0.141208689988,0.139825199635,0.138472600613,0.13727445825,0.13590420704,0.134617803729,0.133761672538,0.132457617038,0.130831409079,0.128964690038,0.12736275384,0.125654904505,0.124094892257,0.122316434164,0.120544595642,0.118905148541,0.116762614039,0.114931199378,0.11366465478,0.112530501604,0.111120532967,0.11006360812,0.108834574426,0.107960791045,0.107109072901,0.106519931076,0.105893278349,0.105458593182,0.104626733751,0.104103787637,0.104011113642,0.10350140667,0.103541124096,0.102665134192,0.102336362162,0.101764872527,0.101248545984,0.100981556617,0.100489501835,0.100202653755,0.099622338025,0.0991369028135,0.0987463481206,0.0986404349835,0.0980468801112,0.0976872167499,0.0974775969995,0.0971929554436,0.097126759733,0.0965773353345,0.0961823675942,0.0957344432854,0.0950504209418,0.09466648582,0.0946157357751,0.0941788440848,0.0939206808132,0.0936691371127,0.0931925279959,0.092773288495,0.0926364840263,0.0925769078867,0.09214222272,0.0918840594484,0.0913831785711,0.091504537374,0.0909904173545,0.0901916557791,0.0897988945625,0.0894789486276,0.0888611219948,0.0886316435312,0.0882565345041,0.0879476211876,0.0880226429931,0.0873253815074,0.0873981967891,0.0874621859761,0.0871554791834,0.087016468191,0.0870032290488,0.0867207940167,0.086888489817,0.0866656309244,0.0864074676529,0.0863743697975,0.085818325828,0.0854983798931,0.0852711079531,0.0852181513846,0.0849290967814,0.0846069443228,0.0842119765825,0.0841016503981,0.0837441935605,0.0836051825681,0.0835411933811,0.0833470192965,0.0834772041942,0.0831793234962,0.0830645842643,0.0828748232271,0.0827755296611,0.0824820620105,0.0826365186687,0.0820848877465,0.0819458767541,0.08196132242,0.0815442894428,0.0815089850638,0.0812773000764,0.0812397891737,0.0806881582515,0.0806506473488,0.0803968971246,0.0805976907803,0.0802755383217,0.0798651249156,0.0797812770154,0.0793995484173,0.0792958418039,0.0790442981034,0.079004580677,0.0787111130264,0.0781506560094,0.0776630142742,0.0777336230322,0.0775615141845,0.0773276226735,0.0771025572572,0.0768223287488,0.0765487198114,0.0764141218663,0.0759750236523,0.0759728171286,0.0758823496574,0.0754542840617,0.0750571097977,0.0746687616285,0.074452522307,0.0741105111353,0.0739472283823,0.0737309890608,0.0735478475946,0.0729697383882,0.0728042491115,0.0725615315057,0.0725703576005,0.0726431728822,0.0723033682341,0.0722989551868,0.0719348787781,0.0714119326639,0.0712795412425,0.0711978998661,0.0708669213127,0.0707720407941,0.0706528885149,0.0701696598271,0.0699379748398,0.0697614529447,0.0696334745707,0.0697415942315,0.0696467137128,0.0695408005758,0.0693466264912,0.06902888708,0.0688258869006,0.0687199737636,0.0684596039683,0.0678285381933,0.0676718750114,0.0674313639293,0.066972407002,0.0668466351518,0.0665288957406,0.0664847652668,0.0661471671424,0.0659551995815,0.0657566124495,0.0658691451576,0.06546976437,0.06524249243,0.0652138076221,0.0649799161111,0.0648717964503,0.0646158397024,0.0643113394334,0.0641480566804,0.0642539698174,0.0640840674934,0.064271622007,0.064143643633,0.0640333174486,0.0639251977878,0.0638898934088,0.0635633279029,0.0635633279029,0.0635611213792,0.0635434691897,0.0634816865264,0.0633956321025,0.0634728604316,0.0635059582869,0.0634265234342,0.063313990726,0.0632875124418,0.0631462949257,0.0627601532801,0.0627027836642,0.0625814248613,0.0624556530111,0.0623563594451,0.0621357070762,0.0619216742784,0.0617495654307,0.061817967665,0.0619040220889,0.0619216742784,0.0618422394256,0.0617561850017,0.0615598043934,0.0614627173511,0.061449478209,0.0614649238748,0.0615531848224,0.0614958152065,0.0615024347775,0.0613965216405,0.0611361518452,0.0612464780296,0.0613082606929,0.0613281194061,0.061513467396,0.061520086967,0.0616502718647,0.0614825760643,0.0615664239645,0.0617319132412,0.0618444459493,0.0618797503283,0.0618312068072,0.0616039348672,0.0614252064484,0.0614980217302,0.0614649238748,0.061449478209,0.0611538040347,0.0610898148477,0.0611427714163,0.060917706,0.0610368582792,0.0611582170821,0.0611670431768,0.0612398584586,0.061016999566,0.0611471844636,0.0612685432665,0.0612288258401,0.0612839889323,0.0612884019797,0.0610831952767,0.0612398584586,0.0610434778503,0.0606705753469,0.0608669559552,0.0607610428181,0.060683814489,0.0606749883942,0.0604035859805,0.0604190316463,0.0606639557758,0.0604521295017,0.0604168251226,0.060520531736,0.0604653686438,0.0606154122546,0.0608117928629,0.0609154994763,0.0611251192267,0.0608868146684,0.0607632493418,0.0607742819602,0.060889021192,0.0610236191371,0.0607500101997,0.0604940534518,0.0604609555964,0.0603682816015,0.0599689008138,0.060116737901,0.0599622812428,0.0598696072478,0.0595342156471,0.0594106503206,0.0594878786497,0.0595231830287,0.0590620195777,0.0591127696226,0.0593466611336,0.0593488676573,0.0591370413832,0.0590509869593,0.0592672262808,0.0591723457622,0.059223095807,0.0590796717672,0.059258400186,0.0593312154678,0.0594194764153,0.0593554872283,0.0595165634576,0.0595893787394,0.0595783461209,0.0594768460312,0.0591922044754,0.0592495740913,0.0592848784703,0.0590002369144,0.0588523998273,0.0588148889246,0.0586405735532,0.0585765843662,0.0586604322664,0.0584419864212,0.0587045627402,0.0586670518374,0.0584839103713,0.0585677582714,0.0586251278874,0.0587155953586,0.0590929109094,0.0590576065304,0.0591260087647,0.0594790525549,0.0591745522859,0.0591745522859,0.0590421608645,0.0589759651539,0.0587641388797,0.0586096822215,0.0582809101919,0.058223540576,0.0579080076885,0.0577116270802,0.0577998880277,0.0579102142122,0.0580183338729,0.0579852360176,0.0578947685464,0.0578528445963,0.057727072746,0.0576586705117,0.0576939748907,0.0576719096538,0.0577932684567,0.0576123335142,0.0576299857037,0.057457876856,0.0575042138535,0.0574689094744,0.05762777918,0.0576608770354,0.0574203659533,0.0574534638086,0.0572570832003,0.0571754418238,0.0571048330658,0.0573806485269,0.0572614962477,0.0573850615743,0.0572460505819,0.0571335178737,0.0573343115294,0.0572416375345,0.0573034201978,0.0574005072401,0.0574071268111,0.0573475506715,0.05735858329,0.0571511700632,0.056996713405,0.0571555831106,0.0571798548712,0.0572438440582,0.0572372244871,0.0570717352104,0.0573078332451,0.0571622026817,0.0571666157291,0.0573674093847,0.0576343987511,0.0577116270802,0.0578572576437,0.0578307793594,0.0578307793594,0.0579984751597,0.0578153336936,0.0579962686361,0.0581220404863,0.0580492252046,0.0580293664914,0.0578660837384,0.057791061933,0.0577998880277,0.057762377125,0.0576145400379,0.0576145400379,0.0572923875793,0.0572372244871,0.0572968006267,0.0572703223424,0.057287974532,0.0574269855243,0.0575858552299,0.0575880617536,0.0578153336936,0.05785505112,0.057925659878,0.0579433120675,0.0577314857934,0.0578749098332,0.0577248662223,0.0574667029507,0.0573188658636,0.0572703223424,0.0571004200184,0.0569062459338,0.0568510828416,0.0566524957096,0.0569018328864,0.056599539141,0.0568819741732,0.0570893874,0.0571930940133,0.0572637027714,0.0573563767663,0.0573475506715,0.0573894746216,0.0574622899034,0.057223985345,0.0575042138535,0.0573475506715,0.0573519637189,0.0573960941927,0.057422572477,0.0575659965167,0.0576079204668,0.0577050075091,0.0576785292249,0.0578859424516,0.0577094205565,0.0578153336936,0.0575240725667,0.0572041266318,0.0571798548712,0.0568444632705,0.0569216915996,0.0570739417341,0.0572681158188,0.0571533765869,0.0569084524575,0.0566878000886,0.0567429631808,0.0567032457544,0.0568025393204,0.0569415503128,0.0569040394101,0.056727517515,0.0566061587121,0.0565973326174,0.0568952133153,0.0570496699736,0.0571136591605,0.0572195722976,0.0571798548712,0.0569923003577,0.0572526701529,0.057223985345,0.0574733225218,0.057457876856,0.0573762354795,0.0573806485269,0.0572703223424,0.0572813549609,0.0572703223424,0.057393887669,0.0571004200184,0.0571930940133,0.0568201915099,0.056990093834,0.0570849743526,0.0570165721182,0.0571070395895,0.0572703223424,0.0572041266318,0.0571379309211,0.0572990071504,0.0573144528162,0.0573122462925,0.0572261918687,0.0569702351208,0.0570364308314,0.0570452569262,0.0569062459338,0.0570938004473,0.0570805613052,0.0567341370861,0.0565443760488,0.0566326369964,0.0564009520091,0.0566944196597,0.0564208107223,0.0562751801588,0.0562619410167,0.0561780931165,0.0562354627324,0.0562729736351,0.0563479954405,0.0561648539744,0.0563104845378,0.0562133974955,0.056195745306,0.05632372368,0.0563215171563,0.0559905386029,0.0560457016952,0.0561692670217,0.0560655604084,0.0562288431613,0.0561847126876,0.0561736800691,0.0562509083982,0.056224430114,0.0562023648771,0.0563215171563,0.0563479954405,0.0564627346723,0.0565267238593,0.056528930383,0.0566723544228,0.0565796804279,0.0564208107223,0.056458321625,0.0565509956199,0.0567870936546,0.0567253109913,0.0567319305624,0.0567142783729,0.056628223949,0.0565554086673,0.0567120718492,0.0569680285971,0.0569746481681,0.0568819741732,0.0567848871309,0.0568378436994,0.056791506702,0.0568091588915,0.0568113654152,0.0568532893653,0.0568709415548,0.0569106589812,0.0568334306521,0.0569283111707,0.0569592025023,0.056791506702,0.0566657348517,0.0565620282383,0.0566326369964,0.0565024520987,0.0564693542434,0.056330343251,0.0563965389617,0.0562420823035,0.0561780931165,0.0562553214456,0.0563347562984,0.0563921259143,0.0563877128669,0.0565907130463,0.0564715607671,0.0565355499541,0.0563369628221,0.0562840062536,0.0561780931165,0.0562089844481,0.0562398757798,0.0561560278796,0.0562487018745,0.0561030713111,0.0560302560293,0.0560854191216,0.0559640603187,0.0561008647874,0.0560059842688,0.0559464081292,0.0559640603187,0.0560368756004,0.0559177233212,0.0558824189422,0.0561163104532,0.0561869192112,0.0565664412857,0.0565421695251,0.0566216043779,0.0567804740835,0.0568223980336,0.0569812677392,0.0570099525472,0.0569790612155,0.0566127782832,0.0566017456647,0.0563435823932,0.0562641475404,0.050672816513,0.0449093766379,0.0391856541892,0.0334575186931,0.0)
m <- c(0.0337817667521,0.0395960481798,0.0452783867612,0.0510794739043,0.0568299829563,0.0572653943491,0.0572258114952,0.0569575277077,0.0569971105616,0.0570081057988,0.0570476886527,0.0567706086754,0.0566276705919,0.0564187610853,0.0563549887095,0.0560889039695,0.0562274439581,0.0564209601327,0.0565507039316,0.056588087738,0.0566452629714,0.0566386658291,0.0565770925008,0.0566518601138,0.0567969972447,0.0570015086565,0.0567991962921,0.0569509305654,0.0568167886717,0.056893755332,0.0570982667438,0.0572280105427,0.0576546257458,0.0576876114573,0.0575688628957,0.0574699057609,0.0575600667059,0.0574523133814,0.0576568247932,0.0576964076471,0.0575688628957,0.0576876114573,0.0577140000266,0.057861336205,0.0580174685731,0.0581054304707,0.0582483685542,0.0583121409299,0.0583011456927,0.0583253352145,0.058488064725,0.0584814675827,0.0583935056851,0.0584023018749,0.0583473256889,0.0582351742696,0.0582989466453,0.0582087857003,0.0580988333284,0.058021866668,0.0580592504745,0.0580680466642,0.057966890482,0.0580548523796,0.0580878380912,0.0581845961785,0.058112027613,0.0583913066377,0.0584308894916,0.0585606332905,0.0584660742506,0.0584858656776,0.0585870218597,0.058543040911,0.0584924628199,0.0584572780609,0.0586859789945,0.0585166523417,0.0586244056662,0.0585298466263,0.0586705856624,0.0588267180306,0.058919078023,0.0587563485125,0.058883893264,0.0589960446833,0.0588333151729,0.0590202342051,0.0589146799281,0.0589036846909,0.0586705856624,0.0585738275751,0.0587145666112,0.0589696561141,0.0590950018181,0.059044423727,0.0592115513323,0.0591411818143,0.0593017122773,0.0594666408352,0.0596667541521,0.0598734646113,0.0596623560572,0.0597107351009,0.0596051808238,0.0594688398826,0.0594886313096,0.0596227732033,0.0594336551236,0.0595172189263,0.0594490484557,0.0593830770325,0.05938527608,0.0592973141824,0.0592379399016,0.0594644417878,0.0594622427403,0.0595480055904,0.0597591141445,0.0597657112868,0.0598030950933,0.0597569150971,0.0598514741369,0.0599790188884,0.0601307531617,0.0600295969795,0.0599856160307,0.0599108484178,0.0597877017612,0.0597481189073,0.0598184884254,0.0600076065051,0.0601923264899,0.0601439474463,0.0600142036474,0.0600977674501,0.0600186017423,0.0599592274614,0.0599438341294,0.0598756636588,0.0596975408162,0.0596799484367,0.059545806543,0.0595062236891,0.0594820341673,0.0596557589149,0.0598008960459,0.0598338817574,0.0600098055525,0.0598162893779,0.0599064503229,0.0599438341294,0.0597986969984,0.0597920998561,0.0598954550857,0.0596799484367,0.0597107351009,0.0596953417688,0.0597481189073,0.0601571417309,0.0601637388732,0.0599636255563,0.0600361941218,0.0600361941218,0.0600229998372,0.0603044779093,0.0603484588581,0.0603462598106,0.0602868855298,0.0600713788808,0.0600295969795,0.0599680236512,0.0600977674501,0.0599064503229,0.0602385064861,0.0600098055525,0.0596469627252,0.0598250855677,0.0597195312906,0.0597657112868,0.0600669807859,0.0603044779093,0.0602451036285,0.0604562121826,0.0603594540953,0.060297880767,0.0604122312338,0.0602890845772,0.0602714921977,0.0603924398068,0.0602209141066,0.0601615398258,0.0599944122205,0.0600164026948,0.0595963846341,0.0596381665354,0.0596051808238,0.0596249722508,0.0595897874918,0.0595392094007,0.0594754370249,0.0590730113437,0.059310508467,0.0593720817953,0.0597855027138,0.0597349246227,0.0599856160307,0.0600317960269,0.0599350379396,0.0599152465127,0.0600295969795,0.0601989236323,0.0600032084102,0.0598426779472,0.0597019389111,0.0597657112868,0.0596293703456,0.0596073798713,0.0595546027327,0.0594710389301,0.0593171056094,0.0596579579623,0.0598228865202,0.0600032084102,0.0599108484178,0.0598492750895,0.059776706524,0.0596579579623,0.059902052228,0.0598778627062,0.0598910569908,0.0594248589339,0.0595677970174,0.0595414084481,0.0595436074955,0.0595590008276,0.0594974274993,0.0595238160686,0.0596931427214,0.0599196446075,0.0600537865013,0.0603132740991,0.0600999664975,0.0600955684026,0.0600032084102,0.0599834169833,0.0599680236512,0.0599438341294,0.0597305265278,0.0595919865392,0.0593764798902,0.0594050675069,0.0593478922735,0.0592973141824,0.0593566884633,0.0593742808428,0.0594776360724,0.0595392094007,0.0596931427214,0.0598712655639,0.0599042512755,0.0597679103343,0.0598008960459,0.0597481189073,0.0598976541332,0.0599702226986,0.0598580712793,0.0599636255563,0.0597899008087,0.0596931427214,0.0599878150781,0.0600757769757,0.0600647817385,0.060102165545,0.0602165160118,0.0601857293476,0.0602758902926,0.0600559855487,0.0601945255374,0.0600581845962,0.0600186017423,0.0601791322053,0.0601329522091,0.0601813312527,0.0599834169833,0.0601109617347,0.0603660512376,0.060478202657,0.0603044779093,0.0604540131351,0.0604078331389,0.0603990369492,0.0605375769378,0.060423226471,0.0605573683647,0.060388041712,0.0601967245848,0.0603242693363,0.0606607235944,0.0605815578866,0.060673917879,0.0605947521712,0.0607772731086,0.0610829407026,0.06108513975,0.0613490254426,0.0614347882928,0.0615007597159,0.0614699730518,0.0616041149455,0.0614743711467,0.0616173092302,0.0617272616021,0.0615777263763,0.0614677740043,0.0614083997235,0.061390807344,0.0613050444939,0.0611335187937,0.0611027321295,0.0612236797386,0.0612896511618,0.0610807416551,0.0611840968848,0.0613028454464,0.0614303901979,0.0615623330442,0.0616041149455,0.0616085130404,0.0616524939892,0.0616634892264,0.0616898777956,0.0619317730139,0.0619119815869,0.0619779530101,0.0620153368166,0.062178066327,0.0623363977426,0.0625672977236,0.062589288198,0.0626068805775,0.0626904443802,0.0625079234428,0.0626332691468,0.0628751643651,0.0629103491241,0.0626046815301,0.0626684539058,0.0626530605738,0.0627674110406,0.0626376672417,0.0624089663081,0.062483733921,0.0624661415415,0.0623319996477,0.0624969282056,0.0629059510292,0.0629961119742,0.0631258557731,0.0630598843499,0.0631500452949,0.0632995805207,0.0631324529154,0.063341362422,0.0633105757579,0.0630664814922,0.0629125481715,0.0629235434087,0.0628553729381,0.0628927567446,0.0633941395606,0.0633391633746,0.0636734185853,0.0633853433708,0.0633787462285,0.0635238833594,0.0635480728813,0.0634029357503,0.0636316366839,0.0637569823879,0.0633281681374,0.0633699500387,0.0632995805207,0.0633193719477,0.0633721490862,0.0632973814733,0.0631610405321,0.0631368510102,0.0628289843688,0.0627322262815,0.0628751643651,0.0631500452949,0.0632204148129,0.0634381205093,0.0633831443234,0.063361153849,0.0637130014392,0.0637965652418,0.0638339490483,0.0638647357124,0.0636008500198,0.0634337224145,0.0634469166991,0.0633237700425,0.0633105757579,0.0634908976479,0.0634095328926,0.063396338608,0.063576660498,0.063682214775,0.0641176261679,0.064168204259,0.064489265185,0.0645574356556,0.0647245632609,0.0646058146992,0.0647201651661,0.0648389137277,0.064990648001,0.0649290746727,0.0648806956291,0.064990648001,0.0648718994393,0.0653358984489,0.0655799927146,0.0659450345894,0.0660417926767,0.0660747783882,0.0659758212535,0.0662946831321,0.066655326912,0.0668400468969,0.0669785868855,0.0666509288172,0.0669829849804,0.0670577525933,0.0674469839899,0.0676251068325,0.0679373715688,0.0681001010792,0.0681924610716,0.0679065849046,0.0680605182253,0.0684607448591,0.068429958195,0.0686718534133,0.0685575029464,0.068860971493,0.0692524019371,0.0696086476221,0.0697427895159,0.0703123428025,0.0704838685027,0.0705432427835,0.0706421999183,0.0707191665786,0.0710710141688,0.0712887198652,0.0712799236755,0.0713151084345,0.0716009846015,0.0718956569583,0.0718868607685,0.0722584997856,0.072515788336,0.072801664503,0.0730853416226,0.0733602225524,0.0736307053873,0.0737186672849,0.0738616053684,0.0740683158276,0.0745784948334,0.07470164149,0.0749809205147,0.0751326547879,0.0751678395469,0.0750908728866,0.0756318385565,0.0757593833079,0.0759924823364,0.07622118327,0.0763839127805,0.0767005756117,0.0767159689437,0.0770348308223,0.0772261479495,0.0776725545795,0.0774306593613,0.0777319288604,0.0779804212209,0.0781079659724,0.0780991697826,0.0781827335853,0.0784862021318,0.0786951116385,0.0787632821091,0.079053556371,0.0794317925304,0.0797616496462,0.079805630595,0.0801574781852,0.0805862924357,0.0809139505041,0.0812657980942,0.0812350114301,0.081380148561,0.0814461199842,0.0815978542575,0.0818573418552,0.08222238373,0.0825720322728,0.0828315198705,0.0828095293962,0.0828908941514,0.0834494522008,0.0838892616885,0.0840739816734,0.0842982845121,0.08428289118,0.0844720092597,0.0843884454571,0.0844060378366,0.0847227006678,0.0847710797114,0.0847930701858,0.0848964254154,0.0851910977722,0.0851581120606,0.0857782434383,0.0859013900949,0.0863873795788,0.086934942391,0.087205425226,0.0876628270932,0.0880190727782,0.0882961527555,0.0882587689491,0.0887711470023,0.088834919378,0.0890482269795,0.0890438288846,0.0887975355715,0.0890724165013,0.0891537812566,0.0893143117196,0.0897057421637,0.0902159211694,0.0904688116249,0.0905039963839,0.090840450642,0.0910669525282,0.0916057191506,0.0917002781905,0.0923248076631,0.0927976028624,0.0927734133405,0.0929977161793,0.0933033837733,0.0936464351737,0.0938861313445,0.0944161017772,0.0946162150941,0.0950384322023,0.0951659769538,0.0950912093408,0.095553009303,0.096089576878,0.0962786949577,0.0968394520546,0.0972418777358,0.0973562282026,0.098024738624,0.0982996195538,0.0987966042749,0.0994717118386,0.0998543460929,0.100375520336,0.101314513592,0.101686152609,0.102240312564,0.102739496332,0.103089144875,0.103674091494,0.103955569566,0.104353597152,0.104927548534,0.105345367547,0.10523981327,0.10552349039,0.105556476101,0.10612383034,0.106367924606,0.107078216929,0.107491637847,0.108010613043,0.108424033961,0.108822061548,0.109758855756,0.111058492793,0.112591228857,0.113800704949,0.11543899529,0.117035503731,0.118818931204,0.12075409295,0.123005917527,0.1253039221,0.127399614309,0.129114871311,0.130803739744,0.132532191031,0.134152888993,0.135327180325,0.136754362113,0.138174946758,0.139516365696,0.140761026546,0.141794578842,0.142960073985,0.144288298638,0.145244884273,0.146375194657,0.147498907898,0.148275171644,0.148884307784,0.149827699136,0.150494010509,0.151184511405,0.151754064692,0.152312622741,0.153214232191,0.153640847394,0.154568845413,0.155428672962,0.156233524324,0.156772290947,0.157779454674,0.158769026021,0.159976303065,0.161372698188,0.162494212382,0.163930190359,0.164904368375,0.166445900629,0.168216133817,0.169887409871,0.171165056433,0.172992464854,0.174580177105,0.175904003663,0.177544493052,0.179292735766,0.180950817534,0.1821822841,0.183343381148,0.18523896004,0.187022387512,0.188607900716,0.19005487393,0.19186688902,0.193806448861,0.195398559206,0.197311730478,0.19946459792,0.201767000588,0.202998467154,0.205146936502,0.207453737265,0.209485657098,0.211335055994,0.213151469178,0.21487552237,0.216366476533,0.218222472572,0.219968516238,0.2217607399,0.222369876041,0.222884453141,0.223860830204,0.224784430128,0.225316599609,0.225668447199,0.226031290026,0.225872958611,0.225202249142,0.224003768288,0.223739882595,0.22310875598,0.221861896082,0.220648021896,0.219684839118,0.218303837327,0.216828276495,0.215766136583,0.213765003413,0.212601707318,0.210820478893,0.208729184779,0.207242628711,0.205575750752,0.203042448103,0.201654849169,0.199818644558,0.197390896185,0.196144036288,0.194316627866,0.192229731847,0.190580446268,0.188539730245,0.186272512336,0.184997064821,0.182870585948,0.181168523231,0.179389493853,0.177601668285,0.176273443632,0.174683532334,0.173353108634,0.172389925856,0.171046307871,0.169370633723,0.167980835741,0.166571246333,0.165436537855,0.164139099866,0.162861453304,0.161896071479,0.160402918268,0.159101082184,0.158318221296,0.157524365171,0.156341277649,0.155397886298,0.154384125428,0.153278004567,0.152046538001,0.151052568559,0.150131167682,0.148932686828,0.14751430123,0.145887006126,0.144983197628,0.143960640569,0.142759960668,0.141840758838,0.140851187491,0.139839625669,0.13910074573,0.13829369532,0.137475649673,0.137044636375,0.135898932659,0.13505669749,0.134350803263,0.133420606196,0.132679527209,0.131995623456,0.131074222579,0.130075855042,0.129444728427,0.128503536123,0.127975764738,0.127170913375,0.126467218195,0.125998821091,0.125112604973,0.124272568851,0.123628247952,0.122801406115,0.122020744274,0.121385219564,0.120657334862,0.120116369192,0.119245546407,0.118343936957,0.11806685698,0.117308185613,0.11652972282,0.11616028285,0.11544779148,0.114719906778,0.114286694433,0.113385084983,0.113037635487,0.112626413616,0.111683022265,0.111339970865,0.110733033772,0.110178873817,0.109917187172,0.109670893859,0.109125530094,0.109061757718,0.108606554899,0.108026006375,0.107768717824,0.107170576921,0.10657023697,0.106035868443,0.105358561832,0.104478942856,0.103836821004,0.103097941065,0.102592160154,0.102227118279,0.101855479262,0.101380485015,0.101244144074,0.101149585034,0.10087030601,0.100727367926,0.100386515573,0.0999994832239,0.0996718251555,0.0994475223168,0.0992276175729,0.0990780823471,0.0987878080852,0.0979565681534,0.0978246253071,0.0974419910527,0.097468379622,0.0974375929579,0.0972506739256,0.0967932720583,0.0962479082936,0.095693748339,0.0951813702858,0.0951879674281,0.0948801007867,0.0946535989006,0.0943413341643,0.0938223589688,0.0931406542628,0.0930350999857,0.0928987590445,0.0931054695038,0.092991119037,0.0928371857163,0.0925645038339,0.0927338304866,0.0924633476517,0.0922698314771,0.0924479543196,0.0921444857731,0.0916606953366,0.0911988953745,0.0911285258565,0.0911351229988,0.0907217020803,0.0902752954503,0.0901081678449,0.0899168507178,0.0895584059853,0.0893736860004,0.0895430126532,0.0892131555374,0.0888832984216,0.0887183698637,0.0884478870288,0.0883907117954,0.0877969689869,0.0875638699585,0.087491301393,0.0872911880761,0.0871570461823,0.0871042690438,0.08715044904,0.0867326300267,0.0864577490968,0.0860531243681,0.0862466405427,0.086253237685,0.0861015034118,0.0858684043833,0.0854593815597,0.0853582253775,0.0848326530397,0.0844302273584,0.0842411092787,0.0840585883413,0.0836979445614,0.0832713293583,0.0830052446182,0.082743557973,0.0824532837111,0.0819694932746,0.0819453037528,0.0817913704321,0.0817319961512,0.0816022523523,0.08132957047,0.0813163761853,0.0809601305003,0.0807776095629,0.0807072400448,0.0804477524471,0.0799177820144,0.0793086458739,0.078873234481,0.0780925726403,0.07738887746,0.0764125003972,0.0756208433193,0.074466343414,0.0732370758958,0.0722914854972,0.0714514493757,0.0708137256185,0.0701034332958,0.0695492733413,0.0689467343431,0.068374982009,0.0679351725213,0.0677614477737,0.0677020734928,0.0675723296939,0.0674205954207,0.0673656192347,0.066925809747,0.0667916678532,0.0667916678532,0.0667674783314,0.0666267392953,0.0667015069083,0.0664574126426,0.0664002374092,0.0661693374281,0.06583288317,0.0658702669765,0.065582191762,0.0653029127373,0.0652281451244,0.0649774537164,0.0647113689763,0.0646212080313,0.0644782699478,0.0644958623273,0.0643045452002,0.0640208680806,0.0637811719098,0.0635458738338,0.0636580252532,0.0636602243006,0.0632490024296,0.0630576853025,0.0627366243764,0.0625958853403,0.0625321129646,0.0624771367787,0.0625057243954,0.0624705396363,0.0619031853972,0.0619383701562,0.061982351105,0.0617492520765,0.0618416120689,0.0617536501714,0.0616129111353,0.0615249492377,0.0613226368734,0.0613776130594,0.0617162663649,0.0614589778146,0.0613930063914,0.0614655749569,0.0613094425888,0.0613512244901,0.0614347882928,0.0615139540005,0.0615073568582,0.0614303901979,0.0610433578487,0.0610631492756,0.0610411588012,0.0608960216703,0.0610521540384,0.0609707892832,0.0609444007139,0.0608498416741,0.0610191683269,0.0608806283382,0.0609927797576,0.0608256521523,0.0606871121636,0.0607926664407,0.0606101455033,0.0604276245659,0.0604056340915,0.060528780748,0.0601483455412,0.06027808934,0.0601901274425,0.0603968379017,0.0603814445697,0.0601879283951,0.0602055207746,0.0601857293476,0.0600889712603,0.0599372369871,0.0600537865013,0.0600669807859,0.0601109617347,0.059796497951,0.0598492750895,0.0598910569908,0.0598096922356,0.0596073798713,0.0595084227365,0.0592335418067,0.0592929160875,0.0590268313475,0.0590532199167,0.0594028684595,0.0595084227365,0.0595326122583,0.0595919865392,0.0598976541332,0.0599372369871,0.0599724217461,0.0598074931882,0.0599724217461,0.0600142036474,0.0599394360345,0.05983168271,0.0599196446075,0.0598558722318,0.0596909436739,0.0597019389111,0.0596997398637,0.0599504312717,0.0599856160307,0.0596447636777,0.0595590008276,0.0594820341673,0.059526015116,0.0592797218029,0.0591763665733,0.0591785656207,0.0592379399016,0.0590202342051,0.058899286596,0.0592511341862,0.0590466227744,0.0590774094386,0.05875854756,0.0588816942165,0.0590950018181,0.0588926894537,0.0589036846909,0.0591477789566,0.0589256751653,0.0587651447023,0.0589938456359,0.0589982437308,0.059259930376,0.0593522903684,0.0592995132299,0.0592291437118,0.0593324989414,0.0590356275372,0.0591983570477,0.0589850494461,0.0588794951691,0.0588025285087,0.0586969742317,0.0585936190021,0.058507856152,0.0585936190021,0.0586024151918,0.0587189647061,0.0587167656586,0.0586375999508,0.0585650313854,0.0585936190021,0.058507856152,0.0584220933018,0.0583891075903,0.0584264913967,0.0582329752221,0.0580614495219,0.0581406152297,0.0582307761747,0.0580724447591,0.0580460561898,0.0579141133435,0.0578987200115,0.0579097152486,0.0577140000266,0.0578811276319,0.0578811276319,0.057841544778,0.05777117526,0.0579075162012,0.0576480286034,0.0578459428729,0.057931705723,0.0578195543037,0.0579844828616,0.0575644648008,0.0575930524175,0.0577777724023,0.0576722181253,0.0574457162391,0.0578767295371,0.0577183981215,0.0573995362429,0.0571950248311,0.0572258114952,0.057304977203,0.0572939819658,0.0568013953396,0.0570059067514,0.0569729210398,0.0566386658291,0.0566540591612,0.0568805610474,0.0569751200872,0.0570125038937,0.0570938686489,0.0570278972258,0.0570696791271,0.0569509305654,0.0570608829373,0.0570322953206,0.0570916696015,0.057199422926,0.0572675933966,0.0572368067324,0.0573071762505,0.0574787019507,0.057665620983,0.0578239523985,0.0578657342999,0.05777117526,0.0577249952638,0.05777117526,0.0576986066945,0.057485299093,0.057395138148,0.057289583871,0.0572412048273,0.0572829867286,0.0573863419583,0.0575446733738,0.0576128438444,0.0573379629146,0.0573313657723,0.0574237257647,0.0573863419583,0.0572587972068,0.0572653943491,0.057054285795,0.0570169019886,0.0569091486641,0.0568717648576,0.0570916696015,0.056948731518,0.0570982667438,0.0571752334041,0.0572719914914,0.057304977203,0.0575842562277,0.0574567114763,0.0571664372144,0.0571928257837,0.057199422926,0.0573885410057,0.0572741905389,0.0573467591044,0.0573577543416,0.0574413181442,0.0572434038747,0.0573643514839,0.0576260381291,0.057575460038,0.0574347210019,0.0574325219545,0.0574831000456,0.0573819438634,0.0572873848235,0.0572390057799,0.0573467591044,0.0571972238785,0.0573511571992,0.0571290534079,0.0569421343757,0.0569905134193,0.0569025515218,0.057054285795,0.0570696791271,0.0569047505692,0.0567200305844,0.0569685229449,0.0569201439013,0.0571554419772,0.0574874981404,0.057520483852,0.0573753467211,0.0572522000645,0.0571774324516,0.0571884276888,0.0572478019696,0.0570586838899,0.0569729210398,0.0511872272288,0.04532236771,0.0395542662785,0.0339994724485,0.0)
ycorr <- c(2.79141923735e-05,2.77680017542e-05,2.73296025756e-05,2.6598844469e-05,2.55751983709e-05,2.42596724378e-05,2.26513581344e-05,2.10206203762e-05,1.93673833129e-05,1.76921821747e-05,1.59960594483e-05,1.42809356442e-05,1.25482712353e-05,1.07994588021e-05,9.03623328958e-06,7.25968208873e-06,5.47023595419e-06,3.6659176449e-06,1.8471307251e-06,1.41571178143e-08,-1.83359988094e-06,-3.69755958337e-06,-5.57910115497e-06,-7.4806549784e-06,-9.40562185548e-06,-1.13558895248e-05,-1.33334768236e-05,-1.53383489851e-05,-1.73702412431e-05,-1.94319784918e-05,-2.15251388444e-05,-2.36500935107e-05,-2.58087280982e-05,-2.80015975935e-05,-3.02274876949e-05,-3.24854692426e-05,-3.47761110416e-05,-3.70991324052e-05,-3.94569369405e-05,-4.18486547772e-05,-4.42753254185e-05,-4.67382280892e-05,-4.92390504709e-05,-5.17753393793e-05,-5.43479381626e-05,-5.69594075183e-05,-5.9609768488e-05,-6.23000497281e-05,-6.50314421077e-05,-6.7805959941e-05,-7.06219107346e-05,-7.3478794932e-05,-7.63778179138e-05,-7.93191980215e-05,-8.23041907851e-05,-8.53335501194e-05,-8.84056832274e-05,-9.15202107593e-05,-9.46766608167e-05,-9.78732466892e-05,-0.000101108896199,-0.000104381367106,-0.000107685210895,-0.000111017529101,-0.000114375346428,-0.00011775446512,-0.000121150457301,-0.000124559499029,-0.000127976586525,-0.000131394162536,-0.000134804525573,-0.000138204355255,-0.000141591920373,-0.000144962922838,-0.000148313243483,-0.000151639022602,-0.000154936452821,-0.000158201584287,-0.000161432772989,-0.000164626740898,-0.000167784661025,-0.000170906087143,-0.000173985969063,-0.000177025405037,-0.000180024253564,-0.000182978006839,-0.000185887855795,-0.000188753543318,-0.000191573423597,-0.000194348768249,-0.000197080233078,-0.000199764935368,-0.000202404374922,-0.000204998693913,-0.000207544826847,-0.000210046084585,-0.00021250304874,-0.000214914340921,-0.000217280761722,-0.000219604928336,-0.000221886371267,-0.000224126901235,-0.000226329571256,-0.000228496102339,-0.000230627844666,-0.000232725892755,-0.000234789662903,-0.000236822991036,-0.000238826627,-0.000240801687335,-0.000242749237159,-0.0002446691458,-0.000246560842492,-0.000248423700742,-0.000250258609522,-0.00025206771653,-0.000253851931347,-0.00025561138717,-0.000257346249765,-0.000259055637686,-0.000260739756802,-0.000262399556087,-0.000264035353888,-0.000265648105672,-0.000267237606752,-0.000268801098295,-0.000270338873443,-0.000271851786177,-0.00027333936159,-0.000274802749713,-0.000276243033055,-0.000277660296297,-0.000279054885462,-0.000280427261435,-0.000281778213025,-0.000283110544466,-0.000284425065257,-0.000285721017246,-0.000286999033412,-0.00028825844918,-0.000289499139939,-0.00029072190491,-0.00029192672666,-0.000293112152257,-0.000294278540993,-0.000295425611969,-0.000296552766555,-0.000297661284753,-0.000298752194434,-0.000299827333184,-0.000300886385082,-0.000301928992806,-0.000302955439526,-0.000303966313171,-0.000304962458036,-0.000305942779141,-0.000306907869599,-0.000307857021549,-0.000308789061994,-0.00030970189189,-0.000310596217444,-0.000311472901215,-0.00031233183112,-0.000313173491535,-0.000313997561375,-0.00031480460904,-0.000315595623946,-0.000316370556849,-0.000317130783738,-0.000317878607622,-0.000318613875831,-0.000319336122093,-0.000320045537823,-0.000320743018335,-0.000321428559817,-0.000322103847587,-0.000322768820205,-0.000323424592183,-0.000324071769113,-0.00032470870301,-0.000325335950896,-0.000325954598283,-0.000326563173497,-0.000327162735519,-0.000327752735804,-0.000328331413985,-0.000328898135549,-0.000329452330185,-0.000329993589557,-0.000330523267971,-0.000331042701748,-0.000331550556651,-0.000332048574914,-0.000332537339987,-0.000333018059693,-0.000333491933488,-0.000333960549257,-0.000334424283771,-0.000334883602343,-0.000335338304462,-0.000335788098,-0.000336233262488,-0.000336674339157,-0.000337109079556,-0.000337537721948,-0.000337959386322,-0.000338374945848,-0.000338784713324,-0.000339189183727,-0.000339587408753,-0.000339977521148,-0.000340358628249,-0.000340730601466,-0.000341094789513,-0.000341453447181,-0.00034180636896,-0.000342153591852,-0.000342493924766,-0.00034282586028,-0.000343151175201,-0.000343471901849,-0.000343791051371,-0.000344109106637,-0.000344426195822,-0.000344739900887,-0.000345050965546,-0.000345358833332,-0.000345663499923,-0.000345965925501,-0.000346266442045,-0.000346562441977,-0.000346852789614,-0.000347136913873,-0.000347415221194,-0.000347687504185,-0.000347954933212,-0.000348216510102,-0.000348472666216,-0.000348723099782,-0.000348967145154,-0.000349207461244,-0.000349444166445,-0.000349677850709,-0.000349908960071,-0.000350136116256,-0.000350359737901,-0.000350578759229,-0.000350793041137,-0.000351003439028,-0.000351210570401,-0.000351414162435,-0.000351613147668,-0.000351808827663,-0.000352000100793,-0.000352185863689,-0.000352366403839,-0.000352542385782,-0.000352715563016,-0.000352885821285,-0.000353051165595,-0.000353210845803,-0.00035336526572,-0.000353512306776,-0.000353650670745,-0.000353782095378,-0.000353906327897,-0.000354023007022,-0.000354130584109,-0.000354228142989,-0.000354315839999,-0.000354394454558,-0.000354463778134,-0.000354524293833,-0.000354577290528,-0.000354623187513,-0.00035466126015,-0.000354691803609,-0.000354716249772,-0.000354734600055,-0.000354748066596,-0.000354756289678,-0.000354758242047,-0.000354752988026,-0.000354738085783,-0.000354713091208,-0.000354676333204,-0.000354626606997,-0.000354561350602,-0.0003544782135,-0.000354374328171,-0.000354246678733,-0.000354094603642,-0.000353918149445,-0.000353718877567,-0.000353497443703,-0.000353253896574,-0.000352989210342,-0.000352704338969,-0.000352401499659,-0.000352083289275,-0.000351753485956,-0.000351414623393,-0.000351068085682,-0.000350714743138,-0.000350353687272,-0.00034998623511,-0.00034961304901,-0.000349234594375,-0.000348851119759,-0.000348463251853,-0.000348068873345,-0.000347667042504,-0.000347256417501,-0.000346836139789,-0.000346407649315,-0.000345970820469,-0.000345524750485,-0.000345070004059,-0.000344605978883,-0.000344132388762,-0.000343649319701,-0.000343157977976,-0.000342659202895,-0.000342152773962,-0.000341637945899,-0.000341113465417,-0.000340580642313,-0.000340040161741,-0.00033949153359,-0.000338933860059,-0.000338367765582,-0.000337792134587,-0.000337206962597,-0.000336612740193,-0.000336010174476,-0.000335400945761,-0.000334784506373,-0.000334158859977,-0.000333524505613,-0.000332881627588,-0.000332231484177,-0.000331574656447,-0.000330911664166,-0.000330241850122,-0.000329564390517,-0.000328879017742,-0.000328186051209,-0.000327487220607,-0.000326783585068,-0.000326074803532,-0.000325360562872,-0.00032464102345,-0.000323915326376,-0.000323184159914,-0.000322449032716,-0.000321709818688,-0.000320967149482,-0.000320219305743,-0.000319465338427,-0.000318706457542,-0.000317941822031,-0.000317172334838,-0.000316397984913,-0.000315618887884,-0.000314833922221,-0.000314043043691,-0.000313245252944,-0.000312441781293,-0.000311633160993,-0.000310818863308,-0.000309999469659,-0.000309174395168,-0.00030834300252,-0.000307506093134,-0.000306664672404,-0.00030581759056,-0.000304965763034,-0.0003041091174,-0.000303247638194,-0.000302381331411,-0.000301509904445,-0.000300633367993,-0.00029975282744,-0.000298867434154,-0.000297976199896,-0.000297079332754,-0.000296178433804,-0.000295272599185,-0.000294362077269,-0.000293446268647,-0.00029252566519,-0.000291600537257,-0.000290669399882,-0.000289732518757,-0.000288790071385,-0.000287843521939,-0.000286890748215,-0.000285932180837,-0.000284968029338,-0.000283999298255,-0.000283025223693,-0.000282045732985,-0.000281062223761,-0.000280075235135,-0.000279084421487,-0.000278089348505,-0.000277089658108,-0.000276085984193,-0.00027507784743,-0.000274063982984,-0.000273045062096,-0.000272020924941,-0.000270990445881,-0.000269953169415,-0.000268908806613,-0.000267858110879,-0.000266802007689,-0.000265739217032,-0.000264670105903,-0.000263594624329,-0.000262513258521,-0.000261424712484,-0.00026032979073,-0.000259229226462,-0.000258122706243,-0.000257009618426,-0.000255888612859,-0.000254760909621,-0.000253626247692,-0.00025248490861,-0.000251335549423,-0.000250178062389,-0.00024901295249,-0.000247838566418,-0.000246655077954,-0.000245462599895,-0.000244260545742,-0.000243048652796,-0.000241826086167,-0.000240592928872,-0.000239349523194,-0.000238097105227,-0.000236835061455,-0.000235562412817,-0.00023428020462,-0.000232986985238,-0.000231683079802,-0.00023036842346,-0.000229042737204,-0.00022770504223,-0.000226355401092,-0.000224992014388,-0.000223614829343,-0.00022222430971,-0.000220820973734,-0.000219404803369,-0.000217976267532,-0.000216533600033,-0.000215077684027,-0.000213608631686,-0.000212126034039,-0.0002106299388,-0.000209120363708,-0.000207596776018,-0.000206057267327,-0.000204501099097,-0.000202928032202,-0.000201338552285,-0.000199732341553,-0.000198109050389,-0.00019646772327,-0.000194808066085,-0.000193129654946,-0.000191432103399,-0.000189716182896,-0.00018798222317,-0.000186230568031,-0.000184460406443,-0.000182671427924,-0.000180863203388,-0.000179036495971,-0.000177191759276,-0.000175329122167,-0.000173449230659,-0.000171550762368,-0.000169633552307,-0.000167698096993,-0.00016574326649,-0.000163768551765,-0.000161775414278,-0.000159763752091,-0.000157732124737,-0.000155679549643,-0.000153606281405,-0.000151511899182,-0.000149397674407,-0.000147261400196,-0.000145104649354,-0.000142928180308,-0.000140731324842,-0.00013851288742,-0.000136274593676,-0.000134017612354,-0.000131742745337,-0.000129449930865,-0.000127139022722,-0.000124810535836,-0.000122465649683,-0.000120103242711,-0.00011772367749,-0.000115328073901,-0.000112916307537,-0.000110487948459,-0.000108042701605,-0.00010558120765,-0.000103103951943,-0.00010061144149,-9.81039027389e-05,-9.55815975607e-05,-9.30437686591e-05,-9.04906672794e-05,-8.79229470211e-05,-8.53398899953e-05,-8.27407109669e-05,-8.01257981966e-05,-7.74948808838e-05,-7.48481377591e-05,-7.21854966299e-05,-6.95072537071e-05,-6.6814060518e-05,-6.41067616749e-05,-6.13844128654e-05,-5.86471489039e-05,-5.58964121509e-05,-5.31324978504e-05,-5.03547769935e-05,-4.75637155603e-05,-4.47581015987e-05,-4.19384942123e-05,-3.91048991586e-05,-3.62575725378e-05,-3.3397201227e-05,-3.05244794712e-05,-2.76398132553e-05,-2.47428191257e-05,-2.18343563914e-05,-1.89150769081e-05,-1.59859604823e-05,-1.30469846704e-05,-1.00963854544e-05,-7.13408810619e-06,-4.15978986291e-06,-1.17340130053e-06,1.82517349949e-06,4.83572440862e-06,7.85819913776e-06,1.08926017614e-05,1.39393891727e-05,1.6998836459e-05,2.00688783277e-05,2.31483257396e-05,2.62376986615e-05,2.93366299571e-05,3.24454402614e-05,3.55641582307e-05,3.8693317671e-05,4.18330705772e-05,4.49833433747e-05,4.8143832198e-05,5.13143666914e-05,5.4497158538e-05,5.76920331334e-05,6.08976011537e-05,6.41138515869e-05,6.73398644664e-05,7.05752735187e-05,7.38205469755e-05,7.70753433234e-05,8.03385799456e-05,8.36102565803e-05,8.68897164598e-05,9.01752561561e-05,9.34680590132e-05,9.67700253518e-05,0.000100082176672,0.000103406242838,0.000106742405759,0.000110090777541,0.000113453019871,0.000116830874946,0.000120243304354,0.000123714766837,0.00012726605227,0.00013091357135,0.000134763501069,0.000138403273797,0.000141936799121,0.000145380799403,0.000148754825851,0.000152080426825,0.000155377124333,0.000158626908518,0.000161808206442,0.00016490180486,0.000167892771837,0.000170675739664,0.000173663784256,0.000176753123678,0.000179927833804,0.000183168644292,0.000186453242538,0.000189763731422,0.000193099418363,0.000196460225791,0.000199845450651,0.000203253386146,0.000206683727087,0.000210136054312,0.000213610461521,0.000217107210682,0.00022062732797,0.000224170166626,0.000227735409205,0.000231323001421,0.000234932634557,0.000238566120417,0.000242223399154,0.000245905334292,0.00024961269796,0.00025334545824,0.000257103736989,0.00026088746814,0.000264698970932,0.00026853839596,0.000272407994321,0.000276307381993,0.000280236544697,0.000284196238009,0.000288185993691,0.00029220630554,0.00029625855459,0.000300344106112,0.000304462927701,0.000308615282158,0.00031280140364,0.000317021827838,0.000321277705513,0.000325569296759,0.000329897545752,0.000334263522849,0.000338667541493,0.000343109648689,0.0003475897616,0.000352108372043,0.000356665387167,0.000361261229775,0.00036589537778,0.000370568175372,0.000375280142493,0.000380030871811,0.000384820309799,0.00038964879873,0.000394517165942,0.000399424373799,0.000404369967481,0.000409353500125,0.000414374642838,0.000419432691882,0.000424526654713,0.000429655254038,0.000434816410027,0.000440008077115,0.000445227456885,0.000450472022897,0.000455740256925,0.000461029811365,0.00046633839336,0.00047166300711,0.00047699991309,0.000482346572655,0.000487699426803,0.000493056043363,0.000498413926545,0.000503770532613,0.000509122542625,0.000514466614985,0.000519799282448,0.000525118236832,0.000530420859325,0.000535705002591,0.000540969083566,0.000546211549228,0.000551429902172,0.000556621834773,0.000561786704874,0.000566922605979,0.000572029487814,0.000577106421164,0.00058215153248,0.000587163248821,0.000592141005829,0.000597082893691,0.000601988126774,0.000606857505269,0.000611689000664,0.000616482022918,0.000621235494442,0.00062594781494,0.000630619881808,0.000635251064863,0.000639840536385,0.000644387822473,0.000648892271729,0.000653352371131,0.000657766983056,0.000662136250505,0.000666458058396,0.000670732038215,0.000674956047007,0.000679127983871,0.000683246480479,0.000687309688457,0.000691314713308,0.000695259253924,0.00069914078108,0.000702955274139,0.00070670167193,0.00071037706358,0.000713979526,0.000717505969932,0.000720953018426,0.00072431700199,0.000727595596039,0.000730786074918,0.000733885503649,0.000736891002803,0.000739799204693,0.000742605188469,0.000745304625986,0.000747893599958,0.000750370165151,0.000752730907345,0.000754972935865,0.00075709316008,0.000759087340961,0.000760952461786,0.000762686270844,0.000764287680742,0.000765754778895,0.000767086604117,0.000768279939953,0.000769332881442,0.000770243691147,0.00077101185694,0.000771637932215,0.000772123572271,0.000772467531285,0.000772668984546,0.000772727036599,0.000772642695374,0.000772417165986,0.00077205307339,0.000771552550238,0.000770916917488,0.00077014773379,0.000769244419851,0.00076820834936,0.000767042675894,0.000765749840579,0.000764333481744,0.000762794891744,0.000761135742135,0.000759358185571,0.000757464573555,0.000755457368846,0.000753340674055,0.000751118846459,0.00074879493425,0.000746372900662,0.000743856074614,0.000741247289439,0.000738550478368,0.000735769226686,0.000732905325866,0.000729962712126,0.000726944283335,0.000723851970959,0.000720687772423,0.0007174548488,0.000714154780014,0.000710790327491,0.000707363995787,0.000703878644807,0.000700337737845,0.000696744137166,0.000693099041189,0.000689405063253,0.000685663981825,0.000681878451678,0.000678049944434,0.000674180733242,0.000670272845251,0.000666327494918,0.000662345188908,0.000658326850819,0.000654274689564,0.000650189791503,0.000646074994906,0.000641930987759,0.000637759136246,0.000633561042252,0.000629337569196,0.000625089999069,0.000620820495594,0.000616530449838,0.000612221015184,0.000607893878013,0.000603549788218,0.000599190535385,0.000594817071336,0.000590430347382,0.000586031388023,0.000581620993177,0.000577200749387,0.000572770706456,0.000568331649013,0.000563883438539,0.000559427550936,0.000554964311972,0.000550493946796,0.000546017937437,0.000541536709272,0.000537050902092,0.000532561287414,0.000528068564994,0.000523574900994,0.000519082020185,0.000514591638934,0.000510103463179,0.000505618644313,0.000501136936193,0.000496659483171,0.000492186476485,0.000487718346528,0.000483256567838,0.000478800137668,0.000474349373537,0.000469903007557,0.000465461614096,0.000461025608181,0.000456596435073,0.000452174560369,0.000447760782092,0.00044335661577,0.000438962326138,0.000434578026734,0.000430204270211,0.000425841256176,0.00042148999957,0.000417151802274,0.000412826656201,0.000408513992629,0.000404214133914,0.000399926036096,0.000395649634422,0.000391385907921,0.000387135211516,0.00038289845686,0.000378674919139,0.000374464998012,0.000370266961405,0.00036608140629,0.00036190894142,0.000357749609333,0.000353604215374,0.000349472748138,0.000345355597341,0.000341252440922,0.000337163740435,0.000333089090828,0.00032903051543,0.000324988316191,0.000320962309395,0.000316952351661,0.00031295764193,0.000308977219851,0.000305010670655,0.000301056525683,0.000297114749313,0.000293184883728,0.000289265446739,0.000285354329659,0.000281451001089,0.00027755509258,0.000273665863289,0.000269783329073,0.000265906869593,0.000262037102739,0.000258174035612,0.00025431628282,0.000250464103836,0.000246619244972,0.000242781443052,0.000238950813471,0.000235126383704,0.000231308006713,0.000227495856047,0.000223690435965,0.000219889637689,0.000216093445011,0.000212302156448,0.000208515182439,0.000204731105209,0.00020094940964,0.0001971708572,0.000193396330024,0.00018962506385,0.000185855711018,0.000182089631821,0.000178327902772,0.000174569842517,0.000170815802687,0.000167066047638,0.000163321337603,0.000159582361622,0.000155847092798,0.000152115860431,0.000148389588989,0.00014466887886,0.000140952140245,0.000137239842829,0.000133531784614,0.000129827291388,0.000126125218774,0.000122425396433,0.000118727838357,0.000115032911405,0.000111338729807,0.000107643986478,0.000103948666518,0.000100252422023,9.65528646876e-05,9.28497844873e-05,8.91439772224e-05,8.54342606602e-05,8.17196629206e-05,7.79992273598e-05,7.42730110994e-05,7.054126542e-05,6.68041934962e-05,6.30607328562e-05,5.93122151189e-05,5.55605811026e-05,5.1805312754e-05,4.80461701724e-05,4.42839687338e-05,4.05195044347e-05,3.67526165939e-05,3.29837805564e-05,2.9212630593e-05,2.5439774226e-05,2.16657422957e-05,1.78891033322e-05,1.41087059212e-05,1.03246048767e-05,6.5383911586e-06,2.75007609809e-06,-1.03940970382e-06,-4.82899355337e-06,-8.61812160162e-06,-1.24048972971e-05,-1.61890287144e-05,-1.99685654369e-05,-2.3741009815e-05,-2.75038318545e-05,-3.1255604944e-05,-3.49967139673e-05,-3.87257619676e-05,-4.2442122806e-05,-4.61438257342e-05,-4.98298196777e-05,-5.34991583533e-05,-5.71509474909e-05,-6.07849050154e-05,-6.44016858784e-05,-6.80014235106e-05,-7.1581286318e-05,-7.51400622858e-05,-7.86762455614e-05,-8.21886553052e-05,-8.5678019306e-05,-8.91428364382e-05,-9.25824889377e-05,-9.59955002843e-05,-9.93799680211e-05,-0.000102735251026,-0.000106060438581,-0.00010935629503,-0.000112623476659,-0.00011586274398,-0.000119073598103,-0.000122255388041,-0.000125408245942,-0.000128532092022,-0.000131627032481,-0.000134692947815,-0.000137730077177,-0.000140736934731,-0.000143713153032,-0.000146658072515,-0.000149571141259,-0.000152452550334,-0.000155302436864,-0.000158121415951,-0.000160909894208,-0.00016366845629,-0.000166398251606,-0.000169099725338,-0.000171774556145,-0.000174422115844,-0.000177042283071,-0.000179634984062,-0.0001822006963,-0.000184739495001,-0.000187251890694,-0.000189736732585,-0.000192194401124,-0.000194624807478,-0.000197027680126,-0.000199402366329,-0.000201750559497,-0.000204071784136,-0.000206366546598,-0.000208634546665,-0.000210874634717,-0.000213087288234,-0.000215274392382,-0.000217435517956,-0.000219569679399,-0.000221677620692,-0.000223759719059,-0.000225817055116,-0.00022784992197,-0.000229857644529,-0.000231841169943,-0.00023380074593,-0.000235734490713,-0.000237642163665,-0.000239524093986,-0.000241381197657,-0.000243212600341,-0.000245018618549,-0.000246798008047,-0.000248553161459,-0.000250285393455,-0.000251994463235,-0.000253681784876,-0.000255347971136,-0.000256992804195,-0.000258616757434,-0.000260219616917,-0.000261801791585,-0.000263364184864,-0.000264905886449,-0.000266424956681,-0.000267921823702,-0.000269395888982,-0.000270847366192,-0.000272277891992,-0.000273687359851,-0.000275076111007,-0.000276444168034,-0.000277792214774,-0.000279119445223,-0.000280427870041,-0.000281717962769,-0.000282989273169,-0.000284242554724,-0.000285477343419,-0.000286692544997,-0.000287888685264,-0.000289066312274,-0.000290225267124,-0.00029136624281,-0.000292489568066,-0.000293594463086,-0.000294681677558,-0.00029575147483,-0.000296804473654,-0.000297842606827,-0.000298866096725,-0.000299874460325,-0.000300866236789,-0.000301843260753,-0.000302804299312,-0.000303751080564,-0.000304683251603,-0.000305601186011,-0.000306504020198,-0.00030739061517,-0.000308261953346,-0.000309118535395,-0.000309962735598,-0.000310794363027,-0.000311613784904,-0.000312420906542,-0.000313215442681,-0.000313997426707,-0.000314767863202,-0.000315528622693,-0.000316278674995,-0.000317016957969,-0.000317743107304,-0.000318455726757,-0.000319155989057,-0.000319843601806,-0.000320518759362,-0.000321182210384,-0.000321834655204,-0.000322475569144,-0.000323104936014,-0.00032372474461,-0.000324334754254,-0.000324935855081,-0.000325527338694,-0.000326109111621,-0.000326681369354,-0.000327244234608,-0.000327796425564,-0.000328336654302,-0.000328864622731,-0.000329379141136,-0.000329880586088,-0.000330369080932,-0.000330843985242,-0.000331306577366,-0.000331757563569,-0.000332196865031,-0.000332625428014,-0.000333045293913,-0.000333456696681,-0.000333860460899,-0.000334256514501,-0.000334644713821,-0.000335025786378,-0.000335399180401,-0.00033576472888,-0.000336121675277,-0.000336468774881,-0.000336803434844,-0.000337124694654,-0.000337433755858,-0.000337729986924,-0.000338013039706,-0.000338283569087,-0.000338541129409,-0.000338785965994,-0.000339017111121,-0.000339234498819,-0.000339439762207,-0.000339635026607,-0.000339820122446,-0.00033999511439,-0.000340158750409,-0.000340310893675,-0.000340450682946,-0.000340576601249,-0.000340689518979,-0.000340790230693,-0.000340879174508,-0.000340955352224,-0.000341017459852,-0.000341065191324,-0.000341097565153,-0.000341115157557,-0.000341117633546,-0.000341105238418,-0.000341078069438,-0.000341035843491,-0.000340977961216,-0.000340902971789,-0.000340811011277,-0.000340700520804,-0.000340572964948,-0.000340428616237,-0.000340269322794,-0.000340096085886,-0.000339907885214,-0.0003397049697,-0.000339487273153,-0.000339255626601,-0.000339011259959,-0.000338755041778,-0.000338488365859,-0.000338208487972,-0.000337949212498,-0.000337741857717,-0.000337585921885,-0.000337481233305,-0.000337428764942)
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(158)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('GSE29282-OCI-LY1_BCL6_D-8_CHIP-GSM763404.36mers.unique.dedup.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) : 158',bty='n')
dev.off()
