# R script for Peak Model
#  -- generated by MACS
p <- c(0.0282265535307,0.0327740662455,0.0368064310356,0.040945378155,0.0452086713251,0.0444981224635,0.0450310341097,0.0452441987682,0.0452619624898,0.045794874136,0.0457771104145,0.0458659290222,0.0461146211238,0.0464698955546,0.0468606974286,0.0468962248717,0.0464698955546,0.0465764778839,0.0465587141624,0.0459547476299,0.0448533968943,0.0448001057297,0.0454751271483,0.0454573634267,0.0462567308961,0.0463633132254,0.0467718788209,0.0466475327701,0.0467718788209,0.047038334644,0.0483706137597,0.048512723532,0.0484061412028,0.0484949598105,0.047464663961,0.0474113727964,0.047233735581,0.047464663961,0.0478554658349,0.0480331030504,0.0473580816318,0.0472870267456,0.047464663961,0.0478732295565,0.0483883774812,0.0485660146966,0.0485482509751,0.0485837784182,0.0482285039873,0.0481929765442,0.0482640314304,0.0482640314304,0.0479798118857,0.0484594323674,0.0486548333043,0.0482640314304,0.0480508667719,0.0475001914041,0.0473047904671,0.0475179551256,0.0475001914041,0.0476955923411,0.0479975756073,0.0471271532517,0.0470916258086,0.0478199383919,0.0478554658349,0.0473225541887,0.0473580816318,0.0469495160363,0.0470205709225,0.0468606974286,0.0466297690485,0.0467008239347,0.0459725113515,0.0456172369206,0.0461501485669,0.0473047904671,0.0475357188472,0.0476955923411,0.0476778286195,0.0485837784182,0.0487436519121,0.0486725970259,0.0494186733307,0.0499338212554,0.0495074919384,0.0495963105461,0.0490633988998,0.0491522175075,0.0496673654323,0.0490278714567,0.0491522175075,0.0502713319647,0.0501292221924,0.0498627663692,0.0505910789525,0.0503068594078,0.0510174082695,0.0509463533833,0.0507509524463,0.0509996445479,0.0510706994341,0.0505377877878,0.0509285896618,0.0510174082695,0.0506443701171,0.051035171991,0.0511417543203,0.051461501308,0.0515325561942,0.0513371552572,0.050804243611,0.0508397710541,0.050608842674,0.0512128092064,0.052083231562,0.052083231562,0.0519588855112,0.0517812482958,0.0519766492328,0.0521720501697,0.0525983794867,0.0521187590051,0.0519055943466,0.0517990120173,0.0508220073325,0.0505733152309,0.0507154250033,0.0508930622187,0.0508930622187,0.0507687161679,0.0511062268772,0.0519055943466,0.0517101934096,0.0514792650296,0.0520121766758,0.0525983794867,0.0529181264745,0.0529536539176,0.0528115441452,0.0536642027793,0.0536819665008,0.0531135274115,0.0536109116146,0.0537707851085,0.0538240762732,0.053948422324,0.0537174939439,0.0532378734623,0.0538240762732,0.0529891813607,0.05355762045,0.0539661860455,0.0542504055902,0.0542859330333,0.0544458065271,0.0545879162995,0.0548366084011,0.0552451739965,0.0551208279457,0.0555649209843,0.0553695200473,0.0560445414659,0.0555826847058,0.0557070307566,0.0559379591367,0.0561866512383,0.0564531070614,0.0564175796183,0.0562932335675,0.0561688875167,0.0564531070614,0.0562221786814,0.0568083814923,0.0565241619476,0.0561155963521,0.0552984651612,0.0555471572628,0.0561866512383,0.0563287610106,0.0559379591367,0.0557603219213,0.0559557228582,0.0563642884537,0.0570748373154,0.0571991833662,0.0570215461508,0.0564175796183,0.0566485079984,0.0571103647585,0.0578386773417,0.0574478754678,0.0570037824292,0.0567373266061,0.0560445414659,0.0566840354415,0.0572524745308,0.0577320950125,0.0575899852401,0.0575366940755,0.0582117154941,0.058602517368,0.0591531927358,0.0590643741281,0.0595084671667,0.0591887201789,0.0590821378497,0.0594729397236,0.0591176652928,0.0599347964837,0.0595262308882,0.0595795220529,0.0591354290143,0.0594551760021,0.059419648559,0.0597216318252,0.0602545434715,0.0603611258007,0.0611427295486,0.0605742904592,0.0615868225871,0.0621019705119,0.0622796077273,0.0626171184366,0.0623328988919,0.0627769919305,0.0626704096012,0.0626704096012,0.0631677938044,0.0632921398552,0.0627414644874,0.0630967389182,0.063647414286,0.063611886843,0.0636829417291,0.0632743761337,0.0634697770706,0.0635763593999,0.0631322663613,0.0630967389182,0.0628658105382,0.0628658105382,0.0630612114752,0.0638072877799,0.0650507482879,0.0654770776049,0.0659744618081,0.0660632804158,0.0660810441373,0.0660632804158,0.0665429008974,0.0666139557836,0.0665251371759,0.0662409176312,0.0656902422634,0.0657257697065,0.0659922255296,0.0663297362389,0.0669337027714,0.06760872419,0.0676620153546,0.0673067409238,0.0673422683668,0.0681771632793,0.0687456023687,0.0686212563179,0.0690298219134,0.0692252228503,0.0688166572549,0.0689410033057,0.0687811298118,0.0697403707751,0.070362101029,0.0706463205737,0.0712502871061,0.0717654350309,0.0720141271325,0.0719253085248,0.0726180936649,0.0730977141465,0.0740391913883,0.0746609216423,0.0752648881747,0.0752826518963,0.0761886016949,0.0765083486827,0.0767392770627,0.077698518026,0.0778583915199,0.0785334129385,0.0793505441294,0.0791373794709,0.0793327804079,0.0789597422555,0.0779116826845,0.0790130334201,0.0788709236478,0.0789952696986,0.0792084343571,0.0790663245848,0.0789952696986,0.0794748901802,0.0796880548387,0.0805584771943,0.0819262837531,0.0822105032977,0.0833118540334,0.0841112215028,0.085034935023,0.0861007583155,0.0868468346203,0.0875040923174,0.088836371433,0.0900087770548,0.0909147268535,0.0911634189551,0.0919094952598,0.0923891157415,0.0936325762494,0.0941121967311,0.094502998605,0.0947516907066,0.0951602563021,0.0950181465297,0.0946806358204,0.0951780200236,0.095355657239,0.0957819865561,0.0957286953914,0.0954800032898,0.095977387493,0.0970965019502,0.096794518684,0.0973629577733,0.098268907572,0.0985353633951,0.0987485280536,0.0986774731675,0.0993347308645,0.0999209336754,0.0999209336754,0.100045279726,0.100613718816,0.101040048133,0.101413086285,0.10239009097,0.104148699402,0.106102708772,0.106440219481,0.107417224166,0.108127773028,0.108891613054,0.109460052144,0.109229123764,0.110330474499,0.110561402879,0.110721276373,0.111627226172,0.112906214123,0.114114147188,0.114043092302,0.114558240226,0.115553008633,0.117205034736,0.116796469141,0.117684655218,0.116583304482,0.115926046785,0.115304316531,0.115926046785,0.117347144508,0.117258325901,0.116956342634,0.117276089622,0.117666891496,0.117045161242,0.118786005953,0.119176807827,0.12001170274,0.119230098992,0.119496554815,0.120153812512,0.121059762311,0.121024234868,0.121841366059,0.123528919605,0.123884194036,0.124434869404,0.126069131786,0.127046136471,0.127099427635,0.127667866724,0.127792212775,0.12807643232,0.128715926295,0.129408711436,0.129835040753,0.131078501261,0.131256138476,0.132002214781,0.133583185998,0.133973987872,0.136070107014,0.138397154536,0.139569560158,0.14040445507,0.140813020666,0.141292641147,0.142376228162,0.142624920263,0.143726270999,0.145076313836,0.144792094291,0.144951967785,0.146000027356,0.146515175281,0.147385597636,0.14800732789,0.147811926953,0.150174501919,0.151364671262,0.151791000579,0.153105515973,0.154313449038,0.155468090938,0.156658260282,0.15894978036,0.159180708741,0.160495224135,0.159678092944,0.159411637121,0.160797207401,0.162076195352,0.162040667909,0.16262687072,0.162609106998,0.162502524669,0.163941386114,0.165326956394,0.167085564827,0.168080333233,0.168808645816,0.169483667235,0.17161531382,0.171775187314,0.173142993873,0.173391685974,0.174564091596,0.174119998558,0.17403117995,0.176056244206,0.177193122384,0.176979957726,0.178045781018,0.179129368033,0.179040549425,0.180408355984,0.181083377402,0.181367596947,0.18312620538,0.182859749556,0.183428188646,0.184955868698,0.18428084728,0.183854517963,0.185399961737,0.185915109662,0.186323675257,0.187975701361,0.188632959058,0.189148106982,0.189343507919,0.189965238173,0.19096000658,0.192540977797,0.192469922911,0.192931779671,0.194637096939,0.196679924916,0.196910853296,0.197781275652,0.19822536869,0.199202373375,0.199042499881,0.199273428261,0.200925454365,0.201920222771,0.201547184619,0.200765580871,0.202115623708,0.203803177255,0.20513545637,0.206734191309,0.208741491844,0.210162589567,0.210411281668,0.210695501213,0.212063307772,0.213253477115,0.213164658508,0.212773856634,0.213733097597,0.212933730128,0.212347527317,0.212951493849,0.213910734812,0.213715333875,0.213253477115,0.213573224103,0.213892971091,0.214052844585,0.213786388762,0.213715333875,0.214266009243,0.214372591572,0.214194954357,0.215562760916,0.216450946993,0.21664634793,0.216735166538,0.216308837221,0.216006853954,0.216326600942,0.214834448333,0.215083140434,0.214887739497,0.214266009243,0.213502169217,0.212098835215,0.210979720758,0.211263940303,0.210393517947,0.209345458376,0.210411281668,0.208030942982,0.207515795057,0.206592081537,0.205668368017,0.205295329864,0.204709127053,0.20398081447,0.202968282342,0.202275497202,0.200321487832,0.197941149146,0.196395705372,0.19522329975,0.193464691317,0.192452159189,0.191919247543,0.189503381413,0.188455321842,0.187229625056,0.1863592027,0.186199329206,0.185648653839,0.183961100292,0.182362365353,0.18001755411,0.177637215423,0.177335232157,0.176695738181,0.174617382761,0.17356932319,0.173818015291,0.17264560967,0.17230809896,0.171597550099,0.171562022655,0.171917297086,0.1706916003,0.170709364021,0.171029111009,0.171792951036,0.171135693338,0.170815946351,0.171419912883,0.173764724127,0.176535864687,0.179520169906,0.183445952367,0.186554603637,0.189414562806,0.1918837201,0.195347645801,0.197266127727,0.196893089575,0.195045662534,0.191244226124,0.187531608322,0.182042618365,0.176500337244,0.172237044074,0.166019741534,0.159074126411,0.154739778355,0.151631127085,0.147332306472,0.14431247381,0.140439982513,0.139232049449,0.136212216786,0.133174620403,0.132002214781,0.132037742224,0.12923107422,0.126850735534,0.126513224824,0.125269764316,0.123973012644,0.121805838616,0.120988707425,0.119816301803,0.118501786409,0.116920815191,0.116245793773,0.115606299797,0.114611531391,0.113510180655,0.113243724832,0.111751572223,0.111396297792,0.110490347993,0.10976203541,0.109015959105,0.108678448396,0.109122541434,0.108340937686,0.108802794447,0.107648152546,0.107790262319,0.107204059508,0.107452751609,0.105534269683,0.104184226846,0.103455914262,0.102088107704,0.101377558842,0.100293971828,0.100276208106,0.0988551103829,0.0981445615212,0.0977359959257,0.0977715233688,0.0976294135965,0.0962793707592,0.0954800032898,0.094272070225,0.0938279771864,0.0936681036925,0.0939523232372,0.0931884832109,0.0920338413106,0.0914476384997,0.0907548533596,0.0901508868272,0.0891738821423,0.0893692830793,0.0885166244453,0.0872554002158,0.0867224885695,0.0863849778602,0.0856389015554,0.08546126434,0.0855856103908,0.0861540494801,0.0860119397078,0.0853191545676,0.084839534086,0.0844309684905,0.0839335842873,0.0828322335517,0.0826901237794,0.0816420642084,0.081038097676,0.0799545106619,0.0800433292696,0.0796525273957,0.0791196157494,0.0787110501539,0.0784090668877,0.078941978534,0.0791373794709,0.0798656920542,0.0786222315462,0.0785867041031,0.0780005012922,0.0775919356967,0.0779472101276,0.0782847208369,0.0781959022292,0.0779827375707,0.076845859392,0.076455057518,0.0770412603289,0.0769879691643,0.076650458455,0.0766326947335,0.0763840026319,0.0752471244532,0.0746609216423,0.0744832844268,0.0747852676931,0.0748385588577,0.0752648881747,0.0749273774654,0.0748385588577,0.0745365755915,0.0739681365021,0.0742168286037,0.0742878834899,0.0739681365021,0.0735418071851,0.0731865327543,0.0725470387787,0.0727424397157,0.0724404564495,0.0725825662218,0.0728134946019,0.0729911318173,0.0729556043742,0.072227291791,0.0723516378418,0.0722628192341,0.0719608359678,0.0717831987524,0.0717299075878,0.0716588527016,0.0711969959415,0.0705219745229,0.0697758982181,0.0700245903197,0.0696515521673,0.0695272061165,0.0694028600658,0.0683548004948,0.0683015093301,0.068230454444,0.0677330702408,0.0675554330254,0.067182394873,0.0667027743913,0.0668804116067,0.066134335302,0.0660455166943,0.0660810441373,0.0656191873772,0.0652461492249,0.0652283855033,0.0649441659586,0.0654237864403,0.0660455166943,0.0658856432004,0.065708005985,0.0651750943387,0.065317204111,0.0645533640847,0.0643401994262,0.0643757268693,0.0648020561863,0.063611886843,0.0630079203105,0.0619598607395,0.0622618440057,0.0622263165627,0.0618888058534,0.0615868225871,0.0619953881826,0.0616756411949,0.0609650923332,0.0617111686379,0.061320366764,0.0617111686379,0.0614091853717,0.0616756411949,0.0608229825608,0.061320366764,0.0605387630161,0.0603078346361,0.0607519276747,0.0606808727885,0.06069863651,0.0607519276747,0.0607341639531,0.0596150494959,0.0603433620792,0.0599170327622,0.0596150494959,0.0603078346361,0.0599703239268,0.0598637415975,0.0596328132175,0.0589400280773,0.0584604075957,0.058797918305,0.0585314624819,0.0586380448111,0.0587268634188,0.0576610401263,0.0568972001,0.0565596893907,0.0560445414659,0.0561155963521,0.0568794363784,0.0571458922016,0.0572524745308,0.0572524745308,0.0571991833662,0.0576077489617,0.058566989925,0.0586558085327,0.0595084671667,0.0594551760021,0.058797918305,0.0576965675694,0.057518930354,0.0572347108093,0.0571458922016,0.0561333600737,0.0552984651612,0.0546767349072,0.0537885488301,0.0542326418686,0.0540727683747,0.0548543721226,0.0551385916673,0.0553162288827,0.0551385916673,0.055458338655,0.0554761023766,0.0555293935412,0.0560623051875,0.0558846679721,0.0551030642242,0.0544102790841,0.054179350704,0.0541082958178,0.0541615869825,0.0541082958178,0.0536997302224,0.0542681693117,0.0539661860455,0.0536464390577,0.0543036967548,0.0545879162995,0.0542504055902,0.0540550046532,0.0532734009053,0.0532023460192,0.0534332743992,0.0530602362468,0.0532734009053,0.0525273246006,0.0527582529806,0.0525273246006,0.0522075776128,0.0527582529806,0.0533089283484,0.0538596037162,0.053983949767,0.0541971144255,0.0538063125516,0.0546412074641,0.0543925153625,0.0545879162995,0.0547122623503,0.0546589711856,0.0542148781471,0.0537885488301,0.0538418399947,0.0532201097407,0.0527937804237,0.0524562697144,0.0522608687774,0.0521365227266,0.052278632499,0.0515325561942,0.051887830625,0.0521009952836,0.0515680836373,0.0513549189788,0.0513016278142,0.0507509524463,0.0505200240663,0.050377914294,0.0505022603447,0.0505022603447,0.0503068594078,0.0493476184445,0.0494897282168,0.0498450026477,0.0503246231293,0.0505377877878,0.0503601505724,0.0502002770785,0.0498982938123,0.050413441737,0.0504312054586,0.050608842674,0.0508930622187,0.0506976612817,0.0505377877878,0.0508752984971,0.050413441737,0.050804243611,0.0507687161679,0.0500581673062,0.0495430193815,0.0500048761416,0.04998711242,0.0496140742676,0.0491522175075,0.0484771960889,0.049134453786,0.0491166900644,0.0486193058613,0.0489568165706,0.0499160575339,0.04998711242,0.0490101077352,0.048939052849,0.0490811626214,0.0494897282168,0.0490278714567,0.0487614156336,0.0490278714567,0.0486725970259,0.0478199383919,0.0477133560626,0.0479798118857,0.0482107402658,0.0482640314304,0.0481041579365,0.0481041579365,0.0477488835057,0.0479620481642,0.0482285039873,0.0483883774812,0.0484416686458,0.0484949598105,0.0482640314304,0.0480508667719,0.0482462677089,0.0482995588735,0.0484949598105,0.0482995588735,0.0481929765442,0.0479975756073,0.0476067737334,0.0478732295565,0.0485660146966,0.0486903607474,0.0483350863166,0.0487258881905,0.0488502342413,0.0485482509751,0.048939052849,0.0489035254059,0.0485482509751,0.0485660146966,0.0477488835057,0.0479087569996,0.0481752128227,0.0478199383919,0.0475890100118,0.046842933707,0.0461501485669,0.0460435662376,0.0466297690485,0.04618567601,0.0463810769469,0.04618567601,0.0460080387945,0.0463100220608,0.0465942416054,0.0475357188472,0.0475890100118,0.0478199383919,0.0475357188472,0.0481396853796,0.0482995588735,0.047890993278,0.0483528500381,0.0476067737334,0.0471982081379,0.046807406264,0.0468251699855,0.0468784611501,0.0469139885932,0.0466297690485,0.0468962248717,0.0470916258086,0.0460258025161,0.0468606974286,0.0467896425424,0.0466652964916,0.0462922583392,0.0459014564653,0.0464698955546,0.0462744946177,0.0458659290222,0.0457060555283,0.0465942416054,0.0459725113515,0.0462744946177,0.0473403179102,0.0477488835057,0.0478199383919,0.0474113727964,0.0474113727964,0.047464663961,0.0471982081379,0.0465409504408,0.0465942416054,0.0462744946177,0.0452974899329,0.0452441987682,0.0453152536544,0.0450665615528,0.0450310341097,0.0450843252743,0.045563945756,0.045759346693,0.0459192201868,0.0458126378576,0.0458836927438,0.0459725113515,0.0462212034531,0.0460790936807,0.0463810769469,0.0460080387945,0.0457771104145,0.0460258025161,0.0458659290222,0.0459725113515,0.0460790936807,0.0458126378576,0.0455284183129,0.0459014564653,0.0459192201868,0.0460613299592,0.0465587141624,0.0465764778839,0.0469139885932,0.0467185876562,0.0469495160363,0.0470738620871,0.0471449169733,0.0466830602132,0.0466652964916,0.0474824276826,0.0473047904671,0.0473047904671,0.0475179551256,0.0477844109488,0.0469495160363,0.046612005327,0.0463100220608,0.0465409504408,0.0461679122884,0.0454928908698,0.0453152536544,0.0448356331728,0.0442139029188,0.0442671940834,0.0442494303619,0.0445691773496,0.0447645782866,0.0447290508435,0.0451731438821,0.0450310341097,0.0447645782866,0.0450310341097,0.0449066880589,0.0443382489696,0.0439474470956,0.0437875736018,0.0438053373233,0.0435388815002,0.0430947884616,0.0426329317015,0.0428816238031,0.0428105689169,0.0431125521832,0.0428283326385,0.0435566452217,0.043041497297,0.0423664758784,0.0423131847137,0.0416559270167,0.0421177837768,0.0415315809659,0.0411585428135,0.0410697242058,0.0409631418765,0.0406433948888,0.0405901037241,0.0412118339781,0.0408920869904,0.0416026358521,0.0413361800289,0.0413539437505,0.0414072349151,0.0410874879273,0.042224366106,0.04284609636,0.0437342824371,0.0437875736018,0.0443027215265,0.0439829745387,0.0444093038557,0.044942215502,0.0450487978313,0.0457415829714,0.0455284183129,0.0456350006422,0.0451731438821,0.0452974899329,0.0449599792236,0.0450310341097,0.0449777429451,0.0451553801605,0.0454573634267,0.0452441987682,0.0452264350467,0.045368544819,0.045759346693,0.0459014564653,0.0459192201868,0.045759346693,0.0454928908698,0.0449066880589,0.0447290508435,0.0444981224635,0.0444270675773,0.0439652108172,0.0434145354494,0.0428993875246,0.0425974042584,0.04284609636,0.0424375307645,0.0428816238031,0.0437875736018,0.0437698098802,0.0437165187156,0.0437698098802,0.0439296833741,0.0438586284879,0.0441428480326,0.0439652108172,0.0446757596789,0.0444093038557,0.0432546619555,0.0434145354494,0.0429882061324,0.0427395140308,0.042224366106,0.0422776572707,0.0424730582076,0.0425085856507,0.0422776572707,0.0421710749414,0.0425796405369,0.0420467288906,0.0421177837768,0.0420112014475,0.0425441130938,0.0426506954231,0.0427039865877,0.0425441130938,0.0426329317015,0.0426329317015,0.0424730582076,0.0430947884616,0.0433434805632,0.0433790080063,0.0435744089433,0.0439829745387,0.0438763922095,0.0440362657034,0.0439119196526,0.0440540294249,0.0438763922095,0.0438053373233,0.0439652108172,0.0443560126911,0.0442849578049,0.0442139029188,0.0442849578049,0.0444803587419,0.0447645782866,0.0448001057297,0.044942215502,0.0441606117541,0.0439652108172,0.043894155931,0.0439119196526,0.0442139029188,0.0435921726648,0.0431303159047,0.0425618768153,0.042188838663,0.0422421298276,0.0426506954231,0.04261516798,0.0381564738729,0.0336444886011,0.0287061740124,0.0249757924885,0.0)
m <- c(0.0242869578858,0.0282932375957,0.0328336879336,0.0374453610219,0.0415406691698,0.041576280545,0.0423063137366,0.0425199819878,0.0421460625482,0.0425377876754,0.0428404843646,0.0428939014274,0.0426624274886,0.042555593363,0.042822678677,0.0426268161134,0.042733650239,0.0422528966738,0.0424843706126,0.0426980388638,0.042466564925,0.0422172852986,0.0422172852986,0.0418611715466,0.041576280545,0.041932394297,0.0416831146706,0.0418611715466,0.0417899487962,0.0416831146706,0.0417721431086,0.0422350909862,0.0425199819878,0.0426268161134,0.0429473184902,0.0434814891181,0.0433924606801,0.0439266313081,0.0444964133113,0.0440334654337,0.0438019914949,0.0434102663677,0.0429473184902,0.0431075696786,0.0429473184902,0.0424843706126,0.0424843706126,0.0424487592374,0.0422528966738,0.0420570341102,0.0424843706126,0.0429295128026,0.043089763991,0.0429651241778,0.0429473184902,0.0430363469282,0.0423241194242,0.041932394297,0.0416475032954,0.0428760957398,0.0430363469282,0.0429651241778,0.0427870673018,0.0424843706126,0.0425733990506,0.042288508049,0.0428582900522,0.0429295128026,0.0432144038041,0.0423063137366,0.0420392284226,0.0422707023614,0.0425021763002,0.0427692616142,0.0426802331762,0.0432500151793,0.0434458777429,0.0436417403065,0.0434814891181,0.0440334654337,0.0439444369957,0.0437485744321,0.0434102663677,0.0434102663677,0.0434280720553,0.0428404843646,0.042911707115,0.0423063137366,0.0427514559266,0.042288508049,0.0425199819878,0.0426090104258,0.0428404843646,0.0429473184902,0.0429473184902,0.0429651241778,0.0427692616142,0.0431253753662,0.0425021763002,0.042466564925,0.042377536487,0.042555593363,0.0423419251118,0.042199479611,0.0420392284226,0.0424843706126,0.0421460625482,0.0423419251118,0.0421460625482,0.0417187260458,0.0417009203582,0.0418789772342,0.0422707023614,0.0423241194242,0.0423419251118,0.0420570341102,0.0425199819878,0.0418611715466,0.0421460625482,0.043089763991,0.0429829298654,0.0421638682358,0.0420036170474,0.042021422735,0.0419680056722,0.042110451173,0.0415940862326,0.0416118919202,0.042110451173,0.041309195231,0.0414160293566,0.0418255601714,0.0419501999846,0.0423063137366,0.0424843706126,0.0429295128026,0.0431253753662,0.0439622426833,0.0442471336849,0.0450483896269,0.0447813043129,0.0451552237525,0.0452798635657,0.0452976692533,0.0452976692533,0.0446388588121,0.0443717734981,0.0435883232437,0.0429829298654,0.042822678677,0.043089763991,0.0426090104258,0.0427692616142,0.0425021763002,0.0426268161134,0.0430363469282,0.0435883232437,0.0441046881841,0.0440690768089,0.0440334654337,0.0439266313081,0.0438376028701,0.0434458777429,0.0432144038041,0.0429295128026,0.0427514559266,0.0423597307994,0.0424131478622,0.0427870673018,0.0426980388638,0.0425199819878,0.0429473184902,0.0431253753662,0.0435883232437,0.0442471336849,0.0444251905609,0.0448881384385,0.0449415555013,0.0450661953145,0.0450305839393,0.0454223090665,0.0455647545673,0.0453866976913,0.0451018066897,0.0444073848733,0.0441224938717,0.0444073848733,0.0448703327509,0.0440690768089,0.0446922758749,0.0448703327509,0.0444429962485,0.0448525270633,0.0446744701873,0.0449059441261,0.0454045033789,0.0443895791857,0.0443005507477,0.0442827450601,0.0434458777429,0.0432856265545,0.0436061289313,0.0429651241778,0.0433568493049,0.043089763991,0.0426268161134,0.0433034322421,0.0428582900522,0.0435527118685,0.0439444369957,0.0437485744321,0.0433746549925,0.0434636834305,0.0433568493049,0.0436951573693,0.0439266313081,0.0446744701873,0.0451018066897,0.0450661953145,0.0450127782517,0.0450305839393,0.0455113375045,0.0459208683193,0.0463660105093,0.0467043185737,0.0471138493885,0.0464372332597,0.0466687071985,0.0466687071985,0.0466330958233,0.0472206835141,0.0471316550761,0.047754854142,0.0475946029536,0.0474521574528,0.0470604323257,0.0471494607637,0.0467933470117,0.0467399299489,0.0474165460776,0.0472028778265,0.0467755413241,0.0466687071985,0.0460455081325,0.0463482048217,0.0467577356365,0.0462235650085,0.0463838161969,0.0469535982001,0.0460811195077,0.0459030626317,0.0463482048217,0.0462947877589,0.0467755413241,0.0467933470117,0.0467577356365,0.0469892095753,0.0469535982001,0.0465974844481,0.0471316550761,0.0472028778265,0.047309711952,0.0472741005769,0.0473453233272,0.0475411858908,0.0473453233272,0.0473453233272,0.04739874039,0.047487768828,0.0478260768924,0.0478082712048,0.0481465792692,0.0481465792692,0.0480041337684,0.0475589915784,0.0476480200164,0.0483602475204,0.0484136645832,0.0480931622064,0.0479507167056,0.0480753565188,0.0478260768924,0.0470070152629,0.0471494607637,0.0475946029536,0.0481643849568,0.0475589915784,0.0477014370792,0.0475411858908,0.0472562948893,0.048199996332,0.0486273328344,0.0493751717136,0.0495532285896,0.0492505319004,0.0486629442096,0.0486807498972,0.048823195398,0.0496422570276,0.0497668968408,0.0491258920872,0.0492149205252,0.0496422570276,0.0499093423416,0.0499983707796,0.0501408162804,0.0502298447184,0.0501942333432,0.0503010674688,0.0505859584704,0.0504079015944,0.049980565092,0.049713479778,0.0500873992176,0.0502298447184,0.049980565092,0.0506749869084,0.049891536654,0.0498737309664,0.05006959353,0.0498559252788,0.0496956740904,0.0499271480292,0.0497312854656,0.0498559252788,0.0503010674688,0.0501408162804,0.0509776835976,0.0507996267216,0.0507640153464,0.0512625745992,0.0519391907279,0.0519035793527,0.0514584371627,0.0513516030372,0.0513694087248,0.0513694087248,0.0511735461612,0.051137934786,0.0510311006604,0.050870849472,0.0508886551596,0.0507996267216,0.0512981859744,0.0512447689116,0.0510311006604,0.0512981859744,0.0515652712883,0.0515474656007,0.051226963224,0.0515830769759,0.0516186883511,0.0513872144124,0.0514228257876,0.0522418874171,0.0525445841063,0.0528650864831,0.0525980011691,0.0528828921707,0.0534348684863,0.0536485367375,0.0534704798615,0.0538800106763,0.0537909822383,0.0532390059227,0.0530431433591,0.0531855888599,0.0537375651755,0.0541292903027,0.0543963756167,0.0548059064315,0.0548059064315,0.0555003282479,0.0555537453106,0.055624968061,0.0556961908114,0.0547524893687,0.0547346836811,0.0543073471787,0.0537553708631,0.0533102286731,0.0532568116103,0.0529006978583,0.0528650864831,0.0532568116103,0.0539512334267,0.0546634609307,0.0545388211175,0.0550017689951,0.0553044656843,0.0554112998099,0.0558564419998,0.0555181339355,0.0558208306246,0.0565864751914,0.0563728069402,0.0564084183154,0.056426224003,0.0564440296906,0.0568891718806,0.056337195565,0.056159138689,0.0566398922542,0.0563728069402,0.0559276647502,0.0559632761254,0.0562659728146,0.0566755036294,0.0565864751914,0.0562837785022,0.0579219017614,0.058117764325,0.0582424041382,0.0594709965826,0.0591504942058,0.0604325037129,0.0601120013361,0.0603968923377,0.0610557027789,0.0616076790945,0.0610557027789,0.0612159539673,0.0612871767177,0.0606283662765,0.0608420345277,0.0595956363958,0.0601832240865,0.0593997738322,0.0589012145794,0.058651934953,0.0582245984506,0.0583314325762,0.0579753188242,0.0573343140706,0.0582245984506,0.058919020267,0.0591148828306,0.0597202762089,0.0602900582121,0.0609666743409,0.0613583994681,0.0613405937805,0.0617145132201,0.0626226032877,0.0624801577869,0.0618569587209,0.0618213473457,0.0625335748497,0.0625335748497,0.0617145132201,0.0616432904697,0.0621774610977,0.0625335748497,0.0631211625405,0.0623377122861,0.0629074942893,0.0626760203505,0.0624089350365,0.0625513805373,0.0632101909785,0.06394022417,0.0638868071072,0.0641360867336,0.064029252608,0.0643675606724,0.0648661199252,0.0654359019284,0.0649373426756,0.0647592857996,0.0647770914872,0.064919536988,0.0655249303664,0.0659522668688,0.065364679178,0.0658810441184,0.066076906682,0.0661125180572,0.0668069398736,0.0671630536256,0.0672876934388,0.067145247938,0.066789134186,0.0667357171232,0.0682670062567,0.0684628688203,0.0693353475127,0.0695668214515,0.0701366034547,0.0702968546431,0.0708132195835,0.0717747267139,0.0717391153387,0.0719883949651,0.0714186129619,0.0717035039635,0.0711693333355,0.0715966698379,0.0721842575286,0.072166451841,0.0723979257798,0.0721842575286,0.0728964850326,0.0733594329102,0.0733772385978,0.073857992163,0.0744455798538,0.0753180585462,0.074926333419,0.0754961154222,0.0756919779858,0.0755673381726,0.0759412576122,0.0765110396153,0.0774903524333,0.0772766841821,0.0776506036217,0.0777574377473,0.0778642718729,0.0785230823141,0.0794489780693,0.0794667837569,0.0795736178825,0.0796092292577,0.0792887268809,0.0798585088841,0.0794667837569,0.0787011391901,0.0792531155057,0.0795023951321,0.0792353098181,0.0806419591384,0.0811761297664,0.081639077644,0.082529362024,0.0829388928388,0.0833840350288,0.0842743194088,0.0849509355375,0.0847194615987,0.0853960777275,0.0850755753507,0.0859658597307,0.0865534474215,0.0874793431767,0.0882984048063,0.0889037981846,0.089687248439,0.0893133289994,0.0900255565034,0.090043362191,0.0908090067578,0.090755589695,0.091200731885,0.0906487555694,0.0901145849414,0.0912719546354,0.0913253716982,0.0935688883357,0.0939784191505,0.0946372295917,0.0955987367221,0.0966492722905,0.0961507130377,0.0972190542936,0.098180561424,0.098180561424,0.099515987994,0.0986791206768,0.0999255188088,0.100103575685,0.10095824869,0.101456807942,0.102614177636,0.103967409894,0.105249419401,0.105498699027,0.105231613713,0.106709485784,0.107457324663,0.108881779671,0.108685917108,0.109576201488,0.110341846055,0.110608931369,0.111196519059,0.111979969314,0.113279784508,0.113226367446,0.114134457513,0.114775462267,0.115380855645,0.115487689771,0.11668067084,0.117036784592,0.118122931536,0.119226884167,0.119903500295,0.120152779922,0.121096481365,0.121755291806,0.123179746814,0.12469323026,0.126064268205,0.127542140276,0.12928709766,0.130943026607,0.132919457931,0.136996960391,0.139400728217,0.14308650555,0.145347827875,0.147894041202,0.150814173968,0.154713619553,0.158951373201,0.16452455342,0.169189643571,0.174282070225,0.179232051377,0.184538146282,0.190342800439,0.195132530404,0.199281255614,0.200527653746,0.199494923866,0.197500686854,0.195595478281,0.192319231763,0.189132013683,0.185659904601,0.181546790765,0.178626657999,0.175172354605,0.173765705284,0.1743176816,0.17476282379,0.173925956473,0.174246458849,0.174940880666,0.174193041787,0.175314800105,0.173836928035,0.173338368782,0.173445202907,0.172928837967,0.173783510972,0.176080444672,0.175421634231,0.175457245606,0.177344648492,0.17839518406,0.18054967226,0.182383658082,0.183541027776,0.185464042037,0.18640774348,0.187315833547,0.189381293309,0.191535781509,0.192337037451,0.194544942713,0.195880369283,0.19678845935,0.199227838552,0.200492042371,0.200954990249,0.202468473695,0.204498322081,0.203981957141,0.205335189398,0.205157132522,0.206314502216,0.207525288973,0.207329426409,0.209270246358,0.21199451656,0.212777966815,0.212671132689,0.214718786763,0.214718786763,0.215626876831,0.217158165964,0.217941616219,0.219864630479,0.218564815285,0.217745753655,0.217656725217,0.217763559343,0.218012838969,0.217567696779,0.217995033282,0.216837663588,0.216837663588,0.216321298647,0.217300611465,0.216463744148,0.216321298647,0.216321298647,0.21644593846,0.215982990583,0.21325872038,0.213312137443,0.212706744064,0.212528687188,0.211460345932,0.2102139478,0.20925244067,0.209412691859,0.207863597037,0.208451184728,0.209590748735,0.208647047292,0.209109995169,0.208575824541,0.207382843472,0.207560900348,0.207204786596,0.205869360026,0.205317383711,0.204142208329,0.202967032947,0.202610919195,0.200509848059,0.198319748484,0.19812388592,0.198212914358,0.197732160793,0.197643132355,0.197126767415,0.197304824291,0.196485762661,0.195809146532,0.195346198655,0.194171023273,0.193636852645,0.191589198571,0.191179667757,0.189221042121,0.188580037367,0.187974643989,0.187707558675,0.187351444923,0.186550188981,0.186372132105,0.184983288472,0.185731127351,0.184858648659,0.185179151035,0.184751814533,0.183861530153,0.18380811309,0.182900023023,0.181261899764,0.180531866572,0.180051113007,0.178822520562,0.177967847558,0.177024146115,0.176668032363,0.174495738476,0.173017866405,0.172145387713,0.17164682846,0.171219491957,0.169830648325,0.169777231262,0.169171837883,0.16942111751,0.167604937375,0.168228136441,0.167604937375,0.166322927868,0.166127065304,0.165753145864,0.165824368615,0.163990382792,0.162281036782,0.16000190877,0.159378709704,0.158078894509,0.158613065137,0.157918643321,0.157544723881,0.156351742812,0.154321894425,0.154037003424,0.153734306735,0.152648159791,0.15161542991,0.150831979656,0.148552851643,0.147805012764,0.146487391882,0.144813657247,0.144475349183,0.142926254362,0.142409889421,0.142214026858,0.141412770916,0.14034442966,0.140166372784,0.139596590781,0.139614396468,0.139276088404,0.138528249525,0.137068183141,0.135554699696,0.134895889254,0.134272690188,0.133649491122,0.132670178304,0.131940145113,0.130141770665,0.130052742227,0.129803462601,0.129910296726,0.129963713789,0.128806344095,0.12795167109,0.12691894121,0.126260130769,0.125547903265,0.124497367696,0.12335780369,0.122342879497,0.121897737307,0.120900618801,0.121327955303,0.120936230176,0.119582997919,0.119031021603,0.118407822537,0.119654220669,0.119244689854,0.11928030123,0.119084438666,0.118995410228,0.117517538157,0.116734087903,0.117392898344,0.116199917275,0.115630135272,0.114722045204,0.113689315323,0.113279784508,0.112407305816,0.112122414814,0.112977087819,0.112781225256,0.11230047169,0.112389500128,0.111926552251,0.111143101996,0.111178713372,0.111071879246,0.11082259962,0.109843286802,0.108133940792,0.108294191981,0.108116135105,0.107510741726,0.106905348348,0.105694561591,0.106068481031,0.104198883833,0.103611296142,0.102471732136,0.102204646822,0.101706087569,0.100281632561,0.100566523562,0.099605016432,0.0990530401164,0.0983586183,0.0979846988604,0.0977710306092,0.098091532986,0.0974861396076,0.096756106416,0.097646390796,0.0971656372308,0.0981449500488,0.0987503434272,0.0980559216108,0.0980203102356,0.0976998078588,0.0972546656688,0.0973971111696,0.0970409974176,0.0961507130377,0.0957767935981,0.0943167272149,0.0937469452117,0.0936579167737,0.0929991063325,0.0925539641426,0.092001987827,0.0919663764518,0.0913431773858,0.0902036133794,0.088885992497,0.0890462436854,0.0884408503071,0.0874971488643,0.0874437318015,0.0861617222943,0.0853070492895,0.0834908691544,0.0825827790868,0.082529362024,0.08137199233,0.0804104851996,0.0800187600725,0.0794845894445,0.0791996984429,0.0795202008197,0.0789148074413,0.0791106700049,0.0781135514993,0.0774903524333,0.0771164329937,0.0765822623657,0.0759590632998,0.0753892812966,0.075282447171,0.0742675229778,0.075015361857,0.0749975561694,0.0755673381726,0.0746948594802,0.0748551106686,0.0746414424174,0.0745168026042,0.0746414424174,0.0735196840986,0.0729499020954,0.0716500869007,0.0710090821471,0.0705105228943,0.0709378593967,0.0706885797703,0.0709734707719,0.0707954138959,0.0701009920795,0.0700297693291,0.0700297693291,0.0703502717059,0.0696736555771,0.0689792337607,0.0690504565111,0.0690682621987,0.0688902053227,0.067857475442,0.0682670062567,0.0683738403823,0.0680177266303,0.0676081958156,0.0674479446272,0.0679108925047,0.0670918308752,0.0665932716224,0.0663974090588,0.066878162624,0.0665754659348,0.0667535228108,0.066878162624,0.0666466886852,0.0665042431844,0.0665042431844,0.0664686318092,0.0662371578704,0.0651153995516,0.0649551483632,0.06483050855,0.0637443616065,0.0633882478545,0.0632636080413,0.0636375274809,0.0634238592297,0.0633526364793,0.0632814137289,0.0633170251041,0.0626582146629,0.0619103757837,0.0616610961573,0.0619459871589,0.0616789018449,0.0608954515905,0.0610735084665,0.0615008449689,0.0615898734069,0.0618569587209,0.0624089350365,0.0623199065985,0.0625513805373,0.0620528212845,0.0618569587209,0.0618747644085,0.0611447312169,0.0603968923377,0.0598805273973,0.0597736932717,0.059275134019,0.0593285510818,0.0596668591461,0.059631247771,0.0600229728981,0.0600229728981,0.0597736932717,0.0598627217097,0.0602010297741,0.0598983330849,0.0603612809625,0.0605393378385,0.0598983330849,0.0601120013361,0.0596668591461,0.0598271103345,0.0597558875841,0.0599161387725,0.0597558875841,0.059631247771,0.0583136268886,0.057850679011,0.0579575131366,0.0576370107598,0.057405536821,0.0575657880094,0.0578150676358,0.0575301766342,0.0576904278226,0.0572096742574,0.0582245984506,0.0575123709466,0.0571206458194,0.056693309317,0.056782337755,0.0567645320674,0.0560879159386,0.0555003282479,0.0547881007439,0.0550373803703,0.0544319869919,0.0549305462447,0.0553222713719,0.0552866599967,0.0543963756167,0.0539690391143,0.0546990723059,0.0548237121191,0.0544319869919,0.0537197594879,0.0534882855491,0.0535417026119,0.0530965604219,0.0532390059227,0.0539690391143,0.0537553708631,0.0531855888599,0.0536663424251,0.0541649016779,0.0551086031207,0.0555715509982,0.056159138689,0.0563906126278,0.0562303614394,0.0560879159386,0.0561413330014,0.0567467263798,0.0562125557518,0.0561413330014,0.0554825225603,0.0546812666183,0.0540758732399,0.0534348684863,0.0539868448019,0.0541114846151,0.0539156220515,0.0532033945475,0.0531321717971,0.0535238969243,0.0531677831723,0.0535060912367,0.0533814514235,0.0541292903027,0.0535773139871,0.0529897262963,0.0527582523575,0.0525445841063,0.0525267784187,0.0513337973496,0.0520816362287,0.0517789395395,0.0517789395395,0.0512625745992,0.0513872144124,0.0507996267216,0.05006959353,0.05006959353,0.0500161764672,0.0501408162804,0.0499627594044,0.05006959353,0.050247650406,0.05006959353,0.0504969300324,0.051315991662,0.0522953044799,0.0525623897939,0.0529897262963,0.0533280343607,0.0533636457359,0.0530609490467,0.0519213850403,0.0520994419163,0.0516542997263,0.051315991662,0.0509954892852,0.0507640153464,0.0503722902192,0.0497847025284,0.0491436977748,0.0494285887764,0.0503188731564,0.0504435129696,0.0495888399648,0.0491971148376,0.0487519726476,0.0491258920872,0.0488944181484,0.0497668968408,0.0499449537168,0.0500339821548,0.04962445134,0.0487697783352,0.049090280712,0.0490546693368,0.0491080863996,0.048110967894,0.0479685223932,0.047487768828,0.0472206835141,0.0471138493885,0.0467933470117,0.0472384892017,0.0470604323257,0.0479507167056,0.0485204987088,0.04917930915,0.0494285887764,0.0490546693368,0.0491258920872,0.0484314702708,0.0481643849568,0.0482178020196,0.0480397451436,0.0475233802032,0.0468823754497,0.0463303991341,0.0459564796945,0.0465440673853,0.0463125934465,0.0465084560101,0.0470426266381,0.0475055745156,0.0476480200164,0.0472028778265,0.047665825704,0.0481465792692,0.0485739157716,0.048199996332,0.048021939456,0.0481821906444,0.0480575508312,0.0472562948893,0.04784388258,0.0482534133948,0.0476836313916,0.0471494607637,0.0466152901357,0.0467755413241,0.0472206835141,0.0472384892017,0.0477370484544,0.0480041337684,0.0476480200164,0.0478082712048,0.047754854142,0.0476836313916,0.0477904655172,0.047754854142,0.0475411858908,0.0473631290148,0.0470248209505,0.0470426266381,0.0468111526993,0.0467577356365,0.0471316550761,0.0472919062645,0.0477014370792,0.0478260768924,0.0477726598296,0.04784388258,0.0477192427668,0.0476124086412,0.0472919062645,0.0424309535498,0.0376234178979,0.0330117448096,0.0279549295313,0.0)
ycorr <- c(4.92285292737e-05,4.90025250472e-05,4.83284480318e-05,4.7208132617e-05,4.56419576573e-05,4.36308711927e-05,4.1178009724e-05,3.86287251195e-05,3.59987991442e-05,3.33051874036e-05,3.05689764294e-05,2.78121999263e-05,2.50547419789e-05,2.23129206985e-05,1.96074229323e-05,1.6955208179e-05,1.43694143445e-05,1.18576530261e-05,9.41431807771e-06,7.02978967877e-06,4.69465699109e-06,2.39891025843e-06,1.3219402594e-07,-2.11134127449e-06,-4.34425792839e-06,-6.57284454362e-06,-8.80236711655e-06,-1.10409790028e-05,-1.32896816588e-05,-1.55483678377e-05,-1.78178696049e-05,-2.00965588828e-05,-2.23864436054e-05,-2.46901205813e-05,-2.70098277015e-05,-2.93464951999e-05,-3.17085779209e-05,-3.40982642023e-05,-3.65175445451e-05,-3.89668023738e-05,-4.1442168333e-05,-4.39435152172e-05,-4.64761238659e-05,-4.9038354431e-05,-5.16328780685e-05,-5.42602076655e-05,-5.69156767555e-05,-5.9599981704e-05,-6.23127102147e-05,-6.50509889433e-05,-6.78195258379e-05,-7.06224205237e-05,-7.34528936799e-05,-7.63097757193e-05,-7.91903868026e-05,-8.2090330666e-05,-8.50097053961e-05,-8.79467021552e-05,-9.09000407951e-05,-9.38723162322e-05,-9.68648306348e-05,-9.98696502778e-05,-0.000102887327457,-0.000105919793115,-0.000108964651524,-0.00011202686685,-0.000115106586664,-0.00011820645449,-0.000121323605733,-0.000124452159069,-0.000127587223338,-0.000130728495774,-0.000133878784228,-0.000137032615093,-0.0001401923517,-0.000143354630994,-0.000146515593475,-0.000149670169847,-0.000152814473714,-0.000155949947437,-0.000159077987654,-0.00016219856008,-0.000165310195231,-0.000168412813595,-0.000171502294833,-0.000174578690655,-0.000177644234553,-0.00018070096671,-0.000183751050261,-0.000186792105596,-0.00018982525146,-0.000192853141814,-0.000195875177235,-0.000198892196475,-0.00020190738256,-0.000204923527251,-0.000207938918701,-0.000210951168388,-0.000213956400388,-0.000216956714122,-0.000219952223031,-0.000222939648045,-0.000225914901519,-0.000228876619247,-0.000231820969116,-0.000234744847304,-0.000237649069561,-0.00024053256884,-0.000243398786553,-0.000246248568147,-0.000249079916728,-0.000251895806521,-0.000254698317515,-0.000257488796303,-0.000260266495996,-0.000263032548991,-0.000265783676087,-0.000268516354611,-0.000271230928972,-0.000273923527755,-0.000276593777356,-0.00027923735833,-0.000281852841148,-0.000284441661587,-0.000287003592066,-0.000289540406048,-0.000292049888593,-0.000294535549107,-0.000296999222545,-0.000299442413353,-0.000301867517594,-0.000304278738246,-0.000306677771351,-0.000309063173855,-0.000311436257576,-0.000313793181225,-0.000316132471157,-0.000318456173252,-0.000320762118381,-0.00032305153735,-0.000325321687588,-0.000327571014016,-0.000329797935651,-0.000332000370877,-0.000334176990902,-0.000336327926863,-0.000338458737186,-0.000340571981346,-0.000342667588869,-0.000344747730594,-0.00034681369729,-0.000348866691399,-0.000350905295208,-0.000352930975681,-0.000354946397988,-0.000356950890602,-0.000358942869497,-0.000360918609102,-0.000362879793037,-0.000364824718477,-0.000366750969258,-0.000368655940834,-0.000370539703353,-0.000372403112621,-0.000374247613532,-0.00037607618528,-0.00037789129475,-0.000379692031046,-0.000381474346828,-0.000383236858397,-0.000384981452596,-0.000386707852623,-0.000388416546472,-0.000390107433434,-0.000391777995324,-0.000393421527274,-0.000395036795861,-0.000396622435271,-0.000398180033471,-0.000399712618614,-0.000401219410859,-0.000402701777133,-0.000404162184666,-0.000405599767631,-0.000407014845308,-0.0004084122947,-0.000409793831508,-0.000411159783013,-0.00041251168365,-0.000413846635107,-0.000415164362612,-0.000416462866351,-0.000417738877877,-0.000418992382511,-0.000420223939756,-0.000421432622403,-0.000422616722008,-0.000423776819659,-0.00042491298341,-0.000426026511178,-0.000427120151139,-0.000428195063497,-0.000429253382905,-0.00043029623795,-0.000431323462237,-0.000432336164081,-0.000433332383466,-0.000434313026336,-0.000435277624834,-0.000436224404623,-0.000437151320454,-0.000438060700164,-0.00043895254234,-0.000439824436291,-0.000440677560593,-0.000441512708793,-0.000442333203795,-0.000443140018621,-0.000443932209911,-0.00044471118055,-0.000445478230471,-0.000446231949979,-0.000446970319742,-0.000447697558513,-0.000448412022761,-0.000449113009058,-0.000449800012166,-0.000450471214034,-0.000451130660546,-0.000451778560984,-0.00045241526799,-0.000453041444618,-0.000453658756839,-0.000454266140396,-0.000454863537766,-0.000455454383742,-0.000456037465097,-0.000456613200622,-0.000457182745781,-0.000457744336262,-0.000458297663236,-0.000458840196947,-0.000459373272596,-0.000459897728619,-0.000460412582717,-0.000460913707548,-0.000461400459307,-0.000461874396237,-0.000462328643869,-0.000462761236351,-0.000463170431016,-0.000463558928038,-0.000463927130713,-0.00046427192927,-0.000464596228498,-0.000464899609428,-0.0004651832766,-0.000465448440756,-0.000465696025366,-0.000465932597522,-0.000466158899679,-0.000466374717323,-0.000466579790072,-0.000466776033294,-0.000466963575667,-0.000467143055955,-0.000467317660758,-0.000467486445893,-0.000467650011321,-0.000467807122948,-0.000467957810106,-0.000468103336153,-0.000468244250845,-0.000468378881793,-0.000468505379747,-0.000468622846323,-0.000468726745617,-0.000468815970898,-0.000468891280286,-0.000468952481692,-0.000468999131202,-0.000469030088206,-0.000469041916167,-0.000469033671588,-0.000469005072573,-0.000468957049459,-0.000468890473089,-0.000468805099992,-0.000468700046509,-0.000468573669712,-0.000468423768874,-0.000468248333734,-0.000468047386143,-0.00046782368765,-0.000467578226033,-0.00046731259119,-0.000467026718124,-0.000466721808608,-0.000466400426637,-0.000466063732619,-0.000465715017001,-0.000465358009811,-0.000464994587872,-0.000464625201005,-0.000464247255496,-0.000463860336942,-0.000463464254144,-0.000463057682261,-0.000462641204897,-0.000462212440536,-0.000461772699599,-0.000461322009683,-0.000460859676132,-0.000460385351799,-0.000459899892358,-0.000459404872515,-0.000458901484624,-0.00045839117282,-0.000457873863087,-0.000457348411796,-0.000456813778205,-0.000456267820608,-0.000455709195487,-0.000455137703746,-0.000454555801423,-0.000453964046512,-0.000453362940887,-0.00045275127978,-0.000452127471738,-0.000451493297963,-0.000450849664085,-0.000450196435326,-0.000449533266792,-0.000448861805904,-0.000448181179794,-0.000447489727507,-0.000446783982247,-0.000446065087092,-0.000445334273545,-0.000444591628679,-0.000443837313317,-0.000443072276244,-0.000442300632188,-0.000441521518752,-0.000440733147569,-0.000439935885264,-0.000439132216836,-0.000438323889332,-0.000437510319916,-0.000436691881646,-0.000435867049702,-0.00043503444201,-0.000434193653086,-0.000433343990667,-0.00043248740932,-0.000431623043167,-0.00043075210723,-0.000429873420926,-0.000428985106009,-0.00042808704119,-0.000427179196142,-0.000426264430687,-0.000425341985594,-0.000424410745326,-0.000423471029092,-0.000422522716258,-0.000421565266035,-0.000420596196743,-0.000419615942527,-0.000418627353066,-0.000417630088615,-0.000416622703816,-0.000415605555326,-0.000414580323995,-0.000413546374614,-0.000412504360691,-0.000411454422812,-0.000410398518538,-0.00040933724784,-0.000408269044883,-0.000407193799291,-0.000406111467425,-0.00040502256522,-0.000403925602733,-0.000402820856018,-0.000401708946298,-0.000400588461855,-0.00039945912815,-0.000398322605695,-0.000397179236918,-0.000396029736331,-0.000394872926581,-0.000393707070842,-0.000392531827001,-0.000391346434188,-0.000390149023477,-0.000388940816606,-0.000387720665587,-0.000386486114377,-0.000385235807103,-0.000383970347481,-0.000382691798995,-0.000381401727792,-0.000380103367784,-0.0003787970839,-0.000377483972162,-0.000376163349912,-0.000374836057073,-0.000373504246581,-0.000372169770332,-0.000370831245471,-0.000369487870012,-0.00036813812662,-0.000366780273373,-0.000365412955162,-0.000364035182557,-0.00036264752342,-0.000361249285933,-0.000359839301679,-0.000358416161759,-0.00035698147139,-0.000355535661538,-0.000354078502299,-0.00035260944295,-0.000351129645452,-0.000349640540739,-0.000348143771315,-0.000346640495544,-0.000345135049832,-0.000343627183465,-0.000342115547048,-0.00034060002049,-0.000339082146656,-0.000337562725639,-0.000336040643143,-0.00033451457022,-0.000332981500122,-0.000331441008169,-0.000329889338349,-0.000328324847,-0.000326748336358,-0.000325159585028,-0.000323555696608,-0.000321935864639,-0.000320301465695,-0.000318654521441,-0.000316997273395,-0.000315331951244,-0.000313658706609,-0.000311978604587,-0.000310290894809,-0.000308593945585,-0.000306891462406,-0.000305183959105,-0.000303469702425,-0.000301745716781,-0.000300009805904,-0.000298259574196,-0.000296492586612,-0.000294710036774,-0.000292913442676,-0.000291103579713,-0.000289278653977,-0.000287436636478,-0.000285580648828,-0.00028371160733,-0.000281831589946,-0.000279941248977,-0.000278043458203,-0.000276139168404,-0.000274226491212,-0.000272304367823,-0.000270372720838,-0.000268432962867,-0.000266482070376,-0.000264520189914,-0.00026254715138,-0.000260562551834,-0.000258565538163,-0.000256553573276,-0.000254524562641,-0.0002524787502,-0.000250416975716,-0.000248339688684,-0.000246248108604,-0.000244144420616,-0.000242026179903,-0.000239894254769,-0.000237747126823,-0.000235587617757,-0.00023341756145,-0.00023123995037,-0.000229056001229,-0.000226865703436,-0.000224668767486,-0.000222464805083,-0.000220254305627,-0.000218034523616,-0.000215807281849,-0.000213572352979,-0.00021132884263,-0.00020907574693,-0.00020681043987,-0.000204531520181,-0.000202238030686,-0.000199928179942,-0.000197602406268,-0.000195263275276,-0.000192913213318,-0.000190548483426,-0.000188169138039,-0.000185772909017,-0.000183360879546,-0.000180933987933,-0.000178493701861,-0.000176039950956,-0.000173574268601,-0.00017109460702,-0.000168595338045,-0.000166077195842,-0.000163542059113,-0.000160992213751,-0.000158427139633,-0.000155846197047,-0.000153249353025,-0.000150635397843,-0.000148004682094,-0.000145356596344,-0.000142694339394,-0.000140020290849,-0.000137334750542,-0.000134637696115,-0.000131929679428,-0.000129211789455,-0.000126481308509,-0.000123738265133,-0.000120980538113,-0.000118207226308,-0.000115418985468,-0.000112613447974,-0.000109790080933,-0.000106945856016,-0.000104078029233,-0.000101184001285,-9.82657648389e-05,-9.53244225379e-05,-9.23610801702e-05,-8.93792625494e-05,-8.63798967594e-05,-8.33620202862e-05,-8.03246710163e-05,-7.72698405644e-05,-7.42002518995e-05,-7.11186994546e-05,-6.8024716757e-05,-6.49174843619e-05,-6.17972468071e-05,-5.86618401074e-05,-5.55075115631e-05,-5.23353167179e-05,-4.91458825533e-05,-4.59396340966e-05,-4.27135847951e-05,-3.94656688473e-05,-3.61954208634e-05,-3.29022817337e-05,-2.95851664796e-05,-2.62453367044e-05,-2.28842785662e-05,-1.95023649282e-05,-1.60976802773e-05,-1.26683957605e-05,-9.21507903572e-06,-5.73887629413e-06,-2.24062550913e-06,1.27918333194e-06,4.81942855678e-06,8.38094944365e-06,1.19651316357e-05,1.55722178469e-05,1.92005722294e-05,2.28502149602e-05,2.6519864168e-05,3.02089737973e-05,3.39168041147e-05,3.76423299044e-05,4.13862786085e-05,4.51485831285e-05,4.89280419432e-05,5.27256126781e-05,5.65496228256e-05,6.04125237477e-05,6.43264111932e-05,6.83033058136e-05,7.24012233352e-05,7.63584385969e-05,8.0226889122e-05,8.40158933099e-05,8.7738829398e-05,9.14087631237e-05,9.50349285102e-05,9.8612004282e-05,0.000102128324536,0.000105572524804,0.000108935081607,0.000112162177763,0.000115518812633,0.000118957582738,0.000122471562566,0.000126050260598,0.000129683410554,0.000133363914035,0.000137092978822,0.000140872727611,0.000144706529369,0.000148594031863,0.000152533461693,0.000156524143017,0.000160563514238,0.000164651131656,0.000168785456144,0.000172963502661,0.000177182123475,0.000181436958159,0.000185722048422,0.000190030364674,0.000194355900069,0.000198692234143,0.000203030564044,0.000207362380624,0.000211679107927,0.00021597147469,0.000220231639892,0.00022445368434,0.000228632047322,0.000232764753844,0.00023685116159,0.000240892350203,0.000244892085849,0.000248855942349,0.000252791381124,0.000256706045043,0.000260610683198,0.000264513830024,0.000268422284791,0.000272344131472,0.000276286400916,0.000280253792305,0.000284249752218,0.00028827717742,0.000292338842104,0.000296436218046,0.000300568890336,0.000304737383458,0.000308945598391,0.000313193635283,0.000317481186,0.000321806659953,0.000326170092795,0.000330571387257,0.00033500826588,0.000339480166178,0.00034398564628,0.000348523091592,0.000353086802827,0.000357671405649,0.000362274610938,0.000366893985419,0.000371528208287,0.000376175178395,0.000380834196503,0.000385503136474,0.000390179292608,0.000394859493035,0.000399543533125,0.000404231791452,0.000408921964904,0.000413611807051,0.000418299092629,0.000422980771645,0.000427653789279,0.000432315298915,0.000436964176642,0.000441598551298,0.000446216399604,0.000450815606869,0.000455394386458,0.000459953052491,0.000464490507233,0.000469006202867,0.000473499067896,0.000477969070408,0.00048241327223,0.000486829736147,0.000491216426357,0.000495572209916,0.000499897066002,0.000504188780216,0.000508446020814,0.000512667301079,0.000516851332442,0.000520995852648,0.000525101847711,0.000529170295939,0.000533201580043,0.000537197979945,0.000541159701125,0.000545087571189,0.000548981880971,0.000552842602264,0.000556671980896,0.000560470735573,0.000564240546019,0.000567981140786,0.000571695686364,0.000575382934384,0.00057904153936,0.000582671570425,0.00058627148156,0.000589842511759,0.000593381479872,0.00059688626133,0.000600353777027,0.000603784142569,0.000607172141824,0.000610514548799,0.000613813071817,0.000617067526192,0.000620278709575,0.00062344629402,0.000626570538581,0.000629655280054,0.000632703048529,0.000635714874507,0.000638693005243,0.00064164007685,0.000644554550836,0.000647435452612,0.000650281217747,0.000653089820595,0.000655859327091,0.000658586969736,0.000661270340426,0.00066390732676,0.00066649751831,0.000669040431032,0.000671536851306,0.000673986912353,0.000676390278582,0.000678747644813,0.000681062293424,0.000683335008203,0.000685566494685,0.000687756300704,0.000689904248166,0.000692007527131,0.000694062542769,0.000696067721897,0.000698021998758,0.00069992348826,0.000701769214237,0.000703555824381,0.000705281632188,0.000706946343925,0.000708547595089,0.00071008355172,0.000711556564418,0.000712966283341,0.000714313549614,0.00071560060653,0.000716828436525,0.000717998594122,0.000719111245606,0.0007201664532,0.000721164845476,0.00072210942273,0.000723000238671,0.000723837350829,0.000724620234433,0.000725346295513,0.000726013455882,0.000726622213385,0.000727173024889,0.000727664313649,0.000728095759272,0.000728467154565,0.000728776527748,0.000729024844533,0.000729210807986,0.000729334903207,0.000729400396034,0.000729406651996,0.000729352092442,0.000729237435822,0.000729063839993,0.000728831199943,0.000728539733822,0.000728191037754,0.000727786527491,0.000727327882631,0.000726814265139,0.000726244827216,0.000725622973795,0.000724949550287,0.000724224711873,0.000723450494938,0.000722628215561,0.000721756155324,0.000720834326979,0.000719862148455,0.000718839431574,0.000717769778422,0.000716650451387,0.000715481579296,0.000714263596859,0.000712995134227,0.000711677324764,0.000710311580323,0.000708899983602,0.000707443509949,0.000705943728626,0.000704401066422,0.000702817605565,0.000701195683899,0.000699535164625,0.000697837550528,0.00069610184797,0.000694328158968,0.000692516070561,0.000690665941857,0.000688775735636,0.000686844346554,0.000684871685135,0.000682856105552,0.000680801050129,0.000678706172167,0.000676573403455,0.000674404690663,0.000672198225996,0.000669956705566,0.00066768279474,0.000665377905861,0.000663043383718,0.000660680410171,0.000658285935237,0.000655858757106,0.000653398596868,0.000650904032143,0.000648376980684,0.00064581668743,0.000643220830914,0.000640587738318,0.000637916778055,0.000635206813513,0.000632458417024,0.000629672505037,0.000626847127087,0.000623982838576,0.000621079002889,0.000618135204579,0.000615153520336,0.000612133346452,0.000609074122296,0.00060597694988,0.000602842427469,0.000599670627268,0.000596463765941,0.000593223037787,0.000589948397442,0.00058663910021,0.000583294792424,0.000579918187124,0.000576511287298,0.000573075780585,0.0005696143428,0.000566128381595,0.000562618562951,0.000559085271801,0.000555532529454,0.000551964453286,0.000548384494472,0.000544793925015,0.000541193178314,0.000537582084097,0.000533959903285,0.000530327394696,0.000526687695709,0.000523042898369,0.000519392465358,0.000515732366491,0.000512059868841,0.000508374131959,0.000504673173675,0.000500956154851,0.00049722359428,0.000493474596374,0.00048970672095,0.00048591497956,0.00048209730503,0.00047825543133,0.000474390405967,0.000470500574454,0.0004665865459,0.000462649910661,0.000458689965901,0.00045470724292,0.000450702130441,0.000446674940839,0.000442628707136,0.0004385633288,0.000434479383809,0.000430379609694,0.000426266213061,0.000422139598221,0.000418001381002,0.000413851824499,0.000409691021358,0.000405523711566,0.000401351877182,0.000397175791875,0.00039299757838,0.000388817374215,0.000384635534417,0.000380453309163,0.000376270528427,0.000372088092633,0.000367908515552,0.000363732197765,0.000359554754594,0.000355377152149,0.000351198254891,0.00034701744521,0.000342834430696,0.000338648133368,0.00033445816668,0.000330265452208,0.000326068347969,0.000321864714075,0.000317656554971,0.000313446150167,0.000309231987253,0.000305014642743,0.000300795692093,0.000296574063207,0.000292350643599,0.000288126038296,0.000283901403283,0.000279677659695,0.000275454356888,0.00027122992138,0.000267005529917,0.000262782930658,0.000258561279191,0.000254341260063,0.000250124292903,0.000245910909474,0.000241699268722,0.000237488212475,0.000233279735348,0.000229074342757,0.000224872886556,0.000220674991603,0.000216479600048,0.000212289129403,0.000208103523336,0.000203922225146,0.000199745089336,0.000195574574598,0.000191410803039,0.000187252860355,0.000183101601902,0.000178955783082,0.000174816237078,0.000170684127767,0.000166557185828,0.00016243381514,0.000158315357086,0.000154200637449,0.000150089858023,0.000145983269157,0.000141881839761,0.000137785248296,0.000133694735275,0.000129607985856,0.000125526380518,0.00012145214116,0.000117387504614,0.000113333329473,0.000109290403237,0.000105259728384,0.000101240965667,9.72353101073e-05,9.32455843154e-05,8.92729758689e-05,8.53179267404e-05,8.13790421667e-05,7.74544550825e-05,7.35431603522e-05,6.96442952989e-05,6.57577904592e-05,6.1882152111e-05,5.80186011597e-05,5.41635173088e-05,5.03139999505e-05,4.64696102584e-05,4.26335091056e-05,3.88065460479e-05,3.49927488597e-05,3.11938462063e-05,2.74097727463e-05,2.3643588061e-05,1.98938899423e-05,1.61619241802e-05,1.24522181322e-05,8.76693358115e-06,5.10579491606e-06,1.46873488332e-06,-2.14648787114e-06,-5.74254265264e-06,-9.31985595582e-06,-1.28812896303e-05,-1.64258538796e-05,-1.99528419301e-05,-2.34644675693e-05,-2.69632753983e-05,-3.04508286852e-05,-3.39282034719e-05,-3.73976105786e-05,-4.08565694799e-05,-4.43050727173e-05,-4.77423315817e-05,-5.11656915739e-05,-5.4577074392e-05,-5.79758666227e-05,-6.13591990665e-05,-6.47282457054e-05,-6.80810808022e-05,-7.14147963096e-05,-7.47287049619e-05,-7.80234696493e-05,-8.12983045974e-05,-8.45554162087e-05,-8.7794163448e-05,-9.10146628449e-05,-9.42174517238e-05,-9.74022104601e-05,-0.000100568217219,-0.000103716708597,-0.000106848733018,-0.000109963745354,-0.000113061983398,-0.000116142727629,-0.00011920623062,-0.000122251110093,-0.000125279097073,-0.000128289425115,-0.000131283680177,-0.000134261588114,-0.000137222754789,-0.000140166519663,-0.000143092692668,-0.000146000270891,-0.000148888817843,-0.00015175859553,-0.000154609158504,-0.000157439206618,-0.000160247553943,-0.00016303311922,-0.000165796416728,-0.000168537679826,-0.000171256707446,-0.000173955008957,-0.000176633132794,-0.000179291925712,-0.000181932698705,-0.000184556906843,-0.000187165988628,-0.000189760984734,-0.000192342404389,-0.000194910093364,-0.000197462836784,-0.000200001507881,-0.000202524658055,-0.000205032779786,-0.000207523972403,-0.000209994634176,-0.000212444674244,-0.000214873513994,-0.000217282271382,-0.000219671209779,-0.000222041573332,-0.000224392981896,-0.000226725064203,-0.000229038649398,-0.000231333193939,-0.000233611714419,-0.000235876372491,-0.000238126158435,-0.000240360543192,-0.000242577790877,-0.000244777240085,-0.000246957317592,-0.000249120379947,-0.000251267146083,-0.000253396869464,-0.000255509810291,-0.00025760242392,-0.000259672518972,-0.000261720385253,-0.000263746015741,-0.000265749236188,-0.000267732742534,-0.000269696175423,-0.000271636602264,-0.000273553532759,-0.000275447702523,-0.000277320445532,-0.000279177185131,-0.00028102050523,-0.000282850456382,-0.000284669765058,-0.000286478371968,-0.000288277145395,-0.000290066795653,-0.000291852471377,-0.000293633802853,-0.000295410451994,-0.0002971797664,-0.00029893798148,-0.000300685470094,-0.000302421426345,-0.000304142886639,-0.000305848599641,-0.000307538730595,-0.000309210432675,-0.000310861149205,-0.000312491073035,-0.000314100535518,-0.000315688823288,-0.000317256099221,-0.000318802081228,-0.000320328063677,-0.000321835464718,-0.000323323742704,-0.000324790999697,-0.000326238685064,-0.00032766478751,-0.00032906726908,-0.000330448641473,-0.00033181038889,-0.000333151492391,-0.000334470623493,-0.000335765445224,-0.000337033607069,-0.000338275539145,-0.000339491165179,-0.000340680813711,-0.000341848537249,-0.000342994704093,-0.000344115877238,-0.000345211400556,-0.000346282497082,-0.000347332562149,-0.000348363853273,-0.000349379038667,-0.000350377618644,-0.000351360767001,-0.000352326520419,-0.000353271277612,-0.000354194893805,-0.000355098357157,-0.000355982801225,-0.0003568440811,-0.000357679996009,-0.000358488426555,-0.000359270728726,-0.000360026649581,-0.000360756933004,-0.000361463070308,-0.000362147868226,-0.000362814244778,-0.00036346035994,-0.000364086579129,-0.000364696266978,-0.000365289417685,-0.00036586651473,-0.000366426951692,-0.000366971676223,-0.000367498144605,-0.000368006392403,-0.000368494276336,-0.000368959840355,-0.000369404002455,-0.000369825024947,-0.000370224910033,-0.000370578089033,-0.000370861685616,-0.000371074457424,-0.000371216746354,-0.000371288369246)
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(191)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('HUDEP2-BCL11A-ER-V5-Rep1-GSM2771529/SRR5164417.1x36mers.hg19.unique.MACS2_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) : 191',bty='n')
dev.off()