# R script for Peak Model
#  -- generated by MACS
p <- c(0.0397532730713,0.0464055953144,0.0530179278541,0.0596169304927,0.0662390850648,0.0662931062431,0.066238383491,0.0663302896515,0.0662489070972,0.0662068126725,0.0661541946417,0.0661296395607,0.0661268332657,0.0661731371328,0.0662061110988,0.0660819325461,0.0661527914942,0.066123325397,0.0662306661798,0.0661577025104,0.0662404882123,0.0662517133922,0.0662019016563,0.0661654198216,0.0660924561522,0.0662692527358,0.0663429179789,0.0661226238232,0.0659282878961,0.0659163611424,0.0659156595687,0.0658209471132,0.065846203768,0.0658244549819,0.0658476069155,0.0657549991812,0.0656883496755,0.065870758849,0.0660033562867,0.0659493351084,0.0659984452705,0.0660924561522,0.0661198175282,0.0660728120874,0.0660650947762,0.0660679010712,0.0659752933369,0.0659584555671,0.0659872200906,0.0659879216643,0.0658440990468,0.0658230518344,0.0658721619965,0.0659177642899,0.0659570524196,0.0659451256659,0.0659956389755,0.0659935342543,0.0660054610079,0.0660096704504,0.0660559743175,0.0660089688767,0.0659486335346,0.0659346020598,0.0658181408182,0.0658532195054,0.0657942873109,0.0657753448198,0.0656995748554,0.0658097219333,0.0658630415378,0.0659374083547,0.0659430209447,0.0659289894698,0.0659465288134,0.0659030312413,0.0658356801618,0.0659458272397,0.0659949374018,0.065939513076,0.0659528429771,0.0660461522851,0.0660293145152,0.0660622884812,0.0661247285445,0.0661766450015,0.0662895983744,0.0663001219805,0.0662201425737,0.0662376819173,0.0661675245429,0.0660686026449,0.0660693042187,0.0661113986433,0.066062990055,0.0660664979237,0.0660882467098,0.0659374083547,0.0659346020598,0.0660580790388,0.0661268332657,0.0661822575915,0.0663499337164,0.0662917030956,0.0663660699125,0.0663120487342,0.0663786982399,0.0665309397424,0.0665926782319,0.0665533901022,0.0665653168559,0.0665891703632,0.0664432430244,0.0663899234198,0.0664762169903,0.0665309397424,0.0665618089871,0.0665260287262,0.066422195812,0.0663779966661,0.0663990438785,0.0662888968006,0.0663906249935,0.0665653168559,0.0665568979709,0.0665625105609,0.0666102175755,0.0666291600666,0.066614427018,0.0666628356063,0.0666782702287,0.0667315898332,0.0665989923956,0.0665772436095,0.0665975892481,0.06666914977,0.0665400602011,0.0664677981054,0.066756846488,0.0668031503552,0.0667905220278,0.0668270038625,0.0669645123163,0.0670192350684,0.0670143240522,0.0670129209047,0.0671714765709,0.06743737302,0.0672886393862,0.0673433621382,0.0674815721659,0.067464734396,0.0675124414106,0.0674864831821,0.0676015412761,0.0677488717624,0.0676794159617,0.0675334886229,0.0676022428499,0.06759101767,0.067500514657,0.0676548608807,0.0676766096668,0.0678246417268,0.0678583172665,0.0679923178517,0.0680540563412,0.0681326326005,0.0683290732489,0.068471492719,0.0686419751389,0.0687507190692,0.0688285937549,0.0688510441147,0.0688973479818,0.0688215780174,0.068935232964,0.0691239563012,0.0691085216788,0.0691169405637,0.0690867728927,0.0690671288279,0.0690741445653,0.0691751711845,0.0692740930825,0.069305663901,0.0694389629124,0.0693400410144,0.0694607116984,0.0694852667795,0.0696817074279,0.0697343254587,0.0699209440747,0.0698143048655,0.069815708013,0.0697981686694,0.0699237503697,0.0700640651185,0.0701735106226,0.0703229458301,0.0704260771705,0.070550957297,0.0705579730345,0.0707810734851,0.0709150740703,0.071135368226,0.0711732532082,0.071231483829,0.0712132429116,0.0713746048728,0.0714188040187,0.0714847519506,0.0715829722748,0.0716341871582,0.0716917162052,0.0717766066283,0.0717520515472,0.0718151931842,0.0719491937693,0.0718825442636,0.0719625236705,0.0720965242556,0.0722922633303,0.0724606410289,0.072605866794,0.0727125060031,0.0729236797001,0.0730983715624,0.073055575564,0.0732772728672,0.0734168860423,0.073464593057,0.0735543944962,0.0736834840652,0.0738560712063,0.0739051813684,0.074037778806,0.0740546165759,0.0743043768288,0.0743731310558,0.0745555402293,0.0747688186475,0.0748410807432,0.0750669874889,0.0751231133884,0.0752795643334,0.0754037428861,0.0756731472039,0.0758780067372,0.0760947930242,0.0761817881685,0.0763761240957,0.0764350562902,0.0765059152383,0.0767528691963,0.0768861682077,0.0770082420392,0.0772243267525,0.0773920028774,0.0775835325095,0.0778529368273,0.0779785185276,0.07829001727,0.0784576933949,0.0785902908326,0.0788933706901,0.0792132883175,0.0793009850355,0.079387278606,0.0794742737503,0.0795346090923,0.0796763269887,0.0798117307213,0.080034831172,0.0801155121526,0.0802866961462,0.0803217748334,0.0805168123343,0.080709745114,0.0809728352681,0.0812190876523,0.0814660416103,0.0817754356315,0.0819192582491,0.0821297303724,0.082328275742,0.0825773344212,0.082731680645,0.0829239118509,0.0832543530844,0.0834023851445,0.0835742707118,0.0838022821787,0.0840001259746,0.0843656458953,0.0845529660851,0.08486306168,0.0853057547127,0.0857028454519,0.0858592963969,0.0861665856969,0.0865945456809,0.0869944427151,0.0874806333199,0.0876988227543,0.0882790242409,0.0885743867872,0.0888564194324,0.0892240440744,0.0896905906143,0.0901157443033,0.0904300493408,0.0905780814008,0.0909092242081,0.0912340528517,0.0912873724563,0.0915708082489,0.0919286108585,0.0922127482249,0.0923944558247,0.0925937027681,0.0928750338395,0.0931360192724,0.0932012656306,0.0935373194541,0.0938621480977,0.0941925893313,0.0943588623087,0.0945482872196,0.0949425716639,0.0951937350643,0.095449809481,0.0958237482867,0.0961752367326,0.0964228922643,0.0966922965821,0.0968122656923,0.0969883607022,0.0972907389859,0.0974450852097,0.0978155161466,0.0979719670916,0.098113684988,0.0983908066169,0.0985753205117,0.0987401903416,0.0991730613418,0.0995603300486,0.0997469486646,0.0997195872886,0.099817106039,0.0999440908867,0.100177714944,0.100365736707,0.100574805683,0.10088349813,0.100962775963,0.101094671827,0.101409678439,0.10186149193,0.102025660186,0.102410122598,0.102690752096,0.102925077726,0.103175539553,0.103328482629,0.103592274357,0.10388132274,0.104163355385,0.104370319639,0.104794070181,0.104969463617,0.105100657907,0.105373570094,0.105538439924,0.105704011327,0.105934127515,0.106058306068,0.106191605079,0.106468726708,0.106657450046,0.106979472394,0.107287463268,0.107530909357,0.107946942588,0.108431730045,0.108746736656,0.109126989625,0.109299576767,0.109477074924,0.109668604556,0.109835579107,0.110131643227,0.110372283021,0.110455770297,0.110680273895,0.110912494805,0.110972830147,0.111346768952,0.111680718055,0.111936792471,0.112268636852,0.112473496386,0.112701507852,0.113109823772,0.113275395175,0.113572160869,0.114052738884,0.114268823597,0.114550154669,0.114822365281,0.115042659437,0.115293121264,0.115659342758,0.115841751932,0.116156056969,0.116243052114,0.116475974597,0.116751693078,0.116884290516,0.117177548341,0.117469403018,0.117783708056,0.117992075458,0.118401794525,0.118636821729,0.119038121911,0.119205798036,0.119492741697,0.119913685944,0.120182388688,0.120215362654,0.120432850514,0.120611050245,0.120682610767,0.121016559869,0.121236854025,0.121538530735,0.121857746789,0.121993150522,0.122125747959,0.1226056244,0.122830127998,0.123189333755,0.123502937219,0.123577304036,0.123836184748,0.124069107231,0.124233275487,0.124535653771,0.124802953367,0.124753141631,0.12489906897,0.125036577424,0.125291950267,0.125563459306,0.125529783766,0.125775334577,0.125797083363,0.126015974371,0.126255211018,0.126570217629,0.126937140697,0.127130775051,0.127308273208,0.127457006842,0.127921448661,0.128058957114,0.128383084184,0.128531817818,0.128786489087,0.129061505995,0.129138679107,0.129299339494,0.129532261977,0.129756064002,0.129831132392,0.130004421107,0.130210683788,0.13027663172,0.130460444041,0.13063443433,0.13087437255,0.130997849529,0.131047661265,0.131241997192,0.131459485053,0.131708543732,0.131906387528,0.132032670802,0.132126681684,0.132252263384,0.132323823906,0.132457824491,0.132548327504,0.132745469726,0.132813522379,0.133056266895,0.133052759026,0.13339442544,0.133433011995,0.133420383668,0.133615421169,0.133671547069,0.133812563391,0.133798531916,0.133967611189,0.13389675224,0.133960595451,0.133966909615,0.134064428365,0.134248240686,0.134223685605,0.134253853276,0.13423210449,0.134235612359,0.134279109931,0.134246135965,0.134293141406,0.134164051837,0.134135287313,0.13412336056,0.134069339382,0.134035663842,0.134033559121,0.134018124498,0.13382168385,0.13374310759,0.133532635467,0.133404949046,0.133225346167,0.133078717255,0.132927177326,0.132624799042,0.132401698591,0.132080377817,0.131782910549,0.131251117651,0.130965577137,0.130678633476,0.13025418136,0.12979324741,0.12921234435,0.129036950914,0.128578121685,0.128200675011,0.127756578831,0.127567855493,0.127146209673,0.126615118349,0.126121210433,0.125780245593,0.125559951437,0.125089897029,0.124768576254,0.124531444328,0.12431816591,0.123876174451,0.12359484338,0.123386475978,0.12336262247,0.123220904574,0.122814693376,0.122482147421,0.122266764282,0.121871778264,0.121525200834,0.121356823135,0.121137230554,0.120782935813,0.120321300289,0.119793716833,0.119499055861,0.119188258692,0.118646643761,0.118295155315,0.118037677751,0.117653916913,0.117160008997,0.116842897665,0.11655525243,0.116395293616,0.116088004316,0.115903490421,0.11586771016,0.115612337317,0.115342231426,0.115005476029,0.114763433087,0.114395808445,0.114099042751,0.113631093064,0.113380631237,0.112924608303,0.112455255468,0.112104468596,0.11168352435,0.111320810724,0.110932840443,0.110521016655,0.110034826051,0.10964124318,0.109091209364,0.108492766961,0.107936418981,0.107187839796,0.106608339884,0.106025332102,0.105490732909,0.105000332862,0.104395576294,0.103952181688,0.103612619996,0.103357247153,0.10297068002,0.102791778715,0.10248168312,0.102191933163,0.101871313962,0.101789931408,0.101693815805,0.101284096738,0.100981016881,0.100691266924,0.100433087786,0.100131411076,0.0998676193486,0.0997125715511,0.0995056072966,0.0990678252802,0.0986510904761,0.0985767236592,0.0983360838649,0.0981101771192,0.0978148145729,0.0975790857948,0.0974135143912,0.0970676385353,0.0968164751348,0.0965372487846,0.0964376253129,0.0961759383063,0.0959570472981,0.095724124815,0.0956069619997,0.0954947102006,0.0951537453609,0.0949580062863,0.0947285916719,0.0945988005292,0.0943757000785,0.0941455838904,0.0939238865872,0.0936818436454,0.0935394241754,0.0931900404507,0.0930826996678,0.0929213377067,0.0927908449902,0.0926631585688,0.0924477754293,0.0921082137371,0.0920142028553,0.091864066074,0.09159536333,0.0914424202537,0.0911709112147,0.0909758737138,0.0906538513652,0.0903100802305,0.090034361749,0.0898589683129,0.0895355428168,0.0893054266287,0.0890633836869,0.0888346706463,0.0885442191162,0.0883014746007,0.0881899243753,0.0880033057594,0.0878721114692,0.0877577549489,0.0875444765306,0.0873206745062,0.0870982756293,0.0868478138026,0.0865931425334,0.0863447854279,0.0860010142932,0.0858494743645,0.0856958297145,0.0854537867727,0.0853548648748,0.0851878903236,0.0851738588487,0.0849479521031,0.0847143280462,0.0845171858241,0.0844063371725,0.0841972681967,0.0839257591577,0.0837496641479,0.083518846386,0.0832768034442,0.0828628749351,0.0827183507438,0.0826481933694,0.0825289258329,0.0823479198068,0.0820736044728,0.0819157503804,0.0817417600918,0.081469549479,0.0812232970948,0.0811341972293,0.0809167093685,0.080649409772,0.0804143825676,0.0802663505076,0.0801372609387,0.0799534486177,0.0797436780681,0.0795991538768,0.0794328808994,0.0790680625524,0.0788582920029,0.0788316322006,0.0786913174517,0.0783903423154,0.0781896922246,0.0779441414141,0.0777238472584,0.0774874169066,0.0773092171755,0.0772818557995,0.0771247032808,0.0768595084055,0.0765690568753,0.0764329515689,0.0762358093468,0.076062520632,0.0758857240484,0.0757994304779,0.0756008851082,0.0754858270142,0.0753370933804,0.0751624015181,0.0749638561484,0.0746839282245,0.0746334149149,0.0745850063265,0.0743247224674,0.0741493290314,0.0741331928352,0.0739051813684,0.0738371287152,0.0736659447216,0.0736105203958,0.0735705306923,0.0733488333892,0.073066800744,0.0729833134684,0.0728282656709,0.0725602645006,0.0722768287079,0.0720621471422,0.0718600939038,0.0716124383721,0.0714356417885,0.0712104366166,0.0711367713735,0.0710210117057,0.0708589481708,0.0705958580167,0.070611292639,0.0704415117929,0.0704036268107,0.0704022236632,0.0704113441219,0.0703475009112,0.0702892702904,0.0701363272142,0.069999520334,0.0701293114767,0.0699167346322,0.0698360536516,0.0696824090016,0.0695217486142,0.0693288158345,0.069335831572,0.0692200719042,0.0691730664633,0.0689696100775,0.0688328031973,0.0687612426754,0.0686258389428,0.0685177965861,0.0684539533754,0.068468686424,0.0682371670884,0.0681136901094,0.0679768832293,0.0680449358825,0.0679144431661,0.0679396998209,0.0679979304416,0.0680400248663,0.0678534062503,0.0677243166814,0.0676962537316,0.0675924208175,0.0676204837672,0.0675152477056,0.0674829753134,0.0673349432533,0.0672584717152,0.0671777907346,0.0672472465353,0.0672156757168,0.0670781672629,0.0670508058869,0.0669631091689,0.0669027738268,0.0669027738268,0.0668368258949,0.0668031503552,0.0666894954086,0.0665751388883,0.0665891703632,0.0665540916759,0.0664727091216,0.066430614697,0.0663408132577,0.0661485820518,0.0661591056579,0.066084738841,0.0662215457212,0.0662952109643,0.0661920796239,0.0662973156855,0.0663169597504,0.0663036298492,0.0662594307034,0.0663330959465,0.0663190644716,0.0662257551636,0.0659921311068,0.0659163611424,0.0658279628506,0.0658034077696,0.0656890512493,0.0655213751244,0.0655340034518,0.0655354065993,0.065505940502,0.0654259610952,0.0654315736851,0.0653705367694,0.0652814369038,0.0651495410399,0.065261792839,0.0653284423447,0.0653319502134,0.0652498660854,0.0652035622182,0.0652737195927,0.0653600131632,0.0653747462118,0.0654876995847,0.065563469549,0.0654771759785,0.0654968200433,0.0655347050255,0.0656329253497,0.0656238048911,0.0654862964372,0.0654252595214,0.0654582334874,0.0653915839817,0.0653719399169,0.0655010294858,0.0654526208975,0.0654301705376,0.0653544005733,0.0653810603755,0.0655845167614,0.0655326003043,0.0656076686949,0.0656329253497,0.06559363722,0.0653747462118,0.0654350815538,0.0652926620838,0.0653459816883,0.0653544005733,0.0652049653657,0.0651853213009,0.0650927135666,0.065135509565,0.0651677819573,0.0652105779557,0.0651586614986,0.0652140858244,0.0652337298892,0.0652863479201,0.0653158140173,0.0652877510675,0.0653038872637,0.0652996778212,0.0652561802491,0.0653410706721,0.0654042123091,0.0653228297548,0.0652856463463,0.0652189968406,0.0652470597904,0.0652786306089,0.0651691851048,0.0651523473349,0.0651123576315,0.0650723679281,0.0650429018308,0.0652667038552,0.0652779290351,0.0652744211664,0.0653480864096,0.0654007044404,0.0655227782719,0.0655683805653,0.0656139828586,0.0656209985961,0.0655676789915,0.0654540240449,0.06545121775,0.0653712383431,0.0652856463463,0.0653691336219,0.0652737195927,0.0652337298892,0.0652814369038,0.0651600646461,0.0652800337564,0.0652533739541,0.0651313001226,0.0652246094306,0.065237237758,0.0652147873981,0.0652996778212,0.0653593115895,0.0653087982799,0.0655129562395,0.0655017310595,0.0655431239105,0.0656245064648,0.0656034592525,0.0657136063303,0.0657360566901,0.0657402661326,0.0656504646933,0.065662391447,0.0656195954486,0.0656722134794,0.0657690306561,0.0657788526885,0.0658455021942,0.0658700572753,0.0657753448198,0.0657339519689,0.0657963920321,0.0659114501262,0.0658342770143,0.0657634180662,0.0656792292168,0.0656715119057,0.0655943387938,0.0655304955831,0.0656273127598,0.0657051874454,0.06574728187,0.0657430724276,0.0657893762947,0.0658279628506,0.0659100469787,0.0659191674374,0.0660805293986,0.0661057860534,0.0660503617276,0.0660440475639,0.0660201940566,0.0660103720241,0.0660461522851,0.0661071892008,0.0661562993629,0.066389221846,0.0663688762075,0.0662580275559,0.066274163752,0.0662874936531,0.0662706558833,0.0663295880778,0.0664018501734,0.0663927297148,0.0663786982399,0.0662804779157,0.066276970047,0.0663786982399,0.0663815045349,0.0663541431588,0.0664376304344,0.0663148550292,0.0663309912253,0.0662446976547,0.0661927811976,0.0661359537244,0.0661310427082,0.0661156080858,0.0661184143808,0.0661843623127,0.0662194409999,0.0663387085365,0.0663464258476,0.0663913265673,0.0665274318737,0.0666158301654,0.0666740607862,0.0667203646533,0.0669013706794,0.0669399572353,0.0669378525141,0.0668824281883,0.0669182084492,0.0670332665433,0.0670451932969,0.0669238210392,0.0669729312013,0.0669062816956,0.0668185849775,0.066795433044,0.0668522605173,0.0669631091689,0.0669995910036,0.0669020722531,0.0668894439257,0.0670627326405,0.0669715280538,0.0670823767054,0.0672521575515,0.0673265243684,0.0671567435223,0.0672226914542,0.0671413088999,0.0673328385321,0.0672718016163,0.0672640843051,0.067338451122,0.0673321369583,0.0672304087654,0.0672065552581,0.0673230164997,0.0672079584056,0.0672872362387,0.0671335915887,0.0672254977492,0.067154638801,0.0671111412289,0.067245141814,0.067217780438,0.0672318119129,0.0672753094851,0.0673805455467,0.0672788173538,0.0673665140718,0.0674121163652,0.0673601999081,0.0674268494138,0.0673188070572,0.0672086599793,0.0672584717152,0.0672247961755,0.0671420104736,0.0672170788643,0.0671413088999,0.0671132459501,0.0672044505369,0.0671118428026,0.0671427120474,0.0674036974803,0.0673812471204,0.0674177289551,0.0673819486942,0.0673847549892,0.0674773627234,0.0674766611497,0.0674500013474,0.0675917192437,0.0675166508531,0.067308283451,0.0671314868675,0.0670662405093,0.0671139475239,0.0671855080458,0.067250754404,0.0672732047638,0.0672170788643,0.0669890673974,0.067042387002,0.0672198851593,0.0674114147914,0.0673566920394,0.0673594983344,0.0671441151949,0.0670585231981,0.0669806485125,0.0670346696908,0.0670774656892,0.0671728797184,0.0670164287734,0.0669960831348,0.067031161822,0.0670178319209,0.067193225357,0.0670606279193,0.0669729312013,0.0668978628106,0.0670381775595,0.0670585231981,0.0671076333602,0.0670992144752,0.067097109754,0.0671609529647,0.0671798954558,0.0671560419485,0.0671497277848,0.0671827017508,0.0671525340798,0.0670318633958,0.0670325649695,0.0668964596631,0.066825600715,0.0667764905529,0.0667091394734,0.0667315898332,0.0667154536371,0.0667301866858,0.0666137254442,0.0664888453177,0.0664214942383,0.0665049815138,0.0665856624944,0.0665288350212,0.0664930547602,0.0666039034118,0.066578646757,0.0665526885285,0.0665688247246,0.0665961861006,0.0664635886629,0.0662643417196,0.0662257551636,0.0661724355591,0.0661282364132,0.0660173877616,0.0660994718897,0.066123325397,0.0660307176627,0.0661766450015,0.0662482055234,0.0663302896515,0.0664046564684,0.0663302896515,0.0664186879433,0.0664649918104,0.0664537666305,0.0662938078168,0.0663660699125,0.0661401631668,0.0661584040842,0.066087545136,0.0661310427082,0.0661429694618,0.0660756183824,0.065994235828,0.0658637431116,0.0659114501262,0.0658672509803,0.06590092652,0.0659289894698,0.0659851153693,0.0658532195054,0.0658581305216,0.0657058890191,0.0657016795767,0.0657620149187,0.0656974701342,0.0657129047566,0.0657402661326,0.0657248315102,0.0657269362315,0.065689752823,0.0656069671212,0.0656630930207,0.0656399410872,0.0656708103319,0.065777449541,0.0656834386593,0.0655866214826,0.0589553464518,0.0523823020418,0.0457847025507,0.0393070721699,0.0)
m <- c(0.0384391363328,0.0448627194335,0.0513269669983,0.0578669345997,0.0643515143965,0.0644854266834,0.0645345044849,0.0645478256024,0.064587788955,0.0646691178832,0.0646915534496,0.064796720167,0.0647869046067,0.0647819968265,0.0647932146097,0.0648093401731,0.0647770890464,0.064817052399,0.0648808535409,0.0648990824386,0.0650105591591,0.0649937324843,0.065046315843,0.0650343969484,0.0649846180355,0.0650077547133,0.0651185303223,0.0651886414673,0.0652903026275,0.0652573503893,0.0652110770337,0.0652405237145,0.0652671659496,0.065255247055,0.0653583104381,0.0653772404472,0.0653491959892,0.0653863548961,0.0654024804594,0.0655945849966,0.0656254339003,0.0657088661628,0.0657151761659,0.0657838850879,0.065886948471,0.0660110451976,0.0661982419546,0.0662760653255,0.0662564342049,0.0662466186446,0.0662921908889,0.0663139253438,0.0664394242933,0.0664878009833,0.0664555498566,0.0663216375697,0.0662543308706,0.0661526697104,0.0661814152798,0.0661512674875,0.0660531118846,0.0660411929899,0.0660601229991,0.0659619673961,0.0659893107427,0.0661197174723,0.0661393485929,0.0662935931118,0.0662185741867,0.0662760653255,0.0663405675789,0.0664050698322,0.0663153275667,0.0664506420765,0.0665586132397,0.0664667676398,0.0666097943755,0.0666560677312,0.0668348511508,0.0668713089462,0.0670430812513,0.0669540400972,0.0670557012574,0.0670942623871,0.0669933023384,0.0671054801703,0.0670872512727,0.0669035600729,0.0668467700455,0.0668285411478,0.0667387988822,0.0669252945278,0.0669701656606,0.0671145946192,0.0671699824237,0.0671559601947,0.0671124912848,0.0672435991259,0.0672569202434,0.0672499091289,0.0673627880723,0.0672716435839,0.0674518292264,0.0673873269731,0.0674006480906,0.0674504270035,0.0676271070888,0.0677322738062,0.0678570716443,0.0678311305206,0.0677736393818,0.0678129016229,0.0676852993391,0.0676172915285,0.0674665525669,0.0674644492325,0.0674132680967,0.0673172158281,0.0673319391685,0.0674041536478,0.0672723446953,0.0673193191625,0.0673052969335,0.0674959992477,0.0677589160413,0.0677589160413,0.0676397270949,0.0678023849512,0.0677217571345,0.0677392849207,0.0679005405541,0.0677736393818,0.0676579559926,0.0675857415133,0.0674988036935,0.0675696159499,0.0675303537088,0.0673971425333,0.0674938959134,0.0674882870218,0.06738101697,0.067505814808,0.0676018670766,0.0675829370675,0.0676951148994,0.0677413882551,0.0677778460505,0.0679419061296,0.0677673293787,0.0677378826978,0.0677315726948,0.067749100481,0.0676733804445,0.0675661103927,0.0674062569822,0.0673284336113,0.0673515702891,0.0672870680358,0.0674525303379,0.067423083657,0.067471460347,0.0674020503135,0.0674202792112,0.0674812759073,0.0675443759378,0.0675450770492,0.0674490247806,0.0673838214158,0.0673515702891,0.0674406114432,0.067575925953,0.0674539325608,0.0675114236996,0.0674938959134,0.0675163314798,0.067491792579,0.067568213727,0.0675107225882,0.0674336003287,0.0674630470096,0.0673445591746,0.0674896892447,0.0674104636509,0.0673992458677,0.0673740058555,0.0673459613975,0.0673256291655,0.06738101697,0.0672127502221,0.0671426390772,0.0671363290741,0.066930202308,0.0669806823323,0.0670024167873,0.0668965489584,0.0668909400668,0.066922490082,0.0668621944973,0.0669722689949,0.0669589478774,0.0668453678226,0.0670416790284,0.0669715678835,0.0668607922744,0.0669323056423,0.067012933459,0.0669456267598,0.0668264378134,0.0669596489888,0.0669996123415,0.0669883945583,0.0669210878591,0.0669715678835,0.0670283579109,0.0668909400668,0.0667626366715,0.0667794633463,0.0668783200607,0.0666855144121,0.0665452921222,0.0665628199084,0.0666546655083,0.0665452921222,0.0664751809772,0.0664863987604,0.0664604576368,0.0663966564948,0.0663307520186,0.0662199764096,0.0662311941928,0.0662059541806,0.0660608241105,0.0660292740953,0.0659696796221,0.065991414077,0.0660208607579,0.0660425952128,0.0660313774296,0.0661463597074,0.0661730019424,0.0661779097226,0.0661652897165,0.0662339986386,0.0663931509376,0.0663209364583,0.0662361019729,0.0663524864735,0.066407874278,0.0663882431575,0.0663798298201,0.0663342575758,0.0664520442994,0.0664541476337,0.0663651064796,0.0663980587177,0.0663784275972,0.0662010464004,0.06618632306,0.0662992020034,0.0661084996891,0.0660468018815,0.0658252506635,0.0657439217353,0.0656878328194,0.0656058027798,0.065651375024,0.0656569839156,0.065490820502,0.065380044893,0.0655237727402,0.0655146582913,0.0656478694667,0.0655595294241,0.0655258760745,0.0654585693754,0.0654235138029,0.0654375360319,0.0655356916348,0.0654669827128,0.0654697871585,0.0655083482883,0.0654256171372,0.0655959872195,0.0655896772164,0.0656983494911,0.0657852873108,0.065685729485,0.0655854705477,0.0656920394881,0.0656338472377,0.0656184227859,0.0655770572103,0.0655013371738,0.065574953876,0.0655160605142,0.0653947682334,0.0655153594028,0.0656450650209,0.0655153594028,0.0655644372042,0.0655966883309,0.0656611905843,0.065617020563,0.0655174627371,0.0654901193906,0.0654431449235,0.0653330704259,0.0652496381634,0.0652286048199,0.0652769815099,0.065359712661,0.0653491959892,0.0653435870976,0.0654487538151,0.0654929238364,0.0655223705173,0.065609308337,0.0656632939186,0.065734106175,0.0656485705782,0.065498532728,0.0653933660105,0.0654207093571,0.0653723326671,0.0654235138029,0.0655083482883,0.0655146582913,0.06551886496,0.0655363927463,0.0655616327584,0.0656254339003,0.0657831839765,0.0658308595551,0.0657628517445,0.0657747706391,0.0657663573017,0.0656927405995,0.0657705639704,0.0657088661628,0.0656913383766,0.0656906372652,0.0656051016683,0.0656913383766,0.0656906372652,0.065679419482,0.0657158772773,0.0656976483797,0.0655006360623,0.0654683849357,0.0655847694363,0.0656394561293,0.0657011539369,0.0656541794698,0.0658427784497,0.0658406751154,0.0657390139552,0.0657712650819,0.065914992929,0.0660902707914,0.0659360262725,0.0659801962938,0.0659023729229,0.0658196417719,0.0656920394881,0.065810527323,0.0658224462177,0.0658021139856,0.0658469851184,0.0658126306574,0.0659984251915,0.0659135907061,0.0659935174114,0.0661218208066,0.0661814152798,0.066158278602,0.0662466186446,0.0663349586873,0.0663623020338,0.066457653191,0.0665004209894,0.066651159951,0.0666960310838,0.0666083921526,0.0667114555357,0.0667829689035,0.0669252945278,0.0670038190102,0.067069022375,0.0670430812513,0.0670592068147,0.0671230079566,0.0672260713397,0.0674826781302,0.0674945970248,0.0675815348446,0.0675731215072,0.0677196538001,0.0677434915894,0.0678220160718,0.0678542671985,0.0677855582764,0.0677925693909,0.067783454942,0.0678248205176,0.0677413882551,0.0678037871741,0.0678416471924,0.0679131605602,0.067909655003,0.0679447105754,0.0680814273081,0.0682195462637,0.0683569641078,0.0684880719488,0.0686093642296,0.068708220944,0.0687853432034,0.0688589599057,0.0690868211268,0.0691674489435,0.069257191209,0.0692564900975,0.0692592945433,0.0692466745373,0.0693693690409,0.0694366757401,0.0695783002529,0.0696329869459,0.0697409581092,0.0698461248266,0.0699190404174,0.070194577217,0.0702618839162,0.0704448740045,0.0705675685082,0.0707126985782,0.0708255775216,0.0709903387123,0.0710695643061,0.0712153954876,0.0713703411179,0.0714271311453,0.0716893468275,0.071945953618,0.072189239291,0.0723785393824,0.0725404961272,0.0727957006948,0.0728735240657,0.0731104997357,0.0733657043033,0.0735536021718,0.0737050422449,0.0737618322723,0.0739279956859,0.0741530524612,0.0741572591299,0.0743395481067,0.074566007105,0.0747349749643,0.0749375961732,0.0749375961732,0.0749740539686,0.0751570440569,0.0753105874644,0.0754809575466,0.0758329154943,0.0759366799888,0.0761028434024,0.0763243946204,0.0764926613683,0.076830597087,0.0770465394134,0.0773353973307,0.0775562474373,0.0776621152661,0.0779061020506,0.0780575421237,0.0783891678393,0.0783239644745,0.0785335967979,0.0787628602419,0.0790306848157,0.0790348914844,0.0791540804308,0.0794653739144,0.079553713957,0.0797878851812,0.0797843796239,0.0802583309638,0.0803501765637,0.0805226499803,0.0806804000564,0.0809902913171,0.0812777470114,0.0813233192557,0.081506309344,0.0817166427789,0.0820111095877,0.082222144134,0.0823911119933,0.0826996010311,0.0828748788935,0.0831153601207,0.0831574268077,0.0833277968899,0.0836250681445,0.083798943784,0.0839805316494,0.0840997205959,0.0843114562536,0.0843044451391,0.0844495752092,0.0844755163328,0.0846928608822,0.0851752255595,0.085216591135,0.0854584745851,0.0856141213269,0.0859015770212,0.0861329437996,0.086348886126,0.0866531684951,0.0869216941803,0.0870478942412,0.0869504397497,0.0872498143387,0.0873395566042,0.0875113289094,0.0876207022955,0.0878135079441,0.0882678281634,0.0885314460684,0.0888798984589,0.0893454364614,0.0895754010168,0.0896931877403,0.0899939645522,0.0903248891564,0.0903739669579,0.0906095404049,0.0905190970279,0.0905471414859,0.0906242637453,0.0907301315742,0.0909846350304,0.0912601718301,0.0915308008496,0.0917958209775,0.0922564511999,0.0925368957797,0.0929954226677,0.0934546506672,0.0938725130911,0.0940646176283,0.0942693421715,0.0945771300979,0.0947958768701,0.095110675911,0.0953777993733,0.0955509739013,0.0957136317576,0.0958734851681,0.0961258852899,0.0963390231706,0.0965788032863,0.0968143767334,0.0971025335391,0.0972252280428,0.0973374058747,0.0976423893553,0.0977496594071,0.0979347528297,0.0979375572755,0.0981871529516,0.0985797753633,0.0988006254699,0.098889666624,0.0992640601381,0.0994540613409,0.0996012947453,0.0998698204305,0.100193032809,0.100552001871,0.100875915361,0.100933406499,0.101214552191,0.101483077876,0.101637322395,0.102010313686,0.102236772684,0.10263640621,0.102881795218,0.103177664249,0.10354083998,0.103894200151,0.104092614691,0.104530108236,0.104853320614,0.10529642305,0.105738824375,0.106073955648,0.106562630328,0.106998020538,0.10750211967,0.108056698827,0.108667366899,0.109296964981,0.109684679613,0.110146010946,0.110780516808,0.111333693742,0.111701076142,0.112205876385,0.112528387652,0.112849496696,0.113132745722,0.113347285825,0.113765148249,0.113969171681,0.114253822929,0.114715154263,0.115080433328,0.11532792567,0.115853058146,0.116192396087,0.116404131745,0.116638302969,0.116972032019,0.117401112226,0.117626169002,0.11765912124,0.11789118913,0.118316763779,0.118378461587,0.118722006197,0.119121639724,0.119488321012,0.119913895662,0.120229395814,0.120554711526,0.120866706121,0.121282465211,0.121404458603,0.121831435476,0.122172175641,0.122576015835,0.122916756,0.123109561649,0.123404028457,0.123690081929,0.124086209898,0.124312668896,0.124771195784,0.125055847033,0.125216401554,0.125422528321,0.125830575184,0.126143972002,0.126474195495,0.126822647885,0.127219476966,0.127538482675,0.127760033893,0.1280727296,0.128751405483,0.129195910142,0.129576613659,0.129868977134,0.130258093988,0.130723631991,0.130938172094,0.131351126738,0.131761978047,0.132136371561,0.132286409412,0.132491835066,0.132618736239,0.132770176312,0.132961579738,0.133154385386,0.133404682174,0.133509848891,0.133680218973,0.133826751266,0.134045498039,0.134277565928,0.134325942618,0.134644247216,0.134749413934,0.134710151693,0.134722070587,0.134807606184,0.134820927302,0.134651959442,0.134464061574,0.134348378185,0.134377123754,0.134318931504,0.134159078093,0.134093173617,0.134022361361,0.133898264634,0.133894057965,0.133829555712,0.133913689086,0.133928412427,0.133752433453,0.13365918563,0.133403279951,0.133192946516,0.133051322003,0.133038000886,0.132810840776,0.132732316294,0.13248412284,0.132214194932,0.132024894841,0.13174374915,0.131693269125,0.131597216857,0.131576884625,0.131258580027,0.131027213248,0.130772008681,0.130609350824,0.130546951905,0.130454405194,0.130256691765,0.1301914884,0.130155030605,0.129883700474,0.129817795998,0.129772223754,0.129671263705,0.12949458362,0.129207829037,0.129038160066,0.128882513324,0.128737383254,0.128536164268,0.128287970815,0.128158966308,0.127749517222,0.127515345998,0.127098184685,0.12684438234,0.126640358908,0.126485413278,0.12617692424,0.125932236344,0.125819357401,0.125525591704,0.125362232736,0.125187655985,0.125153301524,0.124986436999,0.124795734685,0.124668132401,0.124170343272,0.123885692023,0.123661336359,0.123496575169,0.123321998418,0.123211222809,0.12293147934,0.122770223707,0.122498893576,0.122087341155,0.122187600092,0.121939406639,0.121755014328,0.121480879751,0.121232686298,0.120912979477,0.120696336039,0.120537884852,0.120342274757,0.120191535796,0.119852197854,0.119713377787,0.119370534288,0.119109720829,0.118967395205,0.118514477208,0.118268387089,0.118025802528,0.117640892342,0.117316978852,0.117100335415,0.116742067464,0.116587121833,0.1162176361,0.115867080375,0.115749293651,0.115445712394,0.114961945493,0.114830136541,0.114552496407,0.114294487393,0.114020352817,0.113659981532,0.113538689251,0.113294702466,0.112961674528,0.112698757734,0.112569753228,0.112163108587,0.11199554295,0.111716500593,0.111553141626,0.111268490377,0.11092634799,0.11061225006,0.110589113383,0.110502175563,0.110112357597,0.110069589798,0.109758997426,0.109491873964,0.109169362697,0.108956925928,0.108738880267,0.108499801263,0.108124706637,0.107668283084,0.107394849618,0.107030972776,0.106764550425,0.106512851415,0.106182627922,0.106018567843,0.105670115453,0.105398785322,0.105088192949,0.104981624009,0.104753762788,0.104541326019,0.104314867021,0.10410663692,0.103857742356,0.103563976658,0.10348755551,0.103277222075,0.102965928592,0.102574708403,0.102396626095,0.102027140361,0.101892526962,0.101598761265,0.101423483403,0.101187909956,0.100950233174,0.100878719806,0.100801597547,0.100681707489,0.100473477389,0.100346576216,0.100152368345,0.0999104848946,0.0996805203391,0.0993453890662,0.0989667888835,0.098543317568,0.0982698841026,0.0980981117975,0.0978239772207,0.0975554515355,0.0970969246475,0.0968865912127,0.0965297254849,0.0963060709325,0.0961300919586,0.0958861051742,0.0957276539866,0.0953434449122,0.0951716726071,0.0948856191357,0.0947510057374,0.0946430345741,0.0946184956734,0.0943892322294,0.0940597098481,0.093817826398,0.0935240607007,0.0933123250429,0.0930325815745,0.0928755326098,0.0926427636086,0.0922529456426,0.0918981832492,0.0917018720433,0.091483125271,0.0911564073355,0.0908486194092,0.0906747437697,0.0904475836601,0.0902449624511,0.0899806434347,0.0897906422318,0.0894800498597,0.0890825196678,0.0887705250727,0.0885482727432,0.0881535469971,0.0876171967382,0.0872091498746,0.0866314340402,0.0861792171552,0.0857059669268,0.0853147467379,0.0849866265795,0.0845862919419,0.0843282829284,0.0840099783303,0.0839230405106,0.0835984259094,0.0834981669722,0.0832471690732,0.0830045845117,0.082701003254,0.0824689353642,0.0821912952302,0.0818926217527,0.0816500371912,0.0813429503763,0.0812370825474,0.0810113246606,0.080908962389,0.0807645334304,0.0806811011679,0.0805177422001,0.0804301032689,0.0802779620844,0.0802288842829,0.0799708752695,0.0797500251629,0.0795067394899,0.0792634538169,0.0791106115209,0.0789998359119,0.0787866980312,0.0786703135306,0.0784361423064,0.0782040744166,0.0780904943618,0.077976914307,0.0779054009391,0.0777252152966,0.0776249563593,0.0773073528727,0.0772379428392,0.0770956172149,0.0770766872058,0.0768600437679,0.0768039548519,0.0765164991576,0.0762795234876,0.0761477145351,0.075871476624,0.0758483399462,0.0757754243554,0.0755685964778,0.0752362696507,0.0751444240508,0.0748850128145,0.0747749383169,0.0746922071659,0.0746234982438,0.0745877415599,0.074357075893,0.0740534946353,0.0739364090233,0.0738046000707,0.0737485111548,0.0735865544099,0.0735606132863,0.0734666643521,0.0732317920165,0.0729436352107,0.0729569563282,0.0728868451833,0.0727697595712,0.0726659950767,0.0724900161028,0.072480901654,0.0723259560237,0.0722698671077,0.0721731137277,0.0722228926406,0.072084773685,0.0720013414225,0.0718884624791,0.0718477980151,0.0718106391082,0.0717194946198,0.0716290512428,0.0714011900217,0.0714783122812,0.0713436988828,0.0712539566173,0.0711403765625,0.0711004132098,0.0709650987001,0.0709048031154,0.0708185664071,0.0706706318913,0.0705836940715,0.0703214783894,0.0701623260904,0.070118156069,0.0700627682645,0.0700424360325,0.0700059782371,0.0697612903412,0.0696147580483,0.069618964717,0.0695355324545,0.0695411413461,0.0695460491262,0.0693995168333,0.0693209923509,0.0692684089922,0.0691590356061,0.0691590356061,0.0691765633923,0.0690496622199,0.0690103999788,0.0689451966139,0.0689024288155,0.0689767466292,0.0689367832766,0.0687944576523,0.0688344210049,0.0688112843271,0.0686261909044,0.0686500286937,0.0685904342205,0.0684656363825,0.0683310229841,0.0682398784957,0.0681767784652,0.0681858929141,0.0680821284196,0.0679615372502,0.0679797661479,0.0678654849816,0.067783454942,0.0678016838397,0.0678241194061,0.0677813516077,0.0677540082612,0.0677526060383,0.0677021260139,0.0676271070888,0.0676088781911,0.0676460370979,0.0675689148385,0.0676088781911,0.0674840803531,0.0674181758768,0.0672435991259,0.067145443523,0.0671854068756,0.0672127502221,0.0672464035717,0.0671061812818,0.0670676201521,0.0669266967507,0.0670416790284,0.0669288000851,0.0669449256484,0.0668818256179,0.0668334489279,0.0668018989127,0.0666224143816,0.0666217132702,0.0666742966289,0.0666441488365,0.0665487976794,0.0665565099053,0.0665866576977,0.0665600154626,0.0665368787848,0.0665880599206,0.066554406571,0.0665782443603,0.0665053287695,0.0665018232123,0.0664303098444,0.0663637042567,0.0664247009528,0.0662802719942,0.0663062131179,0.0661491641532,0.0661821163913,0.0662087586264,0.0663062131179,0.0663791287086,0.066387542046,0.0664022653864,0.0662844786629,0.0663041097835,0.0661779097226,0.0662290908584,0.0662543308706,0.0661169130265,0.0661113041349,0.0659654729534,0.0660005285259,0.0660292740953,0.0659808974053,0.0660846618998,0.066047502993,0.0660629274449,0.0660832596769,0.0660629274449,0.0659388307183,0.0660222629808,0.0659114873718,0.0658119295459,0.0659311184924,0.0658827418023,0.0659199007092,0.0659002695886,0.0658336640009,0.0658532951215,0.0659177973748,0.0657944017597,0.0657712650819,0.0658932584741,0.0659009707,0.065914992929,0.0659128895947,0.0658694206848,0.0658596051245,0.0658168373261,0.0657572428529,0.0657677595246,0.0658259517749,0.0656843272621,0.0655181638486,0.0654592704868,0.0653884582304,0.065414399354,0.0653302659801,0.0654368349204,0.0655272782974,0.0655476105294,0.0654852116104,0.0654803038303,0.0656324450148,0.06556724165,0.0655651383157,0.0655994927767,0.0656745117018,0.0656191238973,0.0655679427615,0.0657004528254,0.0657831839765,0.0658406751154,0.0658455828955,0.0659977240801,0.0660496063273,0.0660348829869,0.0661106030234,0.0659893107427,0.0660439974357,0.0658995684771,0.0658568006787,0.0658154351032,0.0658490884528,0.065846284007,0.0658518928986,0.0658378706696,0.0658336640009,0.0659346240496,0.0659065795916,0.0659135907061,0.0659311184924,0.0659528529473,0.0658483873413,0.0657263939491,0.0658231473291,0.0659248084893,0.0658532951215,0.0658680184619,0.0658596051245,0.0659507496129,0.0659142918176,0.0659325207152,0.0659921151885,0.0660846618998,0.0659900118541,0.0659016718115,0.066011746309,0.0660187574235,0.0658995684771,0.0659142918176,0.065922705155,0.0658364684467,0.06580421732,0.0658736273535,0.0658932584741,0.0658673173504,0.0658133317688,0.0592355041492,0.0527467176836,0.0460805500214,0.0395370768628,0.0)
ycorr <- c(3.7650261217e-05,3.74877850363e-05,3.6997965057e-05,3.61821559363e-05,3.50391826142e-05,3.35662145233e-05,3.17642205493e-05,2.99502684835e-05,2.81228627172e-05,2.62816134395e-05,2.44279193475e-05,2.25628144237e-05,2.0685734255e-05,1.87972232934e-05,1.68969192598e-05,1.49877602166e-05,1.30702421798e-05,1.114155769e-05,9.20269027505e-06,7.25477800222e-06,5.2955191136e-06,3.32184648118e-06,1.3311592775e-06,-6.75752602598e-07,-2.69843588782e-06,-4.73888482277e-06,-6.80006295506e-06,-8.87777540606e-06,-1.09701305373e-05,-1.30795936686e-05,-1.52061576916e-05,-1.73479361369e-05,-1.9502326577e-05,-2.16692445771e-05,-2.38481043877e-05,-2.60375133087e-05,-2.82357872051e-05,-3.04442036869e-05,-3.26663909325e-05,-3.4899614424e-05,-3.71431220343e-05,-3.93973431557e-05,-4.16635382765e-05,-4.39427763369e-05,-4.6234994803e-05,-4.85431275244e-05,-5.08682063084e-05,-5.32110338301e-05,-5.55686365275e-05,-5.7944868558e-05,-6.03411794538e-05,-6.27587678775e-05,-6.5194072589e-05,-6.76483029043e-05,-7.01229466867e-05,-7.26157363307e-05,-7.51258252098e-05,-7.76525389579e-05,-8.01976153189e-05,-8.27594028652e-05,-8.53332680725e-05,-8.79174912968e-05,-9.05108279427e-05,-9.3114098565e-05,-9.57246581485e-05,-9.83411752703e-05,-0.000100963345496,-0.000103590203612,-0.000106220453778,-0.000108853205304,-0.000111489898971,-0.000114128128114,-0.00011677092661,-0.000119416819152,-0.000122063823632,-0.000124711320782,-0.000127359053406,-0.000130006652794,-0.000132651070244,-0.000135290881211,-0.000137924325024,-0.000140552297661,-0.000143175894914,-0.000145792019108,-0.000148400998674,-0.000151003869037,-0.000153600305352,-0.000156189980743,-0.000158774311824,-0.000161355725416,-0.000163935891303,-0.000166512682688,-0.000169084587772,-0.000171649290595,-0.000174207177683,-0.000176758965255,-0.00017930472366,-0.000181843711756,-0.000184375008883,-0.000186896701636,-0.000189406587271,-0.000191904299482,-0.000194390840871,-0.000196868046956,-0.000199338597967,-0.000201803738832,-0.000204260461447,-0.000206708169326,-0.000209146151579,-0.000211574187359,-0.000213994259652,-0.000216408717434,-0.000218816703087,-0.000221219712825,-0.000223616232649,-0.000226003692056,-0.000228382569826,-0.00023075563885,-0.000233123220486,-0.000235486508224,-0.000237843528421,-0.000240193171315,-0.000242534331113,-0.000244868124523,-0.000247192913131,-0.000249507053733,-0.000251813598877,-0.000254107238409,-0.000256388521196,-0.000258654108021,-0.00026090523344,-0.000263144386884,-0.000265372520047,-0.000267587531444,-0.000269788378716,-0.000271977127948,-0.000274153552598,-0.00027631869803,-0.000278475795278,-0.000280626617589,-0.000282773386022,-0.000284914252357,-0.000287049211134,-0.000289173822642,-0.000291291606567,-0.000293402554016,-0.000295505417257,-0.000297601830251,-0.000299690551205,-0.000301770252194,-0.000303839641104,-0.000305898318043,-0.000307944263156,-0.000309980874174,-0.000312008617831,-0.000314027042767,-0.000316036339419,-0.000318035915235,-0.000320023858214,-0.000321999883282,-0.000323965511072,-0.000325920283477,-0.000327866737644,-0.000329805964216,-0.000331735922445,-0.000333657324818,-0.000335567826825,-0.000337468263371,-0.00033935706393,-0.000341235772601,-0.000343104253913,-0.000344960091508,-0.000346802415932,-0.000348631032691,-0.000350446303195,-0.000352247516034,-0.000354036105603,-0.00035581259635,-0.00035757818631,-0.000359334864231,-0.000361079689314,-0.00036281493912,-0.000364541369472,-0.000366258612004,-0.000367965992429,-0.000369663683286,-0.000371351870829,-0.00037303101255,-0.000374699418862,-0.000376355203505,-0.000378000500472,-0.00037963504085,-0.000381257986997,-0.000382870534631,-0.000384473287539,-0.000386065382875,-0.000387646543712,-0.000389214185961,-0.000390772564412,-0.000392324620044,-0.00039386810321,-0.000395404470479,-0.000396934689069,-0.000398456114085,-0.000399968468272,-0.000401472033376,-0.000402967938891,-0.000404457763002,-0.000405940076172,-0.000407408976339,-0.000408863263763,-0.000410303566484,-0.000411727558875,-0.000413137735719,-0.000414534233202,-0.000415919582518,-0.000417291547739,-0.00041865068085,-0.000419996837481,-0.00042133403037,-0.000422663987559,-0.000423987616352,-0.000425305978108,-0.000426618623142,-0.000427924866641,-0.000429223454448,-0.000430514484481,-0.000431798567255,-0.000433073523159,-0.000434337909958,-0.000435591864521,-0.00043683391012,-0.000438065395998,-0.000439285629699,-0.000440494067007,-0.00044169119184,-0.000442877706736,-0.00044405291665,-0.000445219258131,-0.000446379038242,-0.000447532585123,-0.000448678680604,-0.000449818565671,-0.000450949647944,-0.000452073475141,-0.000453189304275,-0.000454296872277,-0.000455395939693,-0.000456484511226,-0.000457560761451,-0.000458623547227,-0.00045967429953,-0.000460710320922,-0.0004617339442,-0.000462744943444,-0.000463742827077,-0.000464729444823,-0.000465704101131,-0.000466669229346,-0.00046762409267,-0.000468569714727,-0.000469505058351,-0.000470429995698,-0.00047134654135,-0.000472254351021,-0.000473153219002,-0.000474041028843,-0.000474916847301,-0.000475780872889,-0.000476631771789,-0.000477469775277,-0.000478294428676,-0.000479107390952,-0.000479906454365,-0.000480690664675,-0.000481459556251,-0.000482214445274,-0.00048295620847,-0.000483683543586,-0.000484397656435,-0.000485099545164,-0.000485789965962,-0.000486467436308,-0.000487132201851,-0.000487784263421,-0.000488422061688,-0.000489043203708,-0.000489647551489,-0.000490234866532,-0.000490803853118,-0.000491352062753,-0.000491876679796,-0.000492376649078,-0.000492851719795,-0.000493300638758,-0.000493725540863,-0.000494129077398,-0.000494512677663,-0.000494874855436,-0.00049521895076,-0.000495545915179,-0.000495858642278,-0.000496158390324,-0.000496446148861,-0.000496722435892,-0.000496988082348,-0.000497241200651,-0.000497481080208,-0.000497707851593,-0.000497921793284,-0.000498122708534,-0.000498311040373,-0.000498486956533,-0.000498650504566,-0.000498802340311,-0.000498942399888,-0.00049907047113,-0.000499187703127,-0.000499295551915,-0.00049939280883,-0.000499480118628,-0.000499555460792,-0.000499618533362,-0.000499668365884,-0.000499706310727,-0.000499731707568,-0.000499746294143,-0.000499748975282,-0.000499739661272,-0.000499716938444,-0.000499680970775,-0.000499633069087,-0.00049957293377,-0.0004995014666,-0.000499416330227,-0.000499317664694,-0.000499205288919,-0.000499079455152,-0.000498939221391,-0.000498786362503,-0.000498619318385,-0.000498437603575,-0.000498241215386,-0.000498029762099,-0.000497804868501,-0.000497568841306,-0.000497319102787,-0.000497053841481,-0.000496772344746,-0.000496474894848,-0.000496160949378,-0.000495833519491,-0.000495493672016,-0.000495141293583,-0.000494775117198,-0.000494391710789,-0.000493991689913,-0.000493575792461,-0.000493147666604,-0.000492706005401,-0.000492253596343,-0.000491788862004,-0.0004913089052,-0.00049081239916,-0.000490300846747,-0.00048977599141,-0.000489238765895,-0.000488688971236,-0.000488126183464,-0.000487549371818,-0.000486958155517,-0.000486351359612,-0.000485729158426,-0.000485094241407,-0.000484446472212,-0.000483783851432,-0.00048310722996,-0.000482417543,-0.000481713900595,-0.000480997634612,-0.000480267807417,-0.000479523840136,-0.000478767474661,-0.000477997551006,-0.000477213172584,-0.000476415345524,-0.000475603559243,-0.00047477690887,-0.000473935731526,-0.000473079679504,-0.000472206941828,-0.000471317640721,-0.000470410766168,-0.00046948475024,-0.000468541823843,-0.000467582081487,-0.00046660605717,-0.000465613736825,-0.000464603052938,-0.000463573206777,-0.000462526019566,-0.000461462970115,-0.000460385875334,-0.000459296686141,-0.000458193301573,-0.000457074010017,-0.000455938773909,-0.00045478638776,-0.000453618535469,-0.000452437605642,-0.00045124262642,-0.000450031815653,-0.000448804612369,-0.000447559583883,-0.000446298629411,-0.000445022923114,-0.000443732097902,-0.000442427112957,-0.000441107402297,-0.000439768912173,-0.000438413503339,-0.000437041821674,-0.000435653060154,-0.000434246908259,-0.000432822531952,-0.000431377673066,-0.000429912746348,-0.000428427377682,-0.000426919814408,-0.000425392448927,-0.000423846034453,-0.000422278516075,-0.000420690464333,-0.000419083040354,-0.000417455921652,-0.000415810360798,-0.000414147375783,-0.000412465800952,-0.00041076729311,-0.000409052663913,-0.000407320347706,-0.000405570116937,-0.000403802913821,-0.00040201691988,-0.000400211800672,-0.000398386508465,-0.000396539910158,-0.000394673619907,-0.000392787486894,-0.00039088097825,-0.00038895233358,-0.000387002422474,-0.000385031488181,-0.000383039766761,-0.00038102721029,-0.000378994549396,-0.000376943122905,-0.000374871577548,-0.000372778320667,-0.000370663527135,-0.000368527982006,-0.00036637352037,-0.000364199239554,-0.000362006285085,-0.000359793510542,-0.000357562574499,-0.000355311579054,-0.000353041073621,-0.000350753119342,-0.000348446228181,-0.000346121398193,-0.000343777191209,-0.000341412070555,-0.000339025133469,-0.000336616838724,-0.000334187807275,-0.000331736570128,-0.000329265370027,-0.000326772592654,-0.000324258475398,-0.000321723564252,-0.000319167858292,-0.000316592826782,-0.000313999770975,-0.000311389497756,-0.000308759913351,-0.000306110645302,-0.000303441040753,-0.000300749877399,-0.000298038551006,-0.000295305300986,-0.000292550774415,-0.000289773612552,-0.000286973202429,-0.000284149043839,-0.000281300742768,-0.000278430724532,-0.000275537844176,-0.000272625301384,-0.000269692852096,-0.000266740186389,-0.000263767001195,-0.00026077399045,-0.000257760558995,-0.000254726616284,-0.000251674234742,-0.000248603018583,-0.000245513141922,-0.00024240452836,-0.000239274491483,-0.000236123236447,-0.000232951613831,-0.000229759215381,-0.000226545675683,-0.000223313506006,-0.000220062163253,-0.00021678994877,-0.000213497590084,-0.000210183027565,-0.000206847334781,-0.000203491759626,-0.000200115657938,-0.000196719300767,-0.00019330475458,-0.000189869299101,-0.000186410854971,-0.000182929865323,-0.000179426312954,-0.000175901800501,-0.000172357222986,-0.000168793773743,-0.000165212806949,-0.000161614512768,-0.000157997863451,-0.000154362804495,-0.000150712451641,-0.000147046391426,-0.00014336498952,-0.000139668337018,-0.000135955727928,-0.000132226548088,-0.000128478898512,-0.000124713234565,-0.000120929968181,-0.000117130046645,-0.000113313935538,-0.000109482199324,-0.000105635829398,-0.000101774127826,-9.78978848361e-05,-9.40051066873e-05,-9.00977792558e-05,-8.6174825098e-05,-8.22349233663e-05,-7.82775753108e-05,-7.43030946862e-05,-7.031122742e-05,-6.63003519029e-05,-6.22704637787e-05,-5.82230332293e-05,-5.4158883384e-05,-5.00792053971e-05,-4.5983638655e-05,-4.18738698076e-05,-3.77506318222e-05,-3.3613433826e-05,-2.9461306148e-05,-2.5296860885e-05,-2.11222775818e-05,-1.69367630435e-05,-1.27390665392e-05,-8.52777600377e-06,-4.30479306872e-06,-6.9428888861e-08,4.17774031868e-06,8.43724432105e-06,1.27067168601e-05,1.69876183601e-05,2.12827995395e-05,2.55926117434e-05,2.99147724856e-05,3.42498501186e-05,3.85973584887e-05,4.29580777863e-05,4.73323364269e-05,5.17198379396e-05,5.61191092851e-05,6.05305944706e-05,6.49529168605e-05,6.93859109749e-05,7.38982048752e-05,7.85607435555e-05,8.34341475506e-05,8.85683568781e-05,9.434112015e-05,9.94344880297e-05,0.000104221963115,0.000108751319943,0.000113082032478,0.000117282062442,0.00012141912392,0.000125426272076,0.000129233915756,0.000132778759286,0.000136010939945,0.000138553025901,0.000141721180696,0.000145142729353,0.000148771141227,0.000152546912569,0.000156401136561,0.000160264855022,0.000164136623371,0.000168015838853,0.000171902397476,0.000175795994642,0.000179697395582,0.000183606448822,0.000187523726854,0.000191447628165,0.000195377541029,0.000199312560908,0.000203253922529,0.000207201147977,0.000211153741742,0.000215112513968,0.000219077999292,0.000223048453372,0.000227022973321,0.000231000994753,0.000234981979687,0.000238968487903,0.00024295899927,0.000246954111197,0.000250955684824,0.000254962833073,0.000258974406078,0.000262990686552,0.000267011212839,0.000271036792215,0.000275066473341,0.000279100372886,0.000283137338875,0.000287178394818,0.000291219853066,0.000295260863613,0.00029930129391,0.000303342561852,0.000307383280306,0.00031142501192,0.000315468740917,0.000319513524984,0.000323559535359,0.000327605729362,0.000331653102615,0.000335701577315,0.000339750152434,0.000343799443872,0.000347846932994,0.000351891131379,0.000355930890644,0.00035996554636,0.00036399713251,0.000368025253155,0.00037204930115,0.0003760675207,0.000380081848332,0.00038409116721,0.000388094746809,0.000392095261653,0.000396092318618,0.000400086505504,0.000404077308773,0.0004080628328,0.000412043536292,0.000416020207885,0.00041999257726,0.000423959774642,0.000427922676671,0.000431880274748,0.000435830757697,0.000439775637726,0.000443710111733,0.000447633239059,0.000451544152735,0.000455443642555,0.000459328791568,0.000463200080621,0.000467057244817,0.000470899242211,0.000474727692586,0.000478540557305,0.00048233710989,0.000486118570382,0.000489884821212,0.000493636164781,0.000497372902065,0.00050109640784,0.000504806812558,0.000508501912707,0.000512179704175,0.000515837109005,0.00051947790842,0.000523103030749,0.000526713341566,0.000530307542413,0.000533884178244,0.000537439425875,0.000540971739138,0.000544480001659,0.000547967522475,0.000551437128727,0.000554887200609,0.000558315206994,0.000561720085199,0.000565099644752,0.000568454167055,0.000571784081677,0.000575091149457,0.000578378491691,0.000581642999571,0.000584880786162,0.000588092344257,0.000591277821798,0.000594436496238,0.000597569464921,0.000600676362671,0.000603757038833,0.000606810963358,0.000609835662,0.000612829041137,0.000615794627156,0.000618731972693,0.000621639696946,0.000624518868982,0.000627366802297,0.000630183069972,0.000632968674828,0.000635722343347,0.000638443912748,0.000641135489302,0.000643794086987,0.000646419032394,0.00064901194983,0.000651569576375,0.000654093764627,0.000656585404753,0.000659043603259,0.000661466856207,0.000663854448222,0.000666206477553,0.000668522246598,0.000670801798796,0.000673044544749,0.000675251205914,0.000677421216719,0.000679553050198,0.000681646171025,0.000683701519167,0.000685721244636,0.000687705152248,0.000689650141366,0.000691556904369,0.000693424213018,0.000695251372259,0.000697038836244,0.000698787787286,0.000700496485228,0.000702165021314,0.000703790353705,0.000705372100044,0.000706912787373,0.000708413066208,0.00070987242177,0.000711293502704,0.000712674463942,0.000714013712339,0.000715312285795,0.000716571241497,0.000717792200873,0.000718973852121,0.000720115708325,0.000721216877476,0.00072227780951,0.000723296167003,0.000724271139742,0.000725203690896,0.000726092559552,0.000726937386326,0.000727736302684,0.000728488129605,0.000729194379752,0.000729854052673,0.000730467242277,0.000731034777516,0.000731558131835,0.000732037866686,0.00073247588345,0.000732871320573,0.000733224660002,0.00073353817806,0.000733810765994,0.000734041230883,0.000734232221497,0.000734383360686,0.00073449518282,0.000734566694001,0.000734597190618,0.00073458616238,0.000734534792218,0.000734441536811,0.000734307272114,0.000734135707412,0.000733924942796,0.000733672437589,0.000733377444166,0.000733039707612,0.000732659634487,0.000732237636614,0.00073177325319,0.000731268004515,0.000730723404674,0.000730136314319,0.000729504673762,0.000728831321847,0.000728117346436,0.000727362129663,0.000726565755887,0.000725728319725,0.000724849376673,0.000723927307325,0.000722961336496,0.000721951597201,0.000720899983602,0.000719807156596,0.000718673728952,0.000717500954012,0.000716289366831,0.000715038915952,0.000713749878279,0.000712423584981,0.000711062439108,0.000709666179468,0.000708234665487,0.000706767039365,0.00070526187684,0.000703720257726,0.000702140891811,0.00070052543324,0.000698874483826,0.000697189048545,0.000695466837499,0.000693708282764,0.000691914441155,0.000690084316233,0.000688220099908,0.000686319802037,0.000684383047925,0.000682409884931,0.000680398554216,0.00067834949763,0.000676262759942,0.000674137673861,0.000671973772907,0.000669772142234,0.000667532148564,0.000665255030098,0.000662942978946,0.000660595284599,0.000658213274932,0.000655796597114,0.000653345113207,0.000650859996092,0.000648343092179,0.000645795227741,0.000643215952703,0.000640606922135,0.000637966903765,0.000635297521956,0.000632599064074,0.000629871570849,0.000627115790719,0.000624331236095,0.000621518339058,0.000618675386702,0.000615801482632,0.000612896059823,0.000609959418458,0.000606990804279,0.000603991042534,0.000600959373096,0.000597895320366,0.000594801331606,0.000591677166561,0.000588522826261,0.000585341340814,0.000582132377831,0.000578896492872,0.000575633943384,0.000572344819612,0.00056902882021,0.000565686683004,0.000562317741588,0.000558921004177,0.000555496796062,0.000552044993711,0.000548565141446,0.000545057484808,0.000541521233618,0.000537957597695,0.000534366570411,0.000530750031348,0.000527109341713,0.000523444973642,0.000519758667371,0.000516048877225,0.000512316538331,0.000508563490405,0.00050479047351,0.000500997646042,0.000497186416458,0.000493355535057,0.000489502429039,0.000485627401909,0.000481731456383,0.000477814862155,0.000473879536077,0.000469924134196,0.000465948436411,0.000461952309441,0.000457936757293,0.000453901131014,0.000449848949893,0.000445780356017,0.000441694891371,0.000437592322127,0.000433472530595,0.000429336868341,0.000425184594417,0.000421015888224,0.000416831248134,0.000412630027013,0.000408410328105,0.00040417158961,0.000399915561467,0.000395642519275,0.000391351436837,0.000387042056805,0.000382715775921,0.000378374069549,0.000374015591595,0.000369641213831,0.000365252892239,0.000360852942053,0.000356439329673,0.000352012937689,0.000347574530659,0.000343125125826,0.00033866398167,0.000334190158652,0.000329705368055,0.000325211941178,0.000320710421056,0.000316198748895,0.000311677608499,0.000307148888567,0.000302612252583,0.000298066692549,0.000293514976454,0.000288957171408,0.000284391692212,0.000279817775205,0.000275233659655,0.000270640919372,0.000266041956111,0.000261436321995,0.000256825189075,0.000252207814407,0.000247585013184,0.000242956354805,0.000238324407596,0.000233691434347,0.00022905776194,0.000224424050325,0.000219788692852,0.000215152123924,0.000210513973179,0.000205876249497,0.000201240109855,0.000196605314269,0.000191971522254,0.000187338276508,0.000182706997304,0.000178077513305,0.000173452203504,0.000168830120629,0.000164211695319,0.00015959697664,0.000154984616125,0.000150376213838,0.00014577308437,0.000141174731521,0.000136579635217,0.000131987595219,0.000127396752966,0.000122807079652,0.000118220435635,0.000113638834818,0.00010906250743,0.000104491096964,9.99235383204e-05,9.53608063802e-05,9.08037255833e-05,8.62548634918e-05,8.17155246473e-05,7.71878336437e-05,7.26718837655e-05,6.8165904998e-05,6.36681923518e-05,5.91803760892e-05,5.47036035019e-05,5.02379892016e-05,4.57854777999e-05,4.13443901618e-05,3.69142636573e-05,3.24944273016e-05,2.80863006776e-05,2.36898860346e-05,1.93071223599e-05,1.49372418636e-05,1.05790067129e-05,6.2331219714e-06,1.89819136669e-06,-2.42664543559e-06,-6.73840121909e-06,-1.10371019851e-05,-1.53251196861e-05,-1.96019929482e-05,-2.38674144859e-05,-2.81196887842e-05,-3.23575292311e-05,-3.65798632801e-05,-4.07861968193e-05,-4.49736773098e-05,-4.91420501612e-05,-5.32919338532e-05,-5.74214342081e-05,-6.15268613237e-05,-6.56099484215e-05,-6.96713348253e-05,-7.37107639657e-05,-7.77303387039e-05,-8.17280035954e-05,-8.57056757687e-05,-8.96638042866e-05,-9.36010624517e-05,-9.75181061036e-05,-0.000101418704444,-0.000105302978143,-0.00010916946576,-0.00011301698152,-0.000116845231753,-0.00012065312322,-0.00012444174697,-0.000128211041813,-0.000131961208658,-0.000135693527922,-0.00013940583962,-0.000143095832584,-0.000146763504533,-0.000150408177467,-0.000154028974987,-0.000157628666136,-0.000161205470315,-0.00016476060231,-0.000168292493029,-0.000171799711018,-0.000175282413695,-0.00017874050026,-0.000182173456037,-0.000185583317825,-0.000188971758149,-0.000192337155378,-0.000195678573942,-0.00019899530206,-0.000202286697432,-0.000205552947593,-0.000208795491053,-0.000212014443322,-0.00021520958844,-0.000218381060945,-0.000221527044368,-0.000224647885858,-0.000227745244005,-0.000230817092779,-0.000233864367425,-0.000236886391799,-0.000239882286057,-0.00024285083897,-0.000245793195267,-0.000248711248948,-0.000251605811579,-0.000254475285115,-0.000257317597233,-0.000260132875474,-0.000262922153623,-0.000265685834463,-0.000268423709194,-0.000271138471306,-0.0002738305473,-0.000276496701722,-0.000279135095475,-0.000281746077742,-0.000284332007424,-0.000286894371601,-0.000289432988574,-0.000291947854534,-0.000294439082079,-0.000296905150566,-0.000299344109976,-0.000301757050966,-0.000304144753759,-0.000306508041035,-0.000308845355627,-0.000311156553121,-0.000313441767621,-0.000315701362657,-0.000317934985517,-0.000320142788901,-0.000322325548134,-0.000324482521722,-0.000326613193788,-0.000328717971713,-0.00033079579994,-0.000332845955494,-0.000334868379585,-0.000336863151463,-0.00033883048725,-0.000340770054677,-0.000342682082862,-0.000344566811984,-0.000346425825888,-0.000348257709432,-0.000350063579345,-0.000351844959522,-0.000353601229631,-0.000355330727094,-0.000357031465546,-0.000358702878646,-0.000360345781087,-0.000361961094582,-0.00036354750277,-0.000365105037886,-0.000366633599333,-0.000368132400519,-0.000369600552267,-0.000371039189604,-0.000372451010501,-0.000373836386758,-0.000375196525329,-0.000376529079849,-0.000377832561695,-0.000379109622794,-0.000380359690412,-0.000381584306315,-0.00038278232115,-0.000383955905307,-0.000385105142339,-0.000386230337892,-0.000387330390574,-0.000388404307293,-0.000389454279924,-0.000390480135687,-0.000391480777778,-0.000392455642962,-0.000393407412595,-0.000394336678069,-0.000395238614819,-0.000396112738421,-0.000396958024631,-0.000397777224998,-0.000398570034841,-0.000399336313309,-0.000400076266123,-0.000400789922372,-0.000401475527619,-0.000402129966766,-0.000402756658808,-0.000403357793363,-0.000403933673161,-0.000404482950912,-0.000405007002381,-0.000405505162892,-0.000405978788395,-0.000406428027136,-0.000406824652246,-0.000407141960502,-0.000407380380763,-0.000407538874603,-0.000407616607555)
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(207)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('10Thalf-exp-H3K27ac-18002-vs-18004.pooled.sorted.MACS-2.1.0.p1e-1_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 207',bty='n')
dev.off()