# R script for Peak Model
#  -- generated by MACS
p <- c(0.02759751732,0.0318315735093,0.0369185331036,0.0415790409954,0.0460263230359,0.0463918530667,0.0465136964103,0.0464832355744,0.0460567838718,0.0464832355744,0.0460567838718,0.0458130971847,0.0456607930052,0.0458740188565,0.0461177055436,0.0449601937797,0.045142958795,0.0454780279899,0.0463309313949,0.0467269222615,0.0469401481128,0.0478235123537,0.0473970606512,0.0468487656051,0.0472752173076,0.0482804248921,0.0483413465639,0.0484631899075,0.0483718073998,0.0474884431589,0.0478844340255,0.0479148948614,0.0477625906819,0.0476407473383,0.0473056781435,0.0474884431589,0.047153373964,0.0468487656051,0.0468487656051,0.0470315306205,0.046574618082,0.0456912538411,0.0459044796924,0.0465441572461,0.0463309313949,0.0461177055436,0.0461481663795,0.0459958622001,0.0464832355744,0.046879226441,0.0470010697846,0.0478235123537,0.0482804248921,0.0479758165332,0.0481281207126,0.0481585815485,0.0484022682357,0.0489810241177,0.0486154940869,0.0491942499689,0.0493465541484,0.0489810241177,0.0489810241177,0.0494379366561,0.0491942499689,0.049163789133,0.0492551716407,0.0489505632818,0.0487373374305,0.0476102865024,0.0471838347999,0.0481585815485,0.0475493648306,0.0478235123537,0.0483718073998,0.0485241115793,0.0486764157587,0.04888964161,0.0489201024459,0.0487982591023,0.0490724066254,0.0487677982664,0.0487677982664,0.0482804248921,0.0483413465639,0.048310885728,0.0483413465639,0.04888964161,0.0491942499689,0.0501385358816,0.0500776142099,0.0496511625073,0.0506868309277,0.0506868309277,0.049742545015,0.0496207016714,0.0493160933125,0.0486459549228,0.0486154940869,0.0482499640562,0.0483413465639,0.0482804248921,0.0477016690101,0.0480062773691,0.0482499640562,0.0484631899075,0.0481281207126,0.0484022682357,0.0482804248921,0.0484327290716,0.0482804248921,0.0485545724152,0.0488591807741,0.0486154940869,0.0497730058509,0.0491333282971,0.049468397492,0.0499253100304,0.0499862317022,0.0496511625073,0.0499253100304,0.050321300897,0.0499862317022,0.0492247108048,0.0491028674612,0.0497120841791,0.0492551716407,0.0487677982664,0.0489505632818,0.0494379366561,0.0496207016714,0.0493465541484,0.0496511625073,0.0504736050765,0.0501689967175,0.0505649875842,0.0516615776763,0.0512655868097,0.0511132826303,0.0511132826303,0.0513874301533,0.0512960476456,0.0516615776763,0.0518748035276,0.0519661860353,0.0520880293789,0.0511132826303,0.0518138818558,0.0523012552301,0.0525449419173,0.0522707943942,0.052636324425,0.0521184902148,0.0523012552301,0.0519661860353,0.0515092734969,0.052331716066,0.0522403335583,0.0514483518251,0.0512351259738,0.0509914392867,0.0511437434662,0.0513265084815,0.0509914392867,0.0516920385122,0.0522098727224,0.0525449419173,0.052636324425,0.0529409327839,0.0533369236505,0.0535196886659,0.0534283061582,0.0533978453223,0.0531846194711,0.0535501495018,0.0533978453223,0.0536415320095,0.0538852186966,0.0538242970248,0.0531846194711,0.0535806103377,0.0540375228761,0.0545858179222,0.0552864171477,0.0548295046093,0.0548295046093,0.0537329145171,0.0545553570863,0.0556824080144,0.0562916247322,0.0567789981066,0.0568094589424,0.0561697813887,0.0558042513579,0.0561393205528,0.0562002422246,0.0569617631219,0.0556824080144,0.0550427304606,0.055225495476,0.0545858179222,0.0537024536813,0.0545553570863,0.0545553570863,0.0537938361889,0.0539766012043,0.0543116703991,0.0552559563119,0.0552559563119,0.054342131235,0.0547381221017,0.0559565555374,0.0554082604913,0.056078398881,0.0564134680758,0.056657154763,0.0562916247322,0.0558651730297,0.0562916247322,0.056931302286,0.0566266939271,0.0559565555374,0.0562002422246,0.0559565555374,0.0558347121938,0.056078398881,0.0568399197783,0.0572663714809,0.0571749889732,0.0572054498091,0.0577232840193,0.0577232840193,0.05808881405,0.0590635607986,0.0596423166806,0.0596423166806,0.0590330999627,0.0590330999627,0.0587589524397,0.0593377083217,0.059520473337,0.0596118558447,0.0599164642036,0.0591854041422,0.0591854041422,0.058941717455,0.0597336991883,0.0596727775165,0.0604038375779,0.0610435151317,0.0609216717881,0.0613785843266,0.0610435151317,0.0607389067728,0.0611653584753,0.061835496865,0.0613481234907,0.0611958193112,0.061256740983,0.0611348976394,0.0615004276701,0.0615918101778,0.0615918101778,0.0627188611059,0.0627188611059,0.063267156152,0.0638154511981,0.0647901979467,0.0649729629621,0.065277571321,0.0656735621876,0.066435083085,0.06728798649,0.0674098298336,0.0680495073874,0.0677144381925,0.0676230556848,0.0674098298336,0.0674098298336,0.0674098298336,0.0676535165207,0.0670442998029,0.0671356823105,0.066709230608,0.0671966039823,0.0674707515054,0.0683845765822,0.0689328716283,0.0686891849411,0.0688414891206,0.0688719499565,0.0700599225564,0.070730060946,0.0720703377254,0.0715220426793,0.071613425187,0.0712783559921,0.0717657293664,0.0729841628022,0.0729841628022,0.0741112137303,0.0742635179098,0.0740502920585,0.0738675270431,0.0743549004174,0.0746290479405,0.0752991863302,0.0756647163609,0.075634255525,0.0763653155864,0.0758779422121,0.0759693247198,0.0763043939147,0.0763348547506,0.076213011407,0.0769745323043,0.0767003847813,0.0768526889607,0.0765785414377,0.0764566980941,0.0766090022736,0.0764566980941,0.0772486798274,0.077918818217,0.0789240258015,0.0792895558323,0.0801119984014,0.0801424592373,0.0813608926731,0.0820614918986,0.0831885428267,0.0831885428267,0.0833408470062,0.0834322295139,0.083675916201,0.0845897412778,0.0854731055188,0.0859300180572,0.0858081747136,0.086569695611,0.0861737047443,0.0879708940621,0.0881536590775,0.0889761016466,0.0899203875593,0.0898290050516,0.0897680833798,0.0909865168156,0.0918698810565,0.0920526460719,0.0935756878666,0.0934843053589,0.0938498353896,0.0938802962255,0.0947027387947,0.0948245821383,0.0949768863177,0.0950378079895,0.0966826931278,0.0968349973073,0.0966522322919,0.0971700665021,0.0975965182046,0.0985408041173,0.0979315873994,0.0977183615482,0.0983884999379,0.0978706657277,0.097474674861,0.098053430743,0.0985408041173,0.0986017257891,0.0996373942095,0.100094306748,0.101069053497,0.102470251948,0.102500712784,0.103505920368,0.104267441265,0.105424953029,0.106095091419,0.107130759839,0.107404907363,0.107739976557,0.107557211542,0.107313524855,0.108927949157,0.109811313398,0.110450990952,0.110603295131,0.111151590177,0.11224818027,0.113375231198,0.113679839557,0.115446568039,0.116421314787,0.116208088936,0.116543158131,0.116238549772,0.117761591566,0.118492651628,0.118066199925,0.11891910333,0.119528320048,0.120289840946,0.120929518499,0.121721500233,0.123335924535,0.124554357971,0.12434113212,0.125986017258,0.127996432427,0.128209658278,0.129123483355,0.129245326699,0.129915465088,0.131103437688,0.131560350227,0.131408046047,0.132748322826,0.132535096975,0.133662147903,0.13509380719,0.137652517405,0.139206020036,0.141064131025,0.141825651923,0.142343486133,0.143805606256,0.144384362138,0.144719431333,0.144201597123,0.144658509661,0.145206804707,0.144536666317,0.145663717245,0.146242473127,0.147217219876,0.148435653312,0.150141460122,0.15230417947,0.15349215207,0.154314594639,0.154101368788,0.156325009808,0.156599157331,0.157848051603,0.159919388444,0.161442430239,0.161960264449,0.162660863674,0.163178697885,0.163300541228,0.165250034725,0.166011555623,0.166864459028,0.168326579151,0.168813952525,0.169819160109,0.170611141843,0.171342201904,0.172895704535,0.174967041376,0.17597224896,0.177556212427,0.179140175893,0.179414323416,0.179993079298,0.180967826047,0.182734554529,0.184013909636,0.18532372558,0.186389854836,0.187303679913,0.188430730841,0.189862390128,0.191446353594,0.192634326194,0.194187828825,0.195162575573,0.195985018142,0.196441930681,0.198147737491,0.199000640896,0.199335710091,0.20000584848,0.201711655291,0.203143314578,0.203173775413,0.203965757147,0.205610642285,0.208138891664,0.208413039187,0.209235481756,0.210758523551,0.212068339495,0.21343907711,0.213713224633,0.214870736397,0.215327648935,0.215693178966,0.215875943981,0.216789769058,0.217855898314,0.219439861781,0.219927235155,0.220079539335,0.220871521068,0.221237051099,0.222821014565,0.223582535463,0.223978526329,0.22434405636,0.224283134688,0.223552074627,0.224161291344,0.224313595524,0.225562489796,0.226963688247,0.227511983293,0.227451061621,0.228578112549,0.230070693508,0.231806961154,0.232416177872,0.232294334528,0.232416177872,0.233055855426,0.233634611308,0.23339092462,0.2347312014,0.235279496446,0.234243828025,0.233604150472,0.234670279728,0.235705948148,0.235827791492,0.236010556507,0.235431800625,0.235401339789,0.234792123072,0.23457889722,0.234700740564,0.234000141338,0.233269081277,0.233177698769,0.232751247067,0.23131958778,0.230466684375,0.228913181744,0.228364886698,0.227390139949,0.22672000156,0.226933227411,0.226324010693,0.225136038093,0.225440646452,0.223978526329,0.224283134688,0.224618203883,0.224100369673,0.224435438868,0.224130830509,0.222394562863,0.22129797277,0.220505991037,0.218526036704,0.217947280822,0.216393778192,0.215601796458,0.21462704971,0.212190182838,0.210453915192,0.209722855131,0.207956126649,0.206859536557,0.206219859003,0.205854328972,0.203782992131,0.202564558696,0.201894420306,0.201132899409,0.200706447706,0.199792622629,0.198665571701,0.197203451578,0.195467183932,0.194553358855,0.194736123871,0.193517690435,0.191568196938,0.190197459323,0.189405477589,0.188430730841,0.187943357466,0.186816306538,0.185872020626,0.183770222949,0.182003494467,0.179109715057,0.176733769857,0.175332571406,0.172225566145,0.170428376827,0.168783491689,0.165859251443,0.164001140454,0.162143029464,0.159218789218,0.158152659962,0.156355470644,0.153553073742,0.151725423588,0.149928234271,0.147034454861,0.14563325641,0.144536666317,0.143561919569,0.143561919569,0.141277356877,0.139358324215,0.138261734123,0.136921457344,0.135215650534,0.134119060442,0.132961548678,0.13049422097,0.127905049919,0.125590026391,0.124493436299,0.123427307043,0.122117491099,0.120167997602,0.118675416643,0.117426522372,0.116390853951,0.115263803023,0.11431951711,0.113040162003,0.111608502716,0.110846981819,0.109659009219,0.109384861696,0.107861819901,0.107161220675,0.105516335537,0.104419745445,0.103262233681,0.101373661855,0.101069053497,0.100063845912,0.0991195599993,0.0984798824455,0.0978097440559,0.0964999281124,0.0968349973073,0.0961343980817,0.0964694672765,0.0961953197535,0.0952205730049,0.0949464254818,0.0936366095384,0.0921744894155,0.0922354110873,0.0914738901899,0.0894634750209,0.0884582674364,0.0871789123288,0.086843843134,0.0866915389545,0.0861432439084,0.0862346264161,0.0857167922059,0.0843765154266,0.0845288196061,0.0841632895753,0.0845288196061,0.0841632895753,0.0833713078421,0.082518404437,0.0820919527345,0.0812085884936,0.0814522751808,0.0813608926731,0.0802643025809,0.0799901550578,0.0788631041298,0.0784671132631,0.0779797398888,0.0777665140376,0.0773096014992,0.0774923665145,0.0770049931402,0.0767308456172,0.0762739330788,0.0755428730173,0.0747508912841,0.0739893703867,0.073623840356,0.073045084474,0.0723140244125,0.0719484943818,0.0714001993357,0.0708823651255,0.0706082176025,0.0717657293664,0.072192181069,0.0722531027407,0.0722226419049,0.0721617202331,0.072466328592,0.0715525035152,0.0715525035152,0.0708519042896,0.0709128259614,0.0701817658999,0.069877157541,0.0696334708539,0.0697553141974,0.0696639316897,0.0691460974795,0.069298401659,0.0689024107924,0.0690547149719,0.0686282632693,0.0682627332386,0.0679885857156,0.068140889895,0.0681104290592,0.0676839773566,0.0670747606388,0.0669833781311,0.0668006131157,0.0667396914439,0.0666178481003,0.0657344838594,0.0652471104851,0.0649729629621,0.0643332854083,0.0640286770493,0.0650338846338,0.0646683546031,0.0645465112595,0.0645769720954,0.0647901979467,0.0648511196185,0.0648511196185,0.0646378937672,0.0646378937672,0.0649729629621,0.0643028245724,0.0639068337058,0.0636022253468,0.0633585386597,0.0629930086289,0.0628407044495,0.0629320869572,0.062414252747,0.0628102436136,0.0627493219418,0.0619878010444,0.0623228702393,0.0625360960905,0.0626579394341,0.0629930086289,0.0629320869572,0.0627493219418,0.0623533310752,0.0621401052239,0.0620487227162,0.0618050360291,0.0613481234907,0.0613785843266,0.0614090451625,0.0607389067728,0.060677985101,0.0607998284446,0.0614699668342,0.060677985101,0.0599773858754,0.0597032383524,0.0596118558447,0.0591244824704,0.0589721782909,0.058941717455,0.0591549433063,0.0588198741115,0.0579060490346,0.0576319015116,0.0581497357218,0.0586980307679,0.0589721782909,0.0586980307679,0.0577232840193,0.0579365098705,0.0584543440807,0.0587589524397,0.0587894132756,0.0593377083217,0.0593072474858,0.0587589524397,0.0587894132756,0.058941717455,0.0591244824704,0.0593377083217,0.0587284916038,0.0587894132756,0.0585152657525,0.0581497357218,0.0576928231834,0.0575405190039,0.0573272931526,0.0576319015116,0.0575405190039,0.0569922239578,0.0569617631219,0.0565962330912,0.0568399197783,0.0573272931526,0.057814666527,0.0582715790654,0.0576319015116,0.0572968323168,0.056931302286,0.0565962330912,0.0567180764348,0.0564134680758,0.0560174772092,0.0554082604913,0.0550122696247,0.0547990437734,0.055225495476,0.0549513479529,0.0549513479529,0.0553777996554,0.0546772004299,0.0547381221017,0.0550122696247,0.0548904262811,0.0540375228761,0.0537329145171,0.0533673844864,0.0527886286044,0.0530627761275,0.0515397343328,0.0518748035276,0.0511132826303,0.0509914392867,0.0506868309277,0.0511132826303,0.0514178909892,0.0519052643635,0.0519661860353,0.051478812661,0.0522098727224,0.051478812661,0.0518748035276,0.0516920385122,0.0519357251994,0.0514483518251,0.0513265084815,0.0504431442406,0.0505954484201,0.0514178909892,0.0512351259738,0.0512046651379,0.0515397343328,0.0518138818558,0.0517834210199,0.0518138818558,0.0513874301533,0.0517224993481,0.0520880293789,0.0509305176149,0.0516006560046,0.0519052643635,0.0512960476456,0.0513569693174,0.0508391351072,0.051174204302,0.0516006560046,0.0511437434662,0.0507477525995,0.0509609784508,0.0504736050765,0.0498034666868,0.0502603792252,0.0490114849536,0.0494988583279,0.0491028674612,0.0493465541484,0.0495597799997,0.0495597799997,0.049468397492,0.0496816233432,0.0499557708663,0.0498034666868,0.0509305176149,0.050321300897,0.0504431442406,0.0494074758202,0.0494988583279,0.0493160933125,0.0498948491945,0.0495902408356,0.0496207016714,0.0492551716407,0.04888964161,0.049163789133,0.0488591807741,0.0482499640562,0.0484327290716,0.0486459549228,0.0477016690101,0.0472447564717,0.0466964614256,0.0466660005897,0.0463918530667,0.0459349405283,0.0465441572461,0.0480976598767,0.0472752173076,0.0472752173076,0.0473361389794,0.0479453556973,0.0489810241177,0.049742545015,0.0496511625073,0.0498948491945,0.0497120841791,0.049468397492,0.0498034666868,0.0490114849536,0.0499557708663,0.0499253100304,0.0496511625073,0.0491942499689,0.0494379366561,0.0497120841791,0.0491028674612,0.0483718073998,0.0484631899075,0.0493770149843,0.0486154940869,0.0479453556973,0.047457982323,0.0470619914563,0.0469096872769,0.0469096872769,0.0474275214871,0.0481585815485,0.0477625906819,0.0475798256665,0.0484327290716,0.0486764157587,0.0493770149843,0.0495293191638,0.0495902408356,0.0494074758202,0.0484936507434,0.0477930515178,0.0474884431589,0.0471838347999,0.046574618082,0.0470315306205,0.0464527747385,0.0470619914563,0.0468183047692,0.0467269222615,0.0470924522922,0.0468183047692,0.0478235123537,0.047457982323,0.0464223139026,0.0456912538411,0.0456607930052,0.0448383504361,0.0446860462566,0.0447469679284,0.0452648021386,0.0455694104975,0.0452038804668,0.0458130971847,0.0469401481128,0.0477016690101,0.0474884431589,0.047457982323,0.0477016690101,0.0476712081742,0.047457982323,0.0474275214871,0.0479453556973,0.0473665998153,0.0472447564717,0.0463918530667,0.0464223139026,0.0469096872769,0.0466050789179,0.0465441572461,0.0460567838718,0.0461177055436,0.0452648021386,0.0456607930052,0.0456607930052,0.0459654013642,0.0458130971847,0.0449297329438,0.0449601937797,0.0444728204053,0.0445946637489,0.0445337420771,0.0446860462566,0.0444423595695,0.0438940645234,0.0434066911491,0.0432543869696,0.04429005539,0.0447165070925,0.0452038804668,0.0450515762873,0.0447469679284,0.0445032812412,0.0443509770618,0.0438636036875,0.0443814378977,0.0449906546155,0.0444118987336,0.0437417603439,0.0436808386721,0.0441682120464,0.0447165070925,0.044564202913,0.0444118987336,0.0450515762873,0.044868811272,0.044564202913,0.0444728204053,0.0448078896002,0.0452648021386,0.0450820371232,0.0443509770618,0.0446555854207,0.0452038804668,0.0450211154514,0.0452343413027,0.0449297329438,0.0448992721079,0.0455694104975,0.0448992721079,0.0446555854207,0.0447774287643,0.0441682120464,0.0435894561644,0.0441682120464,0.0436808386721,0.0435894561644,0.0439245253593,0.0429802394465,0.0424928660722,0.0427365527594,0.0431020827901,0.043711299508,0.0437722211798,0.043132543626,0.043132543626,0.042858396103,0.0424319444004,0.0427974744312,0.0440159078669,0.0435285344926,0.0433457694773,0.0432239261337,0.0432543869696,0.0432239261337,0.0434980736567,0.043711299508,0.0433762303132,0.0427670135953,0.0420664143697,0.042279640221,0.0422187185492,0.0422187185492,0.0424014835646,0.0427365527594,0.0424624052363,0.0428888569389,0.0430411611183,0.0435894561644,0.0437722211798,0.0436199170003,0.0434676128208,0.0437417603439,0.0436503778362,0.0432239261337,0.0431020827901,0.0424624052363,0.0428279352671,0.0423710227287,0.0422187185492,0.0420968752056,0.0422187185492,0.0420359535338,0.0416704235031,0.0416704235031,0.0420359535338,0.0428279352671,0.0424319444004,0.0427670135953,0.0420359535338,0.0421273360415,0.0423405618928,0.042279640221,0.0417618060108,0.0421882577133,0.0417922668467,0.0409089026057,0.040847980934,0.0404824509032,0.040543372575,0.0407870592622,0.040847980934,0.0403301467238,0.0412135109647,0.0413048934724,0.0418227276826,0.042553787744,0.0429497786106,0.0431020827901,0.0437722211798,0.0436503778362,0.0433762303132,0.0443814378977,0.0444423595695,0.0440159078669,0.0440768295387,0.0440159078669,0.0437417603439,0.0435894561644,0.0435285344926,0.0431630044619,0.0429802394465,0.0421577968774,0.041700884339,0.0415790409954,0.0416095018313,0.0406042942468,0.0401778425443,0.0402387642161,0.0399950775289,0.0396600083341,0.0395381649905,0.0393553999751,0.0399950775289,0.0403301467238,0.0399341558571,0.0410307459493,0.041700884339,0.0417313451749,0.0420968752056,0.0436503778362,0.043711299508,0.0435285344926,0.0435285344926,0.043985447031,0.043711299508,0.0435589953285,0.0430107002824,0.0432543869696,0.0434676128208,0.0427974744312,0.0427670135953,0.0432848478055,0.0432239261337,0.0427670135953,0.0430411611183,0.0430107002824,0.0433153086414,0.0432848478055,0.0430107002824,0.042279640221,0.0426756310876,0.0424014835646,0.0420054926979,0.0416095018313,0.0413353543083,0.0413048934724,0.0412744326365,0.0414267368159,0.041122128457,0.0416399626672,0.0413658151442,0.041122128457,0.0408784417698,0.041122128457,0.0411525892929,0.0410002851134,0.0405738334109,0.0401473817084,0.0399341558571,0.0397818516777,0.0398427733494,0.0402996858879,0.0400255383648,0.0398427733494,0.0400255383648,0.0396295474982,0.0358524038473,0.0318315735093,0.027902125679,0.023881295341,0.0)
m <- c(0.0247524080018,0.0289180571533,0.0330837063048,0.0367965675051,0.0408716590664,0.0409622166566,0.0411131459737,0.0413244470176,0.041565933925,0.0412338894274,0.041565933925,0.0416564915152,0.0415055621981,0.0423809522372,0.0425318815543,0.0425620674177,0.0426828108714,0.0426828108714,0.042441323964,0.0427129967348,0.0425318815543,0.0428941119153,0.0432563422763,0.042803554325,0.0428941119153,0.0428941119153,0.0426828108714,0.0430752270958,0.0431054129592,0.0432261564129,0.0431355988226,0.0428639260519,0.0429242977787,0.043528015047,0.0442222899056,0.0444034050861,0.0446750778569,0.0445845202666,0.0447052637203,0.0447354495837,0.0451278658081,0.0455806537594,0.0454599103057,0.0448561930374,0.044463776813,0.044463776813,0.0446147061301,0.0445845202666,0.0450674940813,0.0452184233984,0.0450071223545,0.0449467506276,0.0447354495837,0.0446147061301,0.0446750778569,0.0446147061301,0.0444034050861,0.044101546452,0.0432865281397,0.0425318815543,0.0425016956909,0.0418677925591,0.0418376066957,0.0420187218762,0.041928164286,0.0415055621981,0.0412640752908,0.0419583501494,0.0424715098275,0.0426224391445,0.0429544836421,0.0436487585007,0.0440713605886,0.0434072715934,0.0429242977787,0.043165784686,0.0432865281397,0.0426828108714,0.0427733684616,0.0430450412324,0.0425922532811,0.0425318815543,0.0425016956909,0.043165784686,0.0437091302276,0.0431355988226,0.0429544836421,0.042803554325,0.0428337401885,0.0429242977787,0.0438298736812,0.043739316091,0.0436789443641,0.0437695019544,0.0431054129592,0.0436487585007,0.0438600595446,0.0443128474959,0.0439506171349,0.0438902454081,0.04337708573,0.0429846695055,0.0433167140031,0.0434978291836,0.0438298736812,0.0433167140031,0.0439506171349,0.0434978291836,0.0436185726373,0.0436789443641,0.0437695019544,0.0438298736812,0.0433468998665,0.0431959705495,0.0433167140031,0.0434978291836,0.0429544836421,0.0434072715934,0.043165784686,0.0436789443641,0.0432865281397,0.0437091302276,0.044101546452,0.0446448919935,0.0442826616325,0.044463776813,0.0442524757691,0.044101546452,0.0445845202666,0.0445543344032,0.0453089809886,0.0456712113496,0.0455806537594,0.0449769364911,0.0454599103057,0.0456712113496,0.0467277165692,0.0470597610668,0.0467880882961,0.0464258579351,0.0460636275741,0.0452787951252,0.0452184233984,0.0452486092618,0.0448863789008,0.0452184233984,0.0445543344032,0.0444034050861,0.0445543344032,0.0450976799447,0.0447656354471,0.0452184233984,0.0463353003448,0.0463956720716,0.0464560437985,0.0465164155253,0.0469692034766,0.04699938934,0.0468484600229,0.0461239993009,0.0464258579351,0.0463051144814,0.0453391668521,0.0453693527155,0.0458825123936,0.0463956720716,0.0464258579351,0.0464560437985,0.0475427348815,0.0478445935157,0.048086080423,0.0482671956035,0.047723850062,0.0476936641986,0.0476332924717,0.0470295752034,0.0468484600229,0.0466673448424,0.0461541851643,0.0459730699838,0.0455202820326,0.0453089809886,0.0460334417106,0.0463051144814,0.0459730699838,0.0463353003448,0.0464258579351,0.0460636275741,0.0458825123936,0.0463051144814,0.0465466013887,0.0463353003448,0.0461239993009,0.0463956720716,0.0469692034766,0.046637158979,0.0460636275741,0.0466069731156,0.0467880882961,0.0464862296619,0.0461843710277,0.0465767872521,0.0465466013887,0.0464560437985,0.0465164155253,0.0467277165692,0.0473012479742,0.0478144076522,0.0479351511059,0.0485992401011,0.0496255594572,0.0498670463646,0.0500481615451,0.0499576039548,0.0497463029109,0.0495048160036,0.0497463029109,0.0496255594572,0.0498066746377,0.0497463029109,0.0498368605012,0.0490822139157,0.0493538866865,0.0488407270084,0.0489614704621,0.0491425856426,0.0490520280523,0.0484784966474,0.048086080423,0.0476332924717,0.0476634783352,0.0486897976913,0.0483577531937,0.049172771506,0.0487803552816,0.0490520280523,0.0489312845987,0.0489312845987,0.0492935149597,0.049535001867,0.0492029573694,0.0487803552816,0.0485388683742,0.0480257086962,0.0488709128718,0.0482973814669,0.0480257086962,0.0488407270084,0.0486596118279,0.0487803552816,0.0485690542377,0.0482973814669,0.0481766380132,0.0486596118279,0.0480558945596,0.0482973814669,0.0481464521498,0.0478445935157,0.0476634783352,0.0475729207449,0.0477540359254,0.0480558945596,0.0487199835547,0.0485086825108,0.0492331432328,0.0495953735938,0.0496859311841,0.0490218421889,0.0488407270084,0.0488407270084,0.0490520280523,0.0491123997792,0.0495048160036,0.0496557453207,0.0492935149597,0.0491425856426,0.0496557453207,0.0504103919061,0.0504405777695,0.0506820646768,0.0508631798573,0.0503802060427,0.0497463029109,0.0497463029109,0.0498066746377,0.0500783474085,0.0501085332719,0.0496255594572,0.0500481615451,0.0499274180914,0.0491123997792,0.0498066746377,0.0499576039548,0.0501085332719,0.0499877898182,0.0499877898182,0.0494142584133,0.0496859311841,0.0494142584133,0.0489614704621,0.0494444442767,0.0491123997792,0.0486294259645,0.0487501694182,0.0495651877304,0.0495651877304,0.0505311353598,0.0505009494963,0.0504405777695,0.0510141091744,0.0517385698964,0.0517385698964,0.0526743316623,0.052070614394,0.0512254102183,0.0507726222671,0.0502896484524,0.0499877898182,0.0500481615451,0.0497463029109,0.0500481615451,0.0498670463646,0.0498066746377,0.0501990908622,0.0505613212232,0.0503802060427,0.0505915070866,0.050983923311,0.0510141091744,0.050983923311,0.0499576039548,0.0502896484524,0.0500179756817,0.0499576039548,0.0497764887743,0.0498670463646,0.0496255594572,0.0496859311841,0.0498670463646,0.0501990908622,0.0501085332719,0.0502292767256,0.0505009494963,0.0510141091744,0.0508933657208,0.0515272688525,0.0518894992135,0.0511952243549,0.0510141091744,0.0509235515842,0.0512857819452,0.0518291274867,0.0514065253988,0.0516781981696,0.0515272688525,0.0514065253988,0.0510442950378,0.0516178264428,0.052432844755,0.0527648892526,0.0530365620233,0.0524026588916,0.0526743316623,0.0526139599355,0.0527347033892,0.053519535838,0.0543345541503,0.0546665986479,0.0544854834674,0.0545458551942,0.0547873421015,0.0550590148723,0.0552401300528,0.0544552976039,0.0545458551942,0.0539119520624,0.0538213944722,0.054606226921,0.0543647400137,0.0549382714186,0.0545458551942,0.0550590148723,0.0551797583259,0.0558438473211,0.0557834755943,0.0559645907748,0.0562664494089,0.0553910593699,0.0558136614577,0.0555721745504,0.0557532897309,0.0558136614577,0.0563570069992,0.0557532897309,0.0562362635455,0.0563268211358,0.057141839448,0.0579568577603,0.0576549991261,0.0575946273993,0.0572323970383,0.0572022111749,0.0572022111749,0.058439831575,0.0587115043457,0.0581983446676,0.0572323970383,0.0567494232236,0.0572022111749,0.0572625829017,0.0576248132627,0.0576851849895,0.057141839448,0.0566588656334,0.0569607242675,0.05786630017,0.0578964860335,0.0580172294871,0.058228530531,0.0582587163945,0.058952991253,0.0588926195262,0.0593755933409,0.059677451975,0.0604924702873,0.0600094964726,0.0603113551068,0.0610358158288,0.0612471168727,0.061337674463,0.0612471168727,0.0618810200045,0.0620923210484,0.0616697189606,0.0605528420141,0.0615187896435,0.0610056299654,0.0617904624142,0.0621526927752,0.0617904624142,0.0615489755069,0.0614584179166,0.0615791613703,0.0630582686777,0.0633299414485,0.0629073393606,0.0640242163071,0.0632091979948,0.0635412424924,0.064597747712,0.0651712791169,0.0647788628925,0.0653523942974,0.0656240670682,0.0655335094779,0.0654429518877,0.0650203497998,0.0652316508437,0.0642657032144,0.0644770042583,0.0643864466681,0.0648996063462,0.0640242163071,0.0623338079557,0.0628469676338,0.0633601273119,0.0633601273119,0.0633903131753,0.0637827293997,0.0640845880339,0.0637223576729,0.0635714283558,0.0640845880339,0.064597747712,0.0646883053022,0.0647788628925,0.0657749963852,0.0659862974292,0.0668315016048,0.0670126167853,0.0677672633708,0.0679483785513,0.0682804230488,0.0680691220049,0.068944512044,0.0689143261806,0.0684313523659,0.0686728392733,0.0685520958196,0.0683709806391,0.0686124675464,0.0696086010392,0.070031203127,0.07111789421,0.0709367790295,0.0712688235271,0.0709669648929,0.0712688235271,0.071480124571,0.0716310538881,0.0719329125223,0.0715706821613,0.0719630983857,0.072204585293,0.0723555146101,0.0728686742882,0.0738648077809,0.0746798260932,0.0747703836835,0.0746798260932,0.0753439150884,0.0762193051275,0.076038189947,0.0767022789421,0.0767324648055,0.0772456244836,0.0773361820739,0.0773965538007,0.0774267396641,0.0788454752447,0.0789662186984,0.0790265904252,0.0795095642399,0.0799019804643,0.0802340249619,0.0800830956448,0.0804755118692,0.0812905301815,0.0813509019083,0.0811697867278,0.081471645362,0.0814112736352,0.0815320170888,0.0818640615864,0.0824375929913,0.0831318678499,0.0829809385328,0.0824979647182,0.0838261427085,0.0837355851182,0.0840374437524,0.0853052500159,0.0863617552355,0.0875993756356,0.0884143939479,0.0887766243089,0.0898935012553,0.0904066609334,0.0916442813335,0.0935158048653,0.0943308231776,0.0946326818117,0.0948137969922,0.0940591504068,0.0951458414898,0.0963230901631,0.0972890377924,0.097983312651,0.0981644278315,0.0986775875096,0.0998246503194,0.100669854495,0.101726359715,0.103024351842,0.103507325656,0.105197734008,0.105741079549,0.106978699949,0.107974833442,0.108035205169,0.108970966935,0.110238773198,0.111265092554,0.112291411911,0.112563084681,0.113740333355,0.11564204275,0.116940034877,0.117513566282,0.11944546154,0.120139736399,0.120622710214,0.122554605472,0.125090217999,0.126961741531,0.127867317434,0.129165309561,0.130734974458,0.13260649799,0.134206348751,0.135926942966,0.138100325132,0.140334079025,0.141481141835,0.144318612996,0.145707162713,0.148061660059,0.150506714996,0.153072513387,0.155245895553,0.157841879807,0.159954890246,0.162007528958,0.163728123173,0.165629832568,0.167199497466,0.167984329915,0.169916225173,0.171667005251,0.173327227739,0.173780015691,0.175259122998,0.175470424042,0.176949531349,0.177855107252,0.17942477215,0.181809455359,0.182111313994,0.183922465799,0.185461944833,0.188631460492,0.19056335575,0.192585808599,0.19409510177,0.195302536307,0.197475918473,0.198472051966,0.200524690678,0.201913240395,0.202818816298,0.203301790112,0.205173313644,0.206410934044,0.208101342396,0.209489892113,0.209972865927,0.211693460142,0.212266991547,0.212387735001,0.213987585762,0.214772418211,0.214470559576,0.215436507206,0.215798737567,0.217338216601,0.218847509772,0.218938067362,0.219632342221,0.219813457401,0.21936066945,0.219753085674,0.220296431216,0.220326617079,0.220205873626,0.220356802943,0.220930334348,0.221111449528,0.22192646784,0.223526318602,0.225005425909,0.225941187675,0.226997692894,0.228386242612,0.230076650963,0.229835164056,0.230589810641,0.230529438914,0.231887802768,0.231435014817,0.230891669275,0.230770925822,0.23155575827,0.232370776583,0.23270282108,0.232068917948,0.231646315861,0.232642449353,0.231857616905,0.23270282108,0.233034865578,0.234030999071,0.232914122124,0.231314271363,0.230257766143,0.23155575827,0.230891669275,0.230952041002,0.230710554095,0.229503119558,0.229110703334,0.228476800202,0.227903268797,0.228174941568,0.227239179802,0.225820444221,0.224703567275,0.223103716514,0.222590556836,0.222077397158,0.221262378845,0.219934200855,0.218998439089,0.217881562143,0.217277844874,0.21697598624,0.216674127606,0.216160967928,0.215285577889,0.215013905118,0.213987585762,0.212508478454,0.211602902552,0.20982193661,0.209761564883,0.209006918298,0.207799483761,0.206229818864,0.204539410512,0.203090489068,0.202215099029,0.201792496941,0.200705805858,0.200132274453,0.198170193331,0.19657034257,0.195815695985,0.195030863536,0.194638447312,0.193431012775,0.192646180326,0.19180097615,0.191861347877,0.19161986097,0.190985957838,0.19047279816,0.19056335575,0.18905406258,0.188782389809,0.188239044267,0.187122167321,0.185160086199,0.183530049574,0.181024622911,0.179998303554,0.179213471106,0.176858973759,0.176768416169,0.174413918822,0.1736894581,0.173236670149,0.172995183242,0.171274589027,0.17103310212,0.169282322042,0.167893772324,0.168618233046,0.167290055056,0.166716523651,0.164392212168,0.16273198968,0.160951023738,0.161162324782,0.160045447836,0.159985076109,0.158958756753,0.156453330089,0.154581806558,0.15292158407,0.152861212343,0.152227309211,0.152136751621,0.15071801604,0.150204856362,0.148544633874,0.147971102469,0.147125898294,0.147125898294,0.146673110342,0.146009021347,0.145133631308,0.144197869542,0.143171550186,0.141933929786,0.140696309386,0.138854971717,0.137949395815,0.137738094771,0.136772147142,0.13508173879,0.133964861844,0.132727241444,0.131731107951,0.130885903775,0.130885903775,0.130372744097,0.129678469239,0.128501220565,0.128108804341,0.127625830526,0.126629697034,0.126629697034,0.125573191814,0.125090217999,0.124818545229,0.124667615911,0.123460181375,0.122735720653,0.121377356799,0.121799958887,0.121679215433,0.119566204994,0.119113417043,0.118177655277,0.11678910556,0.115400555842,0.115098697208,0.115159068935,0.11582315793,0.114132749579,0.113468660584,0.113619589901,0.11343847472,0.113136616086,0.113196987813,0.112744199862,0.111989553276,0.110842490467,0.10981617111,0.109152082115,0.10839743553,0.108186134486,0.107401302037,0.106586283725,0.105409035052,0.104624202603,0.103175281159,0.102360262846,0.101303757627,0.0999453937731,0.0991605613242,0.0989190744169,0.0984662864657,0.0984059147388,0.098707773373,0.0983757288754,0.0987681450998,0.0991303754608,0.0986474016462,0.0995529775487,0.0987681450998,0.0978927550607,0.0974701529729,0.0963230901631,0.0950250980361,0.0945723100849,0.0941798938605,0.0931233886409,0.0928215300067,0.0918857682408,0.0914933520164,0.0910103782017,0.0901349881626,0.0898935012553,0.0899236871187,0.0898935012553,0.0888671818991,0.0880219777234,0.0867541714599,0.0855467369233,0.085093948972,0.085093948972,0.0852146924257,0.0844600458403,0.0837355851182,0.083282797167,0.0834639123475,0.0834337264841,0.0835544699377,0.0835544699377,0.0833431688938,0.0822866636742,0.0815018312254,0.0810490432742,0.0799925380546,0.0796001218301,0.0780606427959,0.0776078548446,0.0769739517129,0.0775776689812,0.0767324648055,0.0770041375763,0.0768833941226,0.0770343234397,0.0774267396641,0.0768833941226,0.0780002710691,0.0778191558886,0.0770041375763,0.0760683758104,0.0764607920348,0.076038189947,0.0758872606299,0.0755250302689,0.0748609412737,0.0744685250493,0.0738044360541,0.0735327632834,0.0739553653712,0.0739553653712,0.0735025774199,0.0733516481029,0.0731101611955,0.0721140277028,0.0721140277028,0.0721743994296,0.0712386376637,0.0702425041709,0.0697897162197,0.0691558130879,0.068220051322,0.0674654047366,0.0673446612829,0.0680691220049,0.0676465199171,0.0669522450585,0.0673144754195,0.0675257764634,0.0675257764634,0.0668918733317,0.0675861481903,0.0677068916439,0.0672541036927,0.0671635461024,0.0667107581512,0.0663485277902,0.0659561115657,0.0658353681121,0.0655335094779,0.0655335094779,0.0652920225706,0.0649297922096,0.0640544021705,0.0628771534972,0.0631790121314,0.0628167817704,0.0621526927752,0.0620319493216,0.0620017634581,0.0618508341411,0.0607339571946,0.0599793106092,0.0597378237019,0.059677451975,0.0586209467555,0.0588322477994,0.0591944781604,0.0596170802482,0.0592246640238,0.0583794598481,0.0583794598481,0.058228530531,0.058439831575,0.0585303891652,0.0594359650677,0.0592246640238,0.0588926195262,0.0575946273993,0.0575644415359,0.0580172294871,0.0585303891652,0.0592246640238,0.0591039205701,0.0591341064335,0.058952991253,0.0587416902091,0.0587416902091,0.0590737347067,0.0586813184823,0.058802061936,0.0586209467555,0.0577455567164,0.0572927687651,0.0567192373602,0.0567192373602,0.0570210959944,0.0572625829017,0.0572323970383,0.0574135122188,0.0578059284432,0.0572323970383,0.0575644415359,0.0579870436237,0.05786630017,0.0576248132627,0.0567494232236,0.0559344049114,0.0555721745504,0.0551495724625,0.0549080855552,0.0559645907748,0.0554816169601,0.0550590148723,0.0555118028235,0.0545458551942,0.0551495724625,0.0556325462772,0.0556023604138,0.0559344049114,0.0564475645894,0.0559645907748,0.0554514310967,0.0556627321406,0.0551495724625,0.0557532897309,0.055692918004,0.0554212452333,0.0555118028235,0.0553005017796,0.0543647400137,0.0538515803356,0.0544251117405,0.0542138106966,0.0547269703747,0.0547269703747,0.0548477138284,0.055692918004,0.0551797583259,0.0549080855552,0.0547269703747,0.0541534389698,0.0536704651551,0.0533082347941,0.0526441457989,0.0521913578477,0.051708384033,0.0512254102183,0.0512555960818,0.0513763395354,0.0513159678086,0.0515876405793,0.0510744809013,0.0511952243549,0.0512254102183,0.0511952243549,0.0514065253988,0.0503802060427,0.0500179756817,0.0498368605012,0.049535001867,0.0490520280523,0.0493237008231,0.0496255594572,0.0496859311841,0.0501387191353,0.0500481615451,0.0505009494963,0.0511952243549,0.0509537374476,0.0507726222671,0.0512555960818,0.0512254102183,0.0507424364037,0.0507726222671,0.0500179756817,0.0502292767256,0.0503500201792,0.0500481615451,0.0507726222671,0.0507122505403,0.0506518788134,0.0507424364037,0.0511348526281,0.0509537374476,0.0512857819452,0.05062169295,0.0505613212232,0.0504707636329,0.0499274180914,0.0499576039548,0.049535001867,0.050259462589,0.050259462589,0.0507424364037,0.0507122505403,0.0505311353598,0.0505915070866,0.0503500201792,0.0501387191353,0.0497764887743,0.0497764887743,0.0489010987352,0.0486596118279,0.0484181249206,0.0479049652425,0.0484784966474,0.0483577531937,0.0481162662864,0.0487199835547,0.0497764887743,0.0497764887743,0.0500481615451,0.0501387191353,0.0503198343158,0.0506518788134,0.0503500201792,0.0500481615451,0.0505311353598,0.0496255594572,0.0488407270084,0.0495048160036,0.0489916563255,0.0485388683742,0.0477842217888,0.0476936641986,0.0480558945596,0.0476634783352,0.0471201327937,0.0472106903839,0.0475729207449,0.0474521772912,0.0481162662864,0.0485388683742,0.0488407270084,0.0490218421889,0.0485086825108,0.0489916563255,0.0495651877304,0.0496859311841,0.0495953735938,0.0487803552816,0.0482973814669,0.0478144076522,0.0476031066083,0.0474823631547,0.0475729207449,0.0472408762473,0.0470295752034,0.0465466013887,0.0464560437985,0.0466069731156,0.0466673448424,0.0467579024326,0.0469390176131,0.0469390176131,0.0471201327937,0.0474521772912,0.0471805045205,0.0472710621107,0.0465164155253,0.04699938934,0.0468484600229,0.0470899469302,0.0472106903839,0.0470597610668,0.0469390176131,0.0466673448424,0.0464862296619,0.0468786458863,0.0473314338376,0.0474219914278,0.0475427348815,0.0468484600229,0.0467579024326,0.0465164155253,0.0459428841204,0.0460938134375,0.0465466013887,0.0463353003448,0.046274928618,0.045912698257,0.0460334417106,0.046274928618,0.0457919548033,0.0465767872521,0.0468484600229,0.0470295752034,0.0470295752034,0.0477842217888,0.0480257086962,0.0481766380132,0.0480558945596,0.0485690542377,0.0488407270084,0.0482068238767,0.0484784966474,0.0479955228327,0.0479049652425,0.047361619701,0.0475729207449,0.0469692034766,0.0467277165692,0.0464862296619,0.0465164155253,0.0461239993009,0.0456410254862,0.0452787951252,0.0450373082179,0.0454900961691,0.0453693527155,0.0457013972131,0.0459428841204,0.045912698257,0.0455202820326,0.0453089809886,0.045550467896,0.0459428841204,0.0413848187445,0.0362532219636,0.0313932979535,0.0268352325775,0.0)
ycorr <- c(1.88821550046e-05,1.86782023623e-05,1.8062143165e-05,1.70355095745e-05,1.55951102943e-05,1.37399069421e-05,1.14700858529e-05,9.17504167683e-06,6.85630538478e-06,4.51190030134e-06,2.14243982989e-06,-2.51925714305e-07,-2.67378201447e-06,-5.12026499423e-06,-7.58966071131e-06,-1.00797637253e-05,-1.25894517782e-05,-1.51195985149e-05,-1.76706271941e-05,-2.02412725406e-05,-2.28305015803e-05,-2.5438256052e-05,-2.80610851952e-05,-3.07015575157e-05,-3.33621489595e-05,-3.60417465986e-05,-3.87392504417e-05,-4.14541623027e-05,-4.41852031412e-05,-4.69349766432e-05,-4.97029977562e-05,-5.2487739891e-05,-5.52890631145e-05,-5.8105616066e-05,-6.09334320041e-05,-6.37710014093e-05,-6.6618238786e-05,-6.94723471946e-05,-7.23339605277e-05,-7.52010346533e-05,-7.80714476971e-05,-8.09476372383e-05,-8.38299028419e-05,-8.67192668775e-05,-8.96185967599e-05,-9.2529068196e-05,-9.54525278029e-05,-9.83923719801e-05,-0.00010134899628,-0.00010432154562,-0.000107308578365,-0.000110310928355,-0.000113325414187,-0.000116349067071,-0.000119379620528,-0.000122417960985,-0.000125463913015,-0.00012851522614,-0.000131567744124,-0.000134620834742,-0.000137673577478,-0.00014072435249,-0.000143773555222,-0.000146823755287,-0.000149877130587,-0.000152929124224,-0.000155975292971,-0.000159012953196,-0.000162043769003,-0.000165068190347,-0.000168088219992,-0.000171102482686,-0.000174109921146,-0.00017710609567,-0.000180087433725,-0.000183052963256,-0.000186007622412,-0.000188950429817,-0.000191879597669,-0.00019479133,-0.000197684272836,-0.00020055869823,-0.000203415562161,-0.000206257543835,-0.000209084591007,-0.000211896984626,-0.000214691901779,-0.000217468276968,-0.000220228723494,-0.000222976769538,-0.000225713192177,-0.000228437825493,-0.000231148466128,-0.000233842778705,-0.000236520014133,-0.000239181574544,-0.000241826424482,-0.000244457518788,-0.000247074496168,-0.000249675137489,-0.000252256036199,-0.000254814407141,-0.000257351021291,-0.000259866765344,-0.000262361521622,-0.000264834325043,-0.000267285272851,-0.000269714958841,-0.000272120399087,-0.000274500611834,-0.000276857467375,-0.000279194230006,-0.000281512022397,-0.000283810460519,-0.000286088488917,-0.000288348594121,-0.000290592306306,-0.000292817322851,-0.000295024321413,-0.000297215014136,-0.000299387261902,-0.000301541436428,-0.000303676419936,-0.000305791990389,-0.000307886678838,-0.000309958799389,-0.000312003510721,-0.000314021269286,-0.000316014186152,-0.000317980933606,-0.000319922348243,-0.000321837384487,-0.000323725668513,-0.000325586078601,-0.000327419868343,-0.000329228045392,-0.000331013540756,-0.000332777725078,-0.000334519667551,-0.000336240329357,-0.000337939804873,-0.000339617624498,-0.000341273493718,-0.000342907222298,-0.000344518872168,-0.000346110504611,-0.000347683005821,-0.000349235573017,-0.000350768116123,-0.000352277847411,-0.000353762627396,-0.000355221264687,-0.000356656293567,-0.000358072014019,-0.000359468765664,-0.000360844754238,-0.000362197594972,-0.000363525591402,-0.000364828715402,-0.000366109496764,-0.000367371943245,-0.000368618367455,-0.000369851637808,-0.000371068289716,-0.000372269223759,-0.000373453230697,-0.000374622015356,-0.000375774493296,-0.000376911779348,-0.000378033483445,-0.000379139485766,-0.000380227746308,-0.000381292866498,-0.000382334037852,-0.000383350898071,-0.000384343782225,-0.000385312799374,-0.000386261075692,-0.000387189990692,-0.000388099806851,-0.000388989413122,-0.000389860031446,-0.000390712755234,-0.000391550950748,-0.00039237478054,-0.000393182784949,-0.000393975137729,-0.000394752467523,-0.000395512500855,-0.000396254181681,-0.000396978619733,-0.000397685499529,-0.00039837585613,-0.000399050055735,-0.000399706792704,-0.000400347629383,-0.000400973529683,-0.000401583057767,-0.000402175362241,-0.000402752758259,-0.000403316889976,-0.000403868298114,-0.000404406308561,-0.000404928396232,-0.000405435402978,-0.00040592928811,-0.000406409716445,-0.000406879213041,-0.000407337589704,-0.000407783833028,-0.000408216303192,-0.000408634955339,-0.000409039688572,-0.000409433044359,-0.000409815576364,-0.000410185712676,-0.000410542178516,-0.000410883386503,-0.000411207841068,-0.000411515420854,-0.000411807223523,-0.00041208212741,-0.00041233904096,-0.000412577389056,-0.000412798393714,-0.000413002643228,-0.000413191782235,-0.000413369065247,-0.000413536535957,-0.000413695833517,-0.000413849046589,-0.0004139974331,-0.000414143487959,-0.000414286425741,-0.000414425714518,-0.000414560645483,-0.000414690083089,-0.000414810815571,-0.000414922109101,-0.000415023753003,-0.000415114417098,-0.000415193123585,-0.000415259577936,-0.000415313029079,-0.000415355908007,-0.000415387123601,-0.00041540679486,-0.00041541610021,-0.000415417118757,-0.000415408138718,-0.000415388883375,-0.000415357912105,-0.000415313074901,-0.000415255147649,-0.000415182759865,-0.000415097401557,-0.000415000121131,-0.000414890213682,-0.000414767290041,-0.000414632183217,-0.000414485022492,-0.00041432642114,-0.000414159362016,-0.00041398593507,-0.000413804776364,-0.000413615262961,-0.000413415099964,-0.000413203381651,-0.000412981030893,-0.000412746174779,-0.000412499504188,-0.000412240934623,-0.000411971311693,-0.000411688032966,-0.000411392645249,-0.000411086616696,-0.000410772512972,-0.000410452535212,-0.000410128124726,-0.000409801418617,-0.000409473058977,-0.000409141194202,-0.000408805890511,-0.000408467513706,-0.000408128012011,-0.00040778707713,-0.000407443757163,-0.000407096693553,-0.000406743978509,-0.00040638530005,-0.000406018284835,-0.000405645763418,-0.000405269663001,-0.000404890202696,-0.000404505618792,-0.000404114109625,-0.00040371324413,-0.000403303180255,-0.000402884843682,-0.000402457877539,-0.000402022414902,-0.000401578853424,-0.0004011238174,-0.000400655492109,-0.000400172979965,-0.000399677376226,-0.000399172249752,-0.000398658842462,-0.000398136321008,-0.000397604556211,-0.000397064431387,-0.000396516828942,-0.000395961005018,-0.000395400621143,-0.000394837594725,-0.000394272561513,-0.000393704933944,-0.000393132193738,-0.000392554351788,-0.000391972604644,-0.000391387621444,-0.000390798170167,-0.000390204657939,-0.000389606129369,-0.000389000019959,-0.00038838426654,-0.00038775788375,-0.000387121840824,-0.0003864753193,-0.000385817203261,-0.000385147555402,-0.000384466178242,-0.000383772903891,-0.000383065898285,-0.000382345807408,-0.000381613475785,-0.000380870998137,-0.000380119096172,-0.000379357922816,-0.000378590539044,-0.000377818169955,-0.000377039484024,-0.000376253257297,-0.000375461883608,-0.00037466613814,-0.000373867115899,-0.000373064313901,-0.000372257448436,-0.000371447318746,-0.000370630869572,-0.000369804712092,-0.000368969273702,-0.000368127511029,-0.000367280128887,-0.000366426839229,-0.000365567542676,-0.000364700931796,-0.000363827732855,-0.000362946548006,-0.000362058685276,-0.000361166105488,-0.000360269469041,-0.000359367532483,-0.000358458002418,-0.000357539400388,-0.000356610265579,-0.000355671063219,-0.000354722677639,-0.000353765485114,-0.000352799948493,-0.000351824806562,-0.000350839757896,-0.000349846831407,-0.000348845312281,-0.000347837654298,-0.000346825832502,-0.000345808729162,-0.000344786239173,-0.000343757225209,-0.000342720645584,-0.000341676490426,-0.000340624348531,-0.0003395631503,-0.000338494847711,-0.000337417939435,-0.000336329673887,-0.000335231533159,-0.000334122581539,-0.000333003825038,-0.000331875977379,-0.000330739126554,-0.000329594998322,-0.000328444962442,-0.000327287477478,-0.000326120125165,-0.000324947169064,-0.000323768588866,-0.000322584728379,-0.000321398962958,-0.000320209442433,-0.000319016079817,-0.00031781866195,-0.000316614928787,-0.00031540489715,-0.000314192345592,-0.000312975571602,-0.000311753153264,-0.000310524321112,-0.000309285815136,-0.00030803948272,-0.000306785627199,-0.000305524333831,-0.000304254820375,-0.000302975826896,-0.000301685174781,-0.000300380701637,-0.000299063785134,-0.000297734159734,-0.000296392692282,-0.00029503946379,-0.000293672150453,-0.000292291658794,-0.000290898073344,-0.000289493580554,-0.000288079237469,-0.000286656697328,-0.000285226129916,-0.000283786981777,-0.000282339631859,-0.000280882581586,-0.000279415713199,-0.000277938123625,-0.000276450256654,-0.000274951168933,-0.000273440957648,-0.00027192128635,-0.000270391952965,-0.000268855127258,-0.000267310903485,-0.000265758642028,-0.000264201928375,-0.000262640289711,-0.000261073540233,-0.000259502460329,-0.000257926869149,-0.000256345135062,-0.000254756514441,-0.000253158670898,-0.000251549867266,-0.000249931578413,-0.0002483036658,-0.000246666342641,-0.000245019676915,-0.000243363979857,-0.000241698335354,-0.000240024272506,-0.000238342023396,-0.000236652634668,-0.000234957074573,-0.000233254333725,-0.000231542358141,-0.000229821377301,-0.00022808939795,-0.000226346259734,-0.000224594060095,-0.000222831540074,-0.000221057939726,-0.000219272854135,-0.000217475617126,-0.000215667568946,-0.000213848331936,-0.000212017898442,-0.000210176608321,-0.000208325030707,-0.000206461678329,-0.000204584225484,-0.000202693782482,-0.000200789475973,-0.000198872512016,-0.000196941746474,-0.000194997056429,-0.000193039394107,-0.000191070852573,-0.000189090394497,-0.000187097739758,-0.000185095199772,-0.000183082456141,-0.000181059660852,-0.000179026089059,-0.000176980826387,-0.000174924914439,-0.000172855835568,-0.000170772710792,-0.000168675678035,-0.000166564199924,-0.000164437143695,-0.000162294170247,-0.000160135316845,-0.00015796144778,-0.000155772939247,-0.00015356888189,-0.00015134967632,-0.000149117348263,-0.000146870597577,-0.000144608810898,-0.000142333113305,-0.000140042615821,-0.000137737176345,-0.000135414840822,-0.000133074875662,-0.00013071872001,-0.000128346708613,-0.000125957489382,-0.000123549601477,-0.000121124635568,-0.000118680070939,-0.00011621524881,-0.000113731263978,-0.000111228208763,-0.0001087068582,-0.000106165499827,-0.000103601921531,-0.000101015787333,-9.84075094777e-05,-9.57765659968e-05,-9.31231995354e-05,-9.04498216939e-05,-8.77559485888e-05,-8.50415084249e-05,-8.23060864658e-05,-7.9549100946e-05,-7.67702950737e-05,-7.39685278237e-05,-7.11450559153e-05,-6.82987793549e-05,-6.543099283e-05,-6.25401396554e-05,-5.96242962356e-05,-5.66824720575e-05,-5.37133136907e-05,-5.07161557797e-05,-4.76930131506e-05,-4.46446312026e-05,-4.1571566479e-05,-3.84713340245e-05,-3.5342253263e-05,-3.21832790904e-05,-2.89940470552e-05,-2.57734835126e-05,-2.25230227374e-05,-1.9244461818e-05,-1.59368914595e-05,-1.25981893684e-05,-9.22650399312e-06,-5.82378697441e-06,-2.39135729703e-06,1.07103809908e-06,4.56189528156e-06,8.08037680499e-06,1.16262206925e-05,1.52011829314e-05,1.88049703129e-05,2.24370386525e-05,2.60968332203e-05,2.97844944459e-05,3.35015273254e-05,3.7247587837e-05,4.10230917107e-05,4.48292066938e-05,4.86671964615e-05,5.2538639278e-05,5.64443213336e-05,6.03853551293e-05,6.43627669789e-05,6.83777934083e-05,7.24301556628e-05,7.65204740104e-05,8.06516377838e-05,8.48229553361e-05,8.90354978987e-05,9.32870527612e-05,9.75760582376e-05,0.000101901634672,0.000106263741583,0.000110661298318,0.000115093234667,0.000119560509581,0.000124062609946,0.000128598099769,0.000133166517455,0.00013777597224,0.000142439729163,0.00014716880261,0.00015197273443,0.000156899138727,0.000161723016719,0.00016648586679,0.000171194113362,0.000175855143552,0.000180477393091,0.000185066658146,0.000189614782789,0.000194109310052,0.000198539634179,0.000202895313146,0.000207128487753,0.00021146391487,0.000215859465787,0.000220307995158,0.000224802087363,0.000229332848945,0.000233893866626,0.000238483877535,0.000243101769121,0.000247747390549,0.000252419944625,0.000257120022844,0.000261846419739,0.000266598691907,0.000271374871702,0.000276173683798,0.000280993841606,0.000285834624894,0.000290695610163,0.000295577197823,0.000300478393056,0.00030539734785,0.00031033383044,0.000315288846907,0.000320262813284,0.00032525516867,0.000330265202812,0.000335291422507,0.000340332994636,0.000345389244677,0.000350458530597,0.000355539626943,0.000360633862067,0.000365738218588,0.000370849133948,0.000375964966348,0.000381085208993,0.000386209870846,0.000391339406422,0.000396472841149,0.000401609138101,0.000406748589931,0.000411887813433,0.000417024371101,0.000422159117541,0.000427292168185,0.00043242015902,0.000437542321049,0.000442655279452,0.000447755551452,0.000452841975734,0.000457912691676,0.000462966086256,0.000468003970148,0.000473025296932,0.0004780277827,0.000483011432973,0.000487977382355,0.000492924146425,0.000497852000476,0.000502763662306,0.000507658490275,0.000512536574288,0.000517395530901,0.000522232600457,0.000527047913155,0.000531841568403,0.000536610546239,0.000541354488818,0.000546072703768,0.000550761048376,0.000555416810213,0.000560039213596,0.000564626412208,0.000569179557167,0.000573697462179,0.000578177104296,0.0005826159071,0.000587014259092,0.000591368461017,0.000595678881232,0.000599947541479,0.000604172502888,0.000608351481848,0.000612483004147,0.000616565355774,0.000620599859533,0.000624588031381,0.000628527776249,0.000632418692126,0.000636261164175,0.000640051399873,0.000643788061621,0.000647472448387,0.000651103657499,0.00065468164452,0.000658205062056,0.000661671265262,0.000665079120923,0.000668430431611,0.000671724220872,0.000674959650638,0.00067813677341,0.000681255383666,0.0006843145733,0.000687313538892,0.000690251747256,0.000693128844899,0.000695944987031,0.000698699748869,0.000701391224004,0.000704019631703,0.000706585959391,0.000709090863023,0.000711532888464,0.000713910756705,0.000716223556573,0.000718471187003,0.000720653224182,0.000722769231051,0.000724818800726,0.000726802642196,0.000728718158377,0.000730564076542,0.000732340666015,0.000734049709248,0.000735691692546,0.000737267175564,0.000738775284779,0.000740215292187,0.00074158680622,0.000742888474175,0.000744121669827,0.000745285408523,0.000746378047348,0.00074739887624,0.000748346734815,0.000749220662061,0.000750022233344,0.000750752250153,0.00075140978861,0.000751995069624,0.000752508958961,0.000752950407299,0.00075332343887,0.000753629067254,0.000753866925946,0.000754038327252,0.000754142283631,0.000754177943821,0.000754146626964,0.000754049530981,0.000753886181174,0.000753658040541,0.00075336441221,0.000753004736832,0.000752581153669,0.000752093231674,0.000751541818986,0.000750927651787,0.00075025069141,0.00074951118565,0.000748709962705,0.000747847821521,0.000746923114466,0.000745936092922,0.00074488633111,0.00074377404557,0.000742599111785,0.000741360802744,0.000740060246449,0.000738697111762,0.000737270490954,0.00073578119806,0.000734231004654,0.000732622561922,0.000730956356247,0.000729231084317,0.000727446769121,0.000725605857618,0.000723709100171,0.000721757849785,0.000719754326499,0.00071769863424,0.000715591628728,0.000713431144605,0.000711215546723,0.000708947429757,0.000706630253831,0.000704264513675,0.000701849749666,0.000699386371248,0.000696873453902,0.000694311878692,0.000691701968292,0.000689045487588,0.000686346207597,0.000683605338179,0.00068082223708,0.000677995849434,0.00067512913893,0.000672223321831,0.000669280112174,0.000666300649646,0.000663285192377,0.000660233630343,0.000657144766041,0.000654019314701,0.000650858333518,0.000647663823716,0.000644436038999,0.000641171986589,0.000637872774054,0.000634537838159,0.000631168419333,0.000627765553187,0.00062433221381,0.000620868256345,0.000617371190709,0.000613839725118,0.000610274405136,0.000606677998186,0.000603050938951,0.000599393527253,0.000595705359713,0.000591988263972,0.000588241685488,0.00058446630657,0.000580666370017,0.000576845727545,0.000573004351111,0.000569141891641,0.000565256869032,0.000561351041078,0.000557426281383,0.00055348227139,0.000549518737851,0.000545536087053,0.000541534118481,0.00053751165408,0.000533467428753,0.000529404626019,0.000525324828312,0.000521230188583,0.000517120963049,0.000512996208065,0.000508857254331,0.000504703832385,0.000500534997852,0.0004963506841,0.000492152165479,0.000487939268645,0.000483711968751,0.000479468756453,0.00047521014292,0.000470937975717,0.000466653025515,0.000462356624432,0.000458051055145,0.000453737162712,0.000449415199573,0.000445085397684,0.000440750885019,0.000436412191505,0.000432069289021,0.000427722531239,0.000423372582152,0.000419020861936,0.000414665816538,0.000410308091321,0.000405949402773,0.000401590297213,0.000397229762974,0.000392866542916,0.000388501812731,0.000384136056418,0.000379767449188,0.000375393573321,0.000371013984152,0.000366630916186,0.000362244099921,0.00035785270151,0.000353455988349,0.000349054916031,0.000344650240508,0.000340241561725,0.000335830204402,0.000331418722027,0.000327010716009,0.000322604641313,0.0003182008933,0.000313799030434,0.000309400767064,0.000305007170338,0.000300619120859,0.000296237356216,0.000291862902522,0.000287496566118,0.000283135903721,0.000278780357914,0.000274431286475,0.00027009090239,0.000265760007625,0.000261439986629,0.000257128747038,0.000252825119388,0.000248527668425,0.000244234944975,0.000239947148512,0.000235666398909,0.000231392258201,0.000227124039966,0.000222860584358,0.000218599961817,0.000214344109662,0.000210094596816,0.000205853071518,0.000201622284387,0.00019740263204,0.000193194164302,0.000188996742594,0.000184809986405,0.000180633675503,0.000176467975597,0.000172313309042,0.000168168409744,0.000164034186541,0.000159907745472,0.00015579000687,0.000151681294895,0.000147580564147,0.000143489329672,0.00013940843779,0.000135340606079,0.000131285336665,0.000127243775522,0.000123215202194,0.000119200342356,0.000115199562472,0.000111209797506,0.000107233548784,0.000103272362086,9.93259664479e-05,9.53934686874e-05,9.14738927383e-05,8.75662261511e-05,8.36716542523e-05,7.97890720396e-05,7.59207204546e-05,7.20693544985e-05,6.82354172903e-05,6.44158713094e-05,6.06094198069e-05,5.68161250883e-05,5.30363640042e-05,4.92723110514e-05,4.55249208884e-05,4.1795970874e-05,3.80849402179e-05,3.43903492663e-05,3.07120985699e-05,2.70513346502e-05,2.34109531996e-05,1.97912579458e-05,1.61915905491e-05,1.26110142888e-05,9.04858418216e-06,5.50484695901e-06,1.97642740177e-06,-1.53408082758e-06,-5.02862026802e-06,-8.50751941606e-06,-1.19706398953e-05,-1.54179642933e-05,-1.88485139482e-05,-2.22610386027e-05,-2.56541894261e-05,-2.90299016092e-05,-3.23868396132e-05,-3.57240593925e-05,-3.90410799148e-05,-4.23363638891e-05,-4.56105677347e-05,-4.88661650386e-05,-5.21048443339e-05,-5.53265404985e-05,-5.85315455502e-05,-6.17174519189e-05,-6.48838494199e-05,-6.80329305882e-05,-7.1165309e-05,-7.42832590277e-05,-7.73862391685e-05,-8.04715764026e-05,-8.35364964693e-05,-8.65817117583e-05,-8.9607603214e-05,-9.26159376768e-05,-9.56084693034e-05,-9.85851675378e-05,-0.000101544834975,-0.000104485824526,-0.000107407460634,-0.000110312085241,-0.000113201793035,-0.000116076594838,-0.000118936285803,-0.000121781764904,-0.000124610415571,-0.000127421894205,-0.000130215743796,-0.000132993158286,-0.000135756273263,-0.000138504755635,-0.000141234241759,-0.000143945139476,-0.000146638964534,-0.000149314281283,-0.000151970134667,-0.000154607760254,-0.000157227863307,-0.00015983010131,-0.000162412757123,-0.000164973944548,-0.000167517004061,-0.000170043964228,-0.00017255527468,-0.000175048535523,-0.000177524153094,-0.000179983075129,-0.000182425917251,-0.000184852515758,-0.000187263145412,-0.000189656997105,-0.000192034092751,-0.000194391634669,-0.000196729143429,-0.000199047621136,-0.000201349126707,-0.000203633123401,-0.000205899077226,-0.000208146395742,-0.000210374848754,-0.000212585402862,-0.000214779088907,-0.000216957458553,-0.000219120919878,-0.000221269829326,-0.000223403439926,-0.000225520891401,-0.00022762276413,-0.000229706629332,-0.000231774381125,-0.000233829004387,-0.000235869249279,-0.000237895796885,-0.000239908191448,-0.000241906780493,-0.000243892166002,-0.000245863810652,-0.000247822138006,-0.000249770160965,-0.000251709911832,-0.000253638603236,-0.000255553962655,-0.000257456105801,-0.000259343033722,-0.000261214738776,-0.000263069966639,-0.000264908423461,-0.00026672963567,-0.000268533152949,-0.000270315550235,-0.000272077912278,-0.000273821391958,-0.000275546370773,-0.000277253812761,-0.000278944937747,-0.000280620954089,-0.000282282620939,-0.000283931018816,-0.00028556518032,-0.000287185540325,-0.000288792107478,-0.000290384343694,-0.000291962242084,-0.000293524976785,-0.000295072858529,-0.000296605657003,-0.000298122916011,-0.000299622844075,-0.000301105900996,-0.000302573577228,-0.000304026404796,-0.000305465367311,-0.000306890138739,-0.000308302574978,-0.000309702680743,-0.000311089749525,-0.000312464989099,-0.000313827311672,-0.000315177069374,-0.000316512781187,-0.000317833946189,-0.000319140135401,-0.00032043050349,-0.000321704904497,-0.000322961617386,-0.000324201455798,-0.00032542239911,-0.000326625588802,-0.000327811439109,-0.000328981696981,-0.000330136391602,-0.000331276301293,-0.000332400596852,-0.000333509942128,-0.000334602165688,-0.000335677634675,-0.00033673796219,-0.000337784402844,-0.000338816344067,-0.000339833139432,-0.000340833442335,-0.000341816385254,-0.000342782270109,-0.000343732539512,-0.000344669804414,-0.000345593634392,-0.000346503844372,-0.000347399580305,-0.000348280613723,-0.000349146380445,-0.000349997483172,-0.000350833943028,-0.000351657424611,-0.000352464220069,-0.00035325341232,-0.000354023223103,-0.000354773316763,-0.000355501381116,-0.000356206761659,-0.000356889680748,-0.000357551381106,-0.000358192372905,-0.000358811700136,-0.000359410076804,-0.000359988950711,-0.000360549204643,-0.000361090199711,-0.000361614106042,-0.000362122217047,-0.000362614864121,-0.000363090209025,-0.000363546666775,-0.000363982120012,-0.000364396672681,-0.000364788601732,-0.000365157189283,-0.000365503840447,-0.000365826877381,-0.000366126452881,-0.000366401913446,-0.00036665123319,-0.000366877368898,-0.000367079799942,-0.000367258604311,-0.000367414103997,-0.000367546341449,-0.000367654628664,-0.000367737190206,-0.000367796069432,-0.000367831422277,-0.000367841384188,-0.000367823834929,-0.000367775646818,-0.000367696723558,-0.000367587920739,-0.000367448328126,-0.000367276713654,-0.000367075242002,-0.000366841418894,-0.000366570028168,-0.000366263127588,-0.000365921951168,-0.000365549691479,-0.000365148061781,-0.000364713988365,-0.00036424576193,-0.000363743942405,-0.000363272828128,-0.000362895903609,-0.00036261404691,-0.00036242937077,-0.000362336457965)
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(154)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('WT_Trr_6-GSM1017400.36mers.unique.MACS-2.1.0_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 154',bty='n')
dev.off()