# R script for Peak Model
#  -- generated by MACS
p <- c(0.0410322737557,0.0481495008277,0.0544915843572,0.0618202142134,0.0659878691042,0.0648503207886,0.0636624384768,0.0621926857858,0.0601289919389,0.0575015573338,0.058739773642,0.057863962107,0.0569176829772,0.0555787986765,0.0577733609137,0.0586491724487,0.0607027994963,0.0619913498007,0.0634611024917,0.0620215501985,0.0619712162022,0.0609041354814,0.0623839549716,0.0630483637223,0.0633604344992,0.0639040416588,0.0624846229641,0.0626054245552,0.0602397267307,0.0625651573582,0.0622027525851,0.0633201673022,0.0623839549716,0.0635617704842,0.0623235541761,0.0623839549716,0.0613068074515,0.0611054714665,0.0654341951453,0.0650214563759,0.066974415431,0.067608623784,0.0667126786505,0.0642865800305,0.063712772473,0.0617195462209,0.06132694105,0.0611054714665,0.057944496501,0.0575921585271,0.0553573290929,0.0537164408147,0.0559814706466,0.0561928734309,0.0551660599071,0.0578337617092,0.0584780368614,0.0572800877503,0.0576022253264,0.0562029402302,0.0555083310817,0.0560116710444,0.0541493131826,0.053172833655,0.0540788455878,0.0543808495654,0.0549949243198,0.0547935883348,0.0534647708333,0.0544714507587,0.0540385783908,0.0528104288819,0.0523272225177,0.0529714976699,0.0544513171601,0.0518842833506,0.0506158666447,0.0510789394104,0.0503641966634,0.049236715147,0.048401170809,0.0501628606783,0.0505554658492,0.0494783183291,0.0496695875149,0.0505655326484,0.0517634817596,0.0533037020453,0.0564848106093,0.0581961664823,0.0593739819949,0.0590719780173,0.0583572352704,0.059696119571,0.0575418245309,0.0564948774085,0.0558405354571,0.055679466669,0.0550452583161,0.0558103350593,0.0564445434123,0.0555787986765,0.0568069481854,0.0583874356681,0.0599779899501,0.0615685442321,0.0639946428521,0.0636825720753,0.063591970882,0.0642664464319,0.0664710754684,0.0688267064936,0.0684945021183,0.0671757514161,0.0677092917765,0.0678401601668,0.0682629657354,0.0668435470407,0.0672059518139,0.0690783764749,0.068484435319,0.0677998929698,0.0705481291659,0.0719071470651,0.0726420234105,0.0728030921986,0.0695716496383,0.0709407343368,0.0707091979539,0.0687361053003,0.0669039478363,0.0662999398811,0.0626054245552,0.0613974086448,0.0620718841948,0.0618202142134,0.0617698802172,0.0635617704842,0.0634208352947,0.0634107684954,0.0646892520006,0.0652328591602,0.0657059987251,0.0666321442564,0.0659073347102,0.065182525164,0.067769692572,0.0669945490295,0.0670348162266,0.066138871093,0.0653133935543,0.0650919239707,0.0671455510183,0.0654241283461,0.0664308082714,0.0687059049026,0.0680314293526,0.0665616766617,0.0663905410744,0.0666120106579,0.0664912090669,0.0671556178176,0.0668435470407,0.0699642548092,0.0692495120622,0.0693501800548,0.0685851033115,0.0706991311547,0.0703769935786,0.0714239407009,0.0726017562135,0.0743231788858,0.0726420234105,0.0704575279726,0.0750781888298,0.0716756106822,0.0722594850389,0.0706185967607,0.070195791192,0.0695515160398,0.0683737005272,0.0674173545982,0.0675582897877,0.0689173076869,0.0633906348969,0.0633000337036,0.0634007016962,0.0644476488185,0.0655247963386,0.0665012758661,0.06510199077,0.0634208352947,0.0677394921743,0.0656053307326,0.065303326755,0.0685146357168,0.0677797593713,0.0673871542004,0.0681421641444,0.0660482698997,0.069239445263,0.0690683096757,0.0685347693153,0.0704575279726,0.0725614890165,0.0715346754927,0.0740312417075,0.0735581021426,0.0714944082957,0.0715548090912,0.0719474142621,0.0731554301725,0.0706588639577,0.0684341013227,0.0679408281593,0.069239445263,0.0664610086691,0.0659274683087,0.0645382500118,0.0651724583647,0.0629879629268,0.0601189251397,0.0601994595337,0.0609544694777,0.0593135811994,0.0594847167867,0.0599377227531,0.0622329529828,0.0645382500118,0.0666925450519,0.0675784233862,0.0706789975562,0.0704977951696,0.0711118699241,0.0729440273881,0.0704172607756,0.0688065728951,0.065182525164,0.0652328591602,0.0621524185888,0.0611457386635,0.0601088583404,0.0603202611247,0.0602598603292,0.058941109627,0.059736386768,0.0618403478119,0.0640147764506,0.0642865800305,0.066018069502,0.0671556178176,0.068444168122,0.0674878221929,0.0671858182153,0.066732812249,0.0681119637466,0.0681622977429,0.0690783764749,0.069400514051,0.0679710285571,0.0674576217952,0.0669442150333,0.0691689776682,0.069319979657,0.0698937872144,0.0678804273638,0.0679106277616,0.0665717434609,0.0655952639334,0.065303326755,0.0679005609623,0.0677898261705,0.0668234134422,0.0665516098624,0.0677898261705,0.0673871542004,0.0665616766617,0.0692293784637,0.0702662587868,0.0715648758905,0.0700246556047,0.0695313824413,0.0711622039203,0.0726420234105,0.0727930253993,0.0727628250016,0.0735279017448,0.0712930723106,0.0694508480473,0.0688569068914,0.0675884901855,0.0669442150333,0.064508049614,0.0635013696887,0.0610350038717,0.0622832869791,0.0609242690799,0.0606826658978,0.0619510826037,0.0623235541761,0.0633000337036,0.0644375820192,0.0668334802415,0.0685448361145,0.071746078277,0.0729842945851,0.0744842476739,0.074172176897,0.074252711291,0.0764875407252,0.0769506134909,0.076638542714,0.0751285228261,0.0750379216328,0.0734876345478,0.0736487033359,0.0715950762882,0.073215830968,0.0737695049269,0.0710716027271,0.070074989601,0.0704675947719,0.0695011820436,0.0703165927831,0.0700548560025,0.0704172607756,0.073336632559,0.072541355418,0.0733265657598,0.0763566723349,0.0766284759148,0.0777559574311,0.0807357300101,0.0783800989848,0.0790042405385,0.0780378278102,0.0776351558401,0.0769405466916,0.078027761011,0.0764070063312,0.07588353277,0.0728634929941,0.0720883494516,0.0731151629754,0.0727527582023,0.0724809546225,0.0716856774815,0.0715548090912,0.0697931192219,0.0678200265683,0.0692998460585,0.0718769466673,0.0705682627644,0.0702561919876,0.0698635868167,0.0702662587868,0.0718165458718,0.0714541410987,0.070749465151,0.0722594850389,0.0731654969717,0.0729339605889,0.0736789037336,0.0761855367476,0.0772425506692,0.0783096313901,0.07898410694,0.0792861109176,0.0806350620175,0.0803129244414,0.0790948417318,0.0780881618065,0.0777861578289,0.0749976544358,0.0754003264059,0.0733265657598,0.0705883963629,0.0733668329568,0.0747057172574,0.0740614421052,0.0735681689418,0.0755009943984,0.0749372536403,0.0752493244171,0.07480638525,0.0761352027514,0.0783297649886,0.0774036194573,0.0760748019559,0.0781686962005,0.0792861109176,0.0793767121109,0.0806249952183,0.0798498516758,0.0815813411473,0.0813397379652,0.0810679343854,0.080614928419,0.0791753761258,0.0771620162752,0.0750781888298,0.0725111550203,0.0726923574068,0.0751486564246,0.0724809546225,0.0716756106822,0.0734876345478,0.0728836265926,0.075641929588,0.078903572546,0.0815612075488,0.0830510938383,0.0835544338009,0.0842993769457,0.0858798644284,0.0880844934648,0.0889200378028,0.0893428433715,0.088728768617,0.0870375463425,0.0862624028,0.0860711336142,0.0841685085554,0.0833832982136,0.081490739954,0.0801719892519,0.0787123033602,0.0798095844788,0.0793867789101,0.0810276671884,0.0816719423406,0.0847523829121,0.0863832043911,0.085467125659,0.0872791495246,0.0870677467403,0.0866046739746,0.0863127367963,0.0875408863052,0.0875710867029,0.0860711336142,0.0841181745591,0.084671848518,0.0855174596553,0.0876616878962,0.0900374525199,0.0911750008355,0.0910441324453,0.0927152211213,0.092705154322,0.0949903177525,0.0977888879448,0.0989667034575,0.100436456148,0.101886075241,0.101785407248,0.104422908653,0.108449628354,0.10958717667,0.112979688018,0.116140662983,0.115446053835,0.1172681445,0.120257983878,0.122825017687,0.123509560037,0.123720962821,0.126620201006,0.128240955686,0.138841295299,0.136928603441,0.140733853559,0.143290820569,0.145173312029,0.146391394739,0.150458381637,0.151454994763,0.151867733533,0.151616063551,0.144428368885,0.149049029742,0.14879735976,0.150186578057,0.149008762545,0.147740345839,0.153951560978,0.156498461189,0.15540118007,0.16066611608,0.161753330399,0.164410965402,0.166444458851,0.166363924457,0.16902155946,0.1725248056,0.170561779746,0.171497992076,0.17508177261,0.176259588123,0.180306441423,0.182682206046,0.185269373454,0.190111503895,0.196352919432,0.196312652235,0.196805925399,0.198879686045,0.205463372756,0.20244333298,0.202634602166,0.205020433589,0.206349251091,0.20514123518,0.2035305473,0.209701495242,0.21255039943,0.21471476127,0.21350674536,0.222556797888,0.227157325147,0.229885427744,0.236861719627,0.247703662422,0.253320936406,0.25515309387,0.262058918157,0.268924475248,0.273988075272,0.276071902718,0.279323478876,0.283058261399,0.285393758826,0.281769711095,0.282192516664,0.286108501573,0.285595094811,0.28561522841,0.287537987067,0.28871580258,0.287155448695,0.287105114699,0.284970953257,0.282091848671,0.282715990225,0.277149050238,0.272186118206,0.269619084396,0.262622658915,0.257347656107,0.252948464833,0.24705938727,0.242539394406,0.239096549061,0.236318112467,0.23574430491,0.233066536308,0.226996256359,0.226241246415,0.222516530691,0.220462903643,0.217473064265,0.217251594682,0.21929515493,0.214332222898,0.208191475354,0.206550587076,0.20581571073,0.202735270159,0.204023820463,0.205191569176,0.201799057828,0.197671670134,0.194591229563,0.195950247462,0.194158357195,0.197107929376,0.197208597369,0.194923433938,0.191722191776,0.19207452975,0.192024195753,0.19382615282,0.194822765946,0.189920234709,0.191269185809,0.187806206866,0.186940462131,0.184836501087,0.180145372635,0.173189214351,0.169333630237,0.165528380119,0.158149416267,0.154605902929,0.15216973751,0.149713438492,0.146904801501,0.147780613036,0.148475222184,0.145787386784,0.146874601103,0.143864628126,0.146119591159,0.14461963807,0.141307661116,0.137331275411,0.134361569631,0.130979125082,0.128935564834,0.125120247917,0.123167288862,0.122502880111,0.117620482474,0.118435893213,0.119039901168,0.116895672927,0.11564738982,0.115214517452,0.114107169534,0.114278305121,0.111862273301,0.109224771896,0.109889180647,0.106536936496,0.105489989373,0.104614177838,0.10486584782,0.102288747211,0.102802153973,0.103204825943,0.104664511835,0.101614271661,0.0986244322829,0.0983626955023,0.0970842119971,0.0976076855583,0.0961278660681,0.0971949467889,0.0956849269009,0.0945675121838,0.0926346867272,0.095171520139,0.0969332100083,0.0974868839673,0.0969634104061,0.0955339249121,0.0930675590951,0.0921917475601,0.091909877181,0.0914468044154,0.090953531252,0.0912354016311,0.0905609260811,0.0913964704191,0.0921514803631,0.0924635511399,0.0926850207235,0.09111460004,0.0887489022155,0.0911649340363,0.0905508592819,0.0880039590708,0.0884972322342,0.08868850142,0.0882354954536,0.0903897904938,0.093580965857,0.0917689419915,0.0936715670503,0.0912958024266,0.0926044863295,0.092584352731,0.0930071582996,0.0924736179392,0.0922219479579,0.089403244167,0.0859100648262,0.0885576330297,0.0850443200904,0.0841685085554,0.0825276202771,0.0815914079466,0.0797995176795,0.0775646882453,0.0753600592089,0.0764875407252,0.0769506134909,0.0753097252126,0.078943839743,0.0788431717505,0.0788935057467,0.0808565316011,0.0802927908429,0.0796787160885,0.0805947948205,0.0797189832855,0.0796887828877,0.0799907868653,0.07898410694,0.0788431717505,0.079819651278,0.0791753761258,0.0780881618065,0.0776854898364,0.0774942206505,0.0782391637953,0.0769707470894,0.0772123502715,0.0747963184507,0.0752996584134,0.0738601061202,0.0739507073134,0.0743131120866,0.075843265573,0.0751285228261,0.0734876345478,0.074252711291,0.0737292377299,0.0736084361388,0.0723903534292,0.071665543883,0.0696823844301,0.0708098659465,0.0717360114778,0.0703971271771,0.0703568599801,0.0708199327457,0.0699239876122,0.0707997991472,0.069199178066,0.0707293315524,0.0727728918008,0.07345743415,0.0703266595823,0.0700145888055,0.0688569068914,0.0680817633489,0.0708601999427,0.0714742746972,0.0732258977672,0.0703568599801,0.0699743216085,0.0670851502228,0.067014682628,0.0688367732929,0.0698635868167,0.0688367732929,0.0657663995207,0.0657563327214,0.0656556647289,0.0651321911677,0.0655952639334,0.0678401601668,0.0672562858101,0.06510199077,0.0656053307326,0.0649107215841,0.065343593952,0.0635617704842,0.0625752241574,0.0637429728708,0.061961149403,0.0582263668801,0.0586491724487,0.059454516389,0.0585283708577,0.0587901076382,0.0596457855748,0.0592632472031,0.0582364336793,0.0562029402302,0.0555485982787,0.05714921936,0.0562432074272,0.0560620050406,0.0537969752087,0.0547533211377,0.0528909632759,0.0537869084094,0.0541090459855,0.0565351446055,0.0569478833749,0.0559110030519,0.0575820917279,0.058820308036,0.059454516389,0.0586089052517,0.0585787048539,0.0580954984898,0.0571391525607,0.056394209416,0.0559009362526,0.0551559931079,0.0536057060229,0.0523976901125,0.0508172026298,0.050787002232,0.0494380511321,0.0485421059986,0.0485521727978,0.0464482117539,0.045139527851,0.0453408638361,0.0459549385905,0.0451294610518,0.0457536026054,0.0448777910704,0.045099260654,0.0464482117539,0.0470320861106,0.0487535087829,0.049790389106,0.0504950650537,0.0502534618716,0.0497601887082,0.0504145306596,0.0510588058118,0.0516326133693,0.0512198745999,0.0514413441835,0.0519648177446,0.0533137688445,0.0520956861349,0.0521661537297,0.0523473561162,0.0518138157558,0.0509178706223,0.0506158666447,0.0499212574962,0.0505755994477,0.0508172026298,0.0493575167381,0.0511292734066,0.0509682046186,0.0514010769865,0.0528909632759,0.0539177767997,0.0566559461966,0.0564042762153,0.0556996002675,0.0567666809884,0.0561526062339,0.0575116241331,0.0575216909324,0.0574914905346,0.0581357656868,0.0592833808016,0.0572196869548,0.0577632941144,0.0583975024674,0.0566660129958,0.0570384845682,0.0566559461966,0.0582867676756,0.058659239248,0.057944496501,0.0566861465943,0.0557096670668,0.0546526531452,0.0550955923123,0.0553875294907,0.0575820917279,0.0573203549473,0.0563338086205,0.0558002682601,0.0552566611004,0.0559311366504,0.0555385314795,0.0562834746242,0.0549848575206,0.0534446372348,0.051421210585,0.0493373831396,0.0488239763777,0.0493071827418,0.0486025067941,0.0493877171358,0.0504145306596,0.0482099016232,0.0481293672292,0.049830656303,0.0491461139538,0.0496796543142,0.0493474499388,0.0504950650537,0.0508574698268,0.0494078507343,0.0504346642582,0.0518943501499,0.0515520789752,0.0501326602806,0.0512802753954,0.0523272225177,0.0529211636737,0.0515722125738,0.0525486921013,0.0534949712311,0.0519748845439,0.050706467838,0.0528708296774,0.0526090928968,0.0527097608894,0.0515218785775,0.0498507899015,0.0499313242955,0.0489548447679,0.046569013345,0.0486931079874,0.0512299413991,0.0498910570985,0.0502433950723,0.0493172495411,0.050666200641,0.0543808495654,0.0545922523497,0.0540587119893,0.0546929203422,0.0533842364393,0.0527097608894,0.0531929672535,0.0546727867437,0.0565754118026,0.0560922054384,0.0536057060229,0.0541493131826,0.0545016511564,0.0561425394347,0.0565250778063,0.0579646300995,0.0584478364636,0.0579344297017,0.0568170149846,0.0566559461966,0.0566358125981,0.0570888185645,0.0568774157802,0.0560217378436,0.0566458793973,0.0556089990743,0.0551056591116,0.0570384845682,0.0568673489809,0.0588505084338,0.0599477895524,0.0606423987008,0.0617296130202,0.0637631064693,0.0631590985141,0.0620014166,0.0615786110314,0.0614779430388,0.0626356249529,0.059696119571,0.0601793259352,0.0611457386635,0.0620920177933,0.0618202142134,0.0632194993096,0.0645281832125,0.067648890981,0.0654744623423,0.0647798531939,0.0654140615468,0.0635617704842,0.0632396329081,0.0625752241574,0.0633805680977,0.064387248023,0.0654845291416,0.063793306867,0.0651523247662,0.0661187374945,0.0691186436719,0.0678401601668,0.0661690714908,0.0694810484451,0.069440781248,0.0689676416832,0.0686757045048,0.0705481291659,0.0719776146598,0.0715749426897,0.0708501331435,0.0737896385254,0.0729440273881,0.0704474611734,0.0687864392966,0.067568356587,0.0674072877989,0.0654140615468,0.0642161124357,0.0638235072648,0.0613873418456,0.0598471215598,0.0638637744618,0.0648100535916,0.0659073347102,0.0653536607513,0.0647597195953,0.0635617704842,0.062041683797,0.0615383438343,0.0622530865813,0.0641758452387,0.0600484575449,0.0575216909324,0.0564646770108,0.0544513171601,0.0539580439967,0.0531829004543,0.052498358105,0.0513306093917,0.0504044638604,0.0487132415859,0.049830656303,0.0502232614738,0.0482703024187,0.0503037958679,0.0507366682357,0.054088912387,0.0561224058362,0.0568673489809,0.0570888185645,0.0589813768241,0.0570384845682,0.0565653450033,0.0568572821816,0.0582565672778,0.0574411565383,0.0550452583161,0.0538271756065,0.0563841426167,0.057068684966,0.0556593330705,0.0581558992853,0.0590317108203,0.0602397267307,0.0605115303105,0.0601793259352,0.0596256519763,0.0599477895524,0.0582364336793,0.0571391525607,0.0580048972965,0.056434476613,0.0562029402302,0.0541694467811,0.0527298944879,0.0564646770108,0.0587901076382,0.09664127283,0.096560738436,0.0974667503687,0.095725194098,0.0963090684546,0.096802341618,0.0993291082306,0.0994297762231,0.0965305380382,0.0945876457824,0.0558405354571,0.0545821855504,0.0548741227288,0.0556190658735,0.054129179584,0.0527902952834,0.0517534149603,0.050787002232,0.050072259485,0.0495689195224,0.0525788924991,0.0519849513431,0.050746735035,0.049830656303,0.0499816582918,0.0523070889192,0.0518842833506,0.0525285585028,0.0527902952834,0.0545821855504,0.0519346173469,0.0522668217222,0.053253368049,0.0561324726354,0.0563740758175,0.0539983111938,0.0540788455878,0.0536862404169,0.0542097139781,0.0536359064206,0.053213100852,0.0559110030519,0.0559110030519,0.053927843599,0.0535453052274,0.0537265076139,0.0552264607026,0.0561022722377,0.0553170618959,0.0572800877503,0.0574814237353,0.0552264607026,0.0552063271041,0.0556895334683,0.0583975024674,0.0599679231509,0.058739773642,0.0568270817839,0.0572599541518,0.0553673958922,0.0563841426167,0.0574109561406,0.0575116241331,0.0603605283217,0.0591323788129,0.0593337147979,0.0615182102358,0.0633705012984,0.0637631064693,0.0631892989119,0.0627463597447,0.0626456917522,0.0633101005029,0.059696119571,0.0605920647046,0.0598269879613,0.0569881505719,0.0563237418212,0.0573606221443,0.057310288148,0.0587498404412,0.0589310428278,0.0583673020696,0.0589914436233,0.060491396712,0.0595149171845,0.0606725990986,0.0610249370724,0.0628168273395,0.0639141084581,0.0627262261462,0.0616289450276,0.0636523716775,0.0642161124357,0.0611860058605,0.0612162062582,0.0616088114291,0.0619108154067,0.0587095732442,0.0570284177689,0.0574210229398,0.0569579501742,0.0557600010631,0.0553371954944,0.0567163469921,0.0573404885458,0.058065298092,0.0581256988875,0.0599578563516,0.0640047096514,0.0639141084581,0.0654442619446,0.0651221243685,0.0660382031005,0.0660784702975,0.0661590046915,0.0650315231752,0.0648905879856,0.0639342420566,0.0608236010874,0.0603605283217,0.0607531334926,0.060290060727,0.0613168742508,0.0606625322993,0.0615685442321,0.0618705482097,0.0630986977186,0.0634711692909,0.0647194523983,0.066138871093,0.0645181164133,0.0634812360902,0.0620920177933,0.0621322849903,0.0621826189865,0.0608034674889,0.0614175422433,0.0606524655001,0.0610450706709,0.0612766070538,0.0629275621313,0.0654543287438,0.0683535669287,0.0687461720996,0.0677898261705,0.0690481760772,0.0679408281593,0.0681522309436,0.0657261323236,0.0656153975319,0.0642060456364,0.0623034205776,0.0600081903479,0.0592229800061,0.0599075223553,0.0539882443945,0.0471528877016,0.0414047453281,0.0365122808911,0.0)
m <- c(0.0284099316386,0.0345363423355,0.0391571097256,0.0441101570178,0.0497796828492,0.0511607211928,0.0519083509727,0.0511918724336,0.0519083509727,0.0509426625069,0.0514722336011,0.0507142200742,0.0498939040656,0.0498939040656,0.0482844232893,0.0482948070362,0.0473083510766,0.048336342024,0.0512230236744,0.05055846387,0.0510049649886,0.0516487572991,0.0556776511134,0.0567783282894,0.0591146713518,0.0577336330083,0.0568302470241,0.0582320528616,0.0561656872197,0.0565914208444,0.0562383734483,0.055563429897,0.0535593667368,0.0519914209483,0.0512126399275,0.0528844231855,0.0539227978798,0.0542758452759,0.0554699761745,0.0567160258078,0.0554803599214,0.0550234750559,0.0547431138884,0.0549715563212,0.0528844231855,0.0511814886866,0.0517110597808,0.051482617348,0.0502469514617,0.0472045136071,0.0489489830937,0.0492293442612,0.050381940172,0.0515241523358,0.0541823915534,0.055199998754,0.0559580122809,0.0544004502393,0.0543900664923,0.0555322786562,0.0539747166146,0.0545977414312,0.0521679446463,0.0511711049397,0.0502884864495,0.0482325045546,0.0483571095179,0.0479313758932,0.0483882607587,0.0492501117551,0.0496758453798,0.0500911952575,0.0507557550619,0.0495823916573,0.0484401794934,0.0492812629959,0.0482428883015,0.0487516919018,0.0477029334604,0.0487516919018,0.0482636557954,0.0487724593957,0.0480352133626,0.0490528205631,0.0501638814861,0.0503196376903,0.0499769740412,0.0498316015839,0.0530817143774,0.051856432238,0.0516487572991,0.0509841974947,0.0521367934055,0.0523963870791,0.0510880349642,0.0505999988578,0.0504338589067,0.0510880349642,0.0475264097624,0.0467995474763,0.0474329560399,0.0464361163333,0.0467268612477,0.0466230237783,0.0471629786193,0.0494889379348,0.0515864548175,0.0526975157405,0.0532063193407,0.0535801342307,0.0541512403126,0.0551273125253,0.054815800117,0.0575363418163,0.0582528203555,0.0576920980205,0.0562695246892,0.0570898406977,0.0585643327638,0.0593950325193,0.0588239264374,0.0577024817674,0.0577336330083,0.0549092538395,0.0563318271708,0.0554388249337,0.0561968384606,0.0539851003615,0.053517831749,0.0535593667368,0.0531232493652,0.0545665901904,0.0554388249337,0.0554699761745,0.0549611725742,0.0542862290229,0.0540993215779,0.0537774254226,0.0539643328676,0.0531128656182,0.053528215496,0.0524379220669,0.0524690733077,0.0540474028432,0.0535489829899,0.0551065450315,0.0559787797747,0.0547431138884,0.0546081251781,0.0568717820119,0.057775167996,0.0576713305266,0.056487583375,0.0561033847381,0.0555115111623,0.0552726849826,0.0552519174887,0.0569133169997,0.0592808113029,0.0580243779227,0.0585747165107,0.0577647842491,0.0589485314007,0.0600595923237,0.0616171543653,0.0632058676477,0.0617209918347,0.0626866803005,0.0605995471648,0.0594054162662,0.0602568835156,0.0618767480389,0.0630189602027,0.061855980545,0.0610979670181,0.0589277639068,0.0610668157773,0.0592911950499,0.0592288925682,0.0597169286746,0.0580036104288,0.0571521431794,0.0557918723298,0.0574325043469,0.0566225720853,0.0584604952943,0.0571313756855,0.057785551743,0.059457335001,0.062219411688,0.0620948067247,0.0625828428311,0.0637562062358,0.0620117367492,0.0641611723666,0.0625101566025,0.0612329557284,0.0606722333934,0.0599453711073,0.0582424366085,0.0584189603066,0.0599765223482,0.0576817142736,0.0591146713518,0.057411736853,0.0604022559729,0.0622505629289,0.064088486138,0.0633720075988,0.0624478541208,0.0610668157773,0.0602880347565,0.0630916464313,0.0631747164069,0.0647218947015,0.0638600437052,0.0656979669143,0.0657914206368,0.0670167027761,0.0690415334302,0.0729873572689,0.0719178313337,0.0712325040354,0.0714505627212,0.071865912599,0.0701733618471,0.0688442422383,0.0714505627212,0.0734027071467,0.0741191856858,0.0741295694327,0.0762790050501,0.0755936777518,0.0764659124951,0.0744722330819,0.0750952578985,0.0755417590171,0.0705990954718,0.0680031587358,0.0666117366453,0.0663313754778,0.0658848743593,0.0660198630695,0.0634031588397,0.065376070759,0.0681900661808,0.0685015785891,0.0712117365415,0.0728316010647,0.0727692985831,0.0720839712848,0.0707652354229,0.0723331812114,0.0730808109914,0.0724370186809,0.070183745594,0.0688650097322,0.067972007495,0.0668090278373,0.0677020300744,0.0647841971832,0.0660717818042,0.0634862288152,0.0629255064802,0.062967041468,0.0656771994204,0.0690934521649,0.0696853257407,0.0701006756185,0.0693634295855,0.0714713302151,0.0718347613581,0.07240586744,0.0739115107469,0.0737557545428,0.0723124137176,0.0704329555207,0.0696126395121,0.0684392761075,0.0670790052578,0.0671101564986,0.067972007495,0.0695191857896,0.0689065447199,0.0708275379046,0.0699656869082,0.0692284408752,0.0702979668104,0.0691869058874,0.0684704273483,0.0691765221405,0.0669544002945,0.0658329556245,0.0649399533874,0.062977425215,0.0638808111991,0.0678266350378,0.0671413077395,0.0682212174216,0.0687611722627,0.0682316011686,0.0702771993165,0.0720632037909,0.0708483053985,0.0715024814559,0.0706198629657,0.0656979669143,0.0648568834118,0.0662067705145,0.0665805854045,0.0659783280818,0.0653968382529,0.0643480798116,0.065002255869,0.0627697502761,0.06241670288,0.0602672672626,0.0614406306673,0.0594988699887,0.0608799083323,0.0622609466758,0.0620636554839,0.0624790053616,0.0653553032651,0.065012639616,0.0655422107101,0.0679823912419,0.06853272983,0.0729354385342,0.0723954836931,0.0724889374156,0.071855528852,0.069456883308,0.0682731361564,0.070941759121,0.0694361158141,0.0681796824339,0.0664352129473,0.0640261836563,0.0643792310524,0.0651372445793,0.0646180572321,0.0655318269632,0.0643999985463,0.0634343100805,0.0652514657957,0.066113316792,0.0676916463275,0.0677747163031,0.0678681700255,0.065936793094,0.0656252806857,0.0663625267187,0.0680966124583,0.0687507885158,0.0678785537725,0.070557560484,0.0693115108508,0.0659783280818,0.0649503371343,0.0645453710035,0.0652826170365,0.0643480798116,0.0629878089619,0.0619598180145,0.0642027073543,0.0613160257039,0.0619182830267,0.0642027073543,0.0640677186441,0.0655837456979,0.0664559804412,0.0669128653067,0.0676293438458,0.0690207659363,0.0660510143104,0.0661340842859,0.0666325041392,0.0669128653067,0.0675566576172,0.0668401790781,0.0675774251111,0.0673385989314,0.0676812625806,0.0666844228739,0.0670167027761,0.0704018042799,0.0688753934791,0.0664559804412,0.0652826170365,0.0658744906123,0.0631020301783,0.0639638811746,0.0654176057468,0.0656564319265,0.0687300210219,0.0679512400011,0.0696230232591,0.0729873572689,0.0741711044205,0.0731742647139,0.0748668154658,0.0755729102579,0.0734442421344,0.0745449193105,0.07315349722,0.0711909690476,0.0720839712848,0.0702875830635,0.0695503370305,0.0692907433569,0.0705471767371,0.0718036101173,0.0729146710403,0.0731950322078,0.0715855514315,0.0709106078801,0.0715336326968,0.0734442421344,0.0766943549279,0.0786257318595,0.0771823910343,0.0731846484608,0.0724785536687,0.070744467929,0.070370653039,0.0721462737664,0.0723331812114,0.0707756191699,0.0695088020427,0.0687611722627,0.0695088020427,0.0734442421344,0.0740153482164,0.0741711044205,0.0752094791149,0.0756144452457,0.0750537229108,0.0770577860709,0.0758117364377,0.0753237003313,0.0757909689438,0.0743787793594,0.0728939035464,0.073901127,0.0753133165843,0.0736830683142,0.0737246033019,0.0743164768777,0.0735480796039,0.0764555287482,0.0778884858264,0.0782623007164,0.0799860027091,0.0808374699585,0.0790203142433,0.0813566573057,0.0809516911749,0.0764762962421,0.0783557544389,0.0747318267555,0.071118282819,0.0708898403862,0.0690207659363,0.0674839713886,0.0664248292003,0.0652203145548,0.0632370188886,0.0643273123177,0.0625724590841,0.0635381475499,0.063704287501,0.0637250549949,0.0656460481795,0.0671932264742,0.0692492083691,0.0678058675439,0.0687923235036,0.0702460480757,0.0706094792187,0.0700695243777,0.0693426620916,0.0682731361564,0.0669232490537,0.0669232490537,0.067047854017,0.0689480797077,0.0686365672994,0.0710455965904,0.0734130908936,0.0747214430085,0.076860494879,0.0777431133692,0.0798925489866,0.0780753932714,0.0755313752702,0.0749498854413,0.0776600433937,0.0739841969755,0.0754483052946,0.0734857771222,0.0718970638398,0.0747525942494,0.0730808109914,0.0742853256369,0.076310156291,0.0742957093838,0.0731223459792,0.0762582375562,0.074627989286,0.0765905174585,0.0780753932714,0.0758532714254,0.0768397273851,0.0782726844634,0.0793629778925,0.0823119620246,0.0824054157471,0.0803390501052,0.0819692983754,0.0826234744329,0.082052368351,0.0811801336077,0.0804325038277,0.0813981922935,0.0807024812483,0.0794771991089,0.0777119621284,0.0782623007164,0.0752821653435,0.0758740389193,0.0764347612543,0.0758013526907,0.0765801337115,0.0735688470978,0.0730704272445,0.073163880967,0.0744410818411,0.074638373033,0.0767151224218,0.0762582375562,0.0755936777518,0.0764347612543,0.0763516912787,0.0763932262665,0.0777950321039,0.0767151224218,0.0767566574096,0.0770889373118,0.0738803595061,0.0752821653435,0.0775250546834,0.0786257318595,0.0775665896712,0.0788230230514,0.0786984180881,0.0786257318595,0.0803078988644,0.0792383729292,0.0806817137544,0.080930923681,0.0832153480087,0.0818343096651,0.0847729100503,0.0859878084427,0.0867250544757,0.0902866796775,0.0901101559795,0.0943778759734,0.0963715553866,0.0956446931006,0.0930695238585,0.0945959346592,0.0934225712546,0.094274038504,0.0953020294514,0.0959977404967,0.0980121874038,0.0955097043903,0.0978252799588,0.099081713339,0.099818959372,0.101428440148,0.102705641022,0.103235212117,0.102539501071,0.10322482837,0.103152142141,0.107170652208,0.107264105931,0.108707446756,0.112061397019,0.114179681395,0.116214895797,0.115934534629,0.1190911937,0.120046498419,0.124262299678,0.125539500552,0.12819773977,0.12982798804,0.131198642637,0.132652367209,0.134043789299,0.134635662875,0.140813992307,0.144874037362,0.145715120864,0.147106542955,0.150605865675,0.152869522509,0.155579680461,0.162329115975,0.164956203951,0.169431598884,0.165330018841,0.167905188083,0.171227987105,0.175786452014,0.176129115663,0.179669973371,0.181310605388,0.181777874,0.186533630101,0.189306090535,0.192732727026,0.191528212381,0.187582388542,0.185214894239,0.18463340441,0.181092546702,0.182099770156,0.178153946317,0.181009476727,0.179119634783,0.182182840131,0.185318731708,0.188340402069,0.191341304936,0.194529115248,0.201579679423,0.201828889349,0.205753945694,0.204185999906,0.21035394559,0.211433855272,0.21460089809,0.21857787317,0.218152139545,0.219782387815,0.220914216232,0.226853719484,0.231308346923,0.235254170762,0.23930383207,0.241120987785,0.24419457688,0.248078098238,0.252885773073,0.259334079925,0.263227985029,0.2631552988,0.263716021135,0.262968391355,0.261618504252,0.264079452278,0.266613086532,0.268887127113,0.275802702578,0.277827533232,0.277567939558,0.281077646025,0.283341302859,0.287183289228,0.291502927957,0.29597832289,0.293839271019,0.292053266545,0.289893447181,0.287951686502,0.289083514919,0.284483515023,0.281347623446,0.282147171961,0.277443334595,0.26978012935,0.265200896948,0.26515936196,0.261172003134,0.254754847522,0.251130919839,0.248462296874,0.247693899601,0.243737692015,0.241193674014,0.238203154894,0.235534531929,0.227923245419,0.224797737589,0.224911958806,0.220602703824,0.220530017595,0.219294351709,0.215192771666,0.215649656532,0.214548979356,0.213552139649,0.213001801061,0.208308347442,0.201880808084,0.19662663213,0.189596835449,0.184612636916,0.176347174349,0.171248754599,0.168258235479,0.165143111396,0.162194127264,0.1600343079,0.16040812279,0.15741760367,0.160802705174,0.157272231213,0.159089386928,0.154042885913,0.153939048444,0.152153043969,0.148799093707,0.148425278817,0.144801351133,0.147116926702,0.14243385683,0.140533631139,0.138685324183,0.137023924672,0.133348078254,0.13319232205,0.136639726035,0.134646046622,0.132278552319,0.137460042044,0.137636565742,0.137117378395,0.133929568083,0.13257968098,0.131416701322,0.129059590766,0.122580132673,0.119350787374,0.122330922746,0.114854624947,0.111459139696,0.108063654446,0.108312864372,0.107544467098,0.107035663498,0.106641081114,0.106080358779,0.106599546126,0.1031209909,0.0991855508085,0.10087810156,0.102207221169,0.100120088033,0.100441984189,0.101604963846,0.101480358883,0.0999227968415,0.0998812618537,0.0981056411263,0.0983029323182,0.0955097043903,0.0963923228805,0.0969738127094,0.0977110587424,0.0928514651727,0.093162977581,0.0971814876483,0.0959665892558,0.0980848736324,0.0969322777216,0.0986144447265,0.0990713295921,0.0985625259918,0.0961015779661,0.0977318262363,0.0958731355333,0.0949074470676,0.0950632032717,0.0932045125687,0.0939832935895,0.0941805847815,0.09000631851,0.0892275374892,0.090930471988,0.0922699753438,0.0937963861446,0.0914808105761,0.0911069956861,0.0904320521347,0.089819411065,0.0880645578315,0.0902139934489,0.0895494336445,0.088521442697,0.0857593660099,0.0844925488828,0.0844406301481,0.0850636549647,0.0833191854781,0.0838591403192,0.0817408559426,0.0812320523424,0.081678553461,0.0827169281554,0.0840668152581,0.0811697498607,0.08001715395,0.0772135422751,0.0800898401786,0.0801313751663,0.0810451448974,0.0815850997385,0.0816889372079,0.0801313751663,0.078345370692,0.0789476280147,0.0802559801297,0.0813670410527,0.0829349868412,0.0819381471346,0.082789614384,0.0792487566761,0.0780546257775,0.07926952417,0.0794668153619,0.0792383729292,0.0767670411565,0.074627989286,0.0709521428679,0.0696853257407,0.0672139939681,0.0691142196588,0.0697060932346,0.0685846485647,0.0670997727517,0.0667571091025,0.0682627524094,0.0703395017982,0.0688857772261,0.0709729103618,0.0710144453496,0.0699553031613,0.0699864544021,0.0698826169327,0.0717932263704,0.0705887117249,0.0711286665659,0.0702979668104,0.0715232489498,0.0685742648177,0.0678266350378,0.0682731361564,0.0678266350378,0.0656148969387,0.0653241520243,0.067047854017,0.0662379217554,0.0672659127028,0.0666428878862,0.0687715560097,0.0690103821894,0.0682004499278,0.0675670413642,0.0685431135769,0.0680862287114,0.0673178314375,0.0667571091025,0.0652306983018,0.0662067705145,0.0658848743593,0.0646803597138,0.0642130911013,0.0682835199033,0.0697060932346,0.0690207659363,0.0688753934791,0.0697683957163,0.0710975153251,0.0722708787298,0.0728316010647,0.0752510141027,0.0760401788704,0.0748045129841,0.0751056416455,0.0743995468533,0.0750744904046,0.0747525942494,0.071855528852,0.0695295695366,0.0677643325561,0.0678058675439,0.0667155741148,0.0645765222443,0.0613160257039,0.0617625268225,0.0597792311562,0.0576817142736,0.0603088022504,0.0601115110584,0.0581697503799,0.0558645585584,0.0545458226965,0.0532893893163,0.0528844231855,0.0526455970057,0.0534036105326,0.054452368974,0.0517214435277,0.0496550778859,0.0511711049397,0.0513683961316,0.0518875834788,0.0514099311194,0.0518460484911,0.0500808115106,0.0501431139923,0.0501015790045,0.0492501117551,0.050568847617,0.0510361162294,0.0499250553064,0.0485855519507,0.0495097054287,0.0499354390534,0.0506726850864,0.0490528205631,0.0491774255265,0.0504027076659,0.0510568837233,0.0493954842123,0.0500288927759,0.0512437911683,0.0491151230448,0.0482636557954,0.0477340847013,0.0494681704409,0.0479002246524,0.0467476287416,0.0458027077697,0.0455119628553,0.0466541750191,0.0463634301047,0.0478586896646,0.0486478544323,0.0486270869384,0.0474537235338,0.0494370192001,0.050008125282,0.0508907437722,0.0501534977392,0.0518979672258,0.0516383735522,0.0510049649886,0.0510880349642,0.0523237008505,0.0510672674703,0.0493747167184,0.0509011275192,0.0500808115106,0.0513476286378,0.0493124142367,0.0497381478614,0.0505896151108,0.0506103826047,0.0508803600253,0.0542239265412,0.0555322786562,0.054815800117,0.05592686104,0.0548054163701,0.0529467256671,0.0535905179776,0.0520744909238,0.0512541749153,0.0527702019691,0.0518875834788,0.0525209920424,0.0525106082955,0.0508180575436,0.0536632042062,0.0556776511134,0.0560410822564,0.056113768485,0.0570586894569,0.054826183864,0.0544627527209,0.0531855518468,0.0529778769079,0.0565810370975,0.0558334073175,0.055199998754,0.0555945811378,0.0570275382161,0.0577024817674,0.0586162514985,0.0602464997687,0.0609422108139,0.0626347615658,0.0618455967981,0.0598415336379,0.0592185088213,0.0572871318897,0.0566225720853,0.0556464998725,0.0549196375865,0.0537566579287,0.0538397279043,0.0521264096585,0.0508284412906,0.0524898408016,0.0513787798786,0.0524794570546,0.0535801342307,0.0534555292674,0.0543069965168,0.0552623012356,0.0562487571953,0.0572559806488,0.0572559806488,0.0564564321342,0.0597065449276,0.0597896149032,0.0589796826415,0.0609214433201,0.0606722333934,0.0575571093102,0.0574428880938,0.0549404050804,0.0542343102882,0.0554180574398,0.0533620755449,0.053891646639,0.054441985227,0.0524483058138,0.0517733622625,0.0526455970057,0.0508492087844,0.0521264096585,0.0527702019691,0.051119186205,0.0523444683444,0.0512022561805,0.0489385993468,0.0491462742856,0.0497589153553,0.0502158002209,0.0524898408016,0.052219863381,0.0522925496096,0.0534866805082,0.0537358904349,0.0556880348603,0.0577647842491,0.0596753936868,0.0580243779227,0.0569029332528,0.055937244787,0.0564148971464,0.0563318271708,0.0556257323787,0.0552207662478,0.0531647843529,0.0529259581732,0.0523340845974,0.0520018046952,0.0533828430388,0.0516072223113,0.054078554084,0.0558437910645,0.0569029332528,0.0563837459056,0.0569756194814,0.0571209919386,0.0561968384606,0.0583047390902,0.0601738135401,0.0610252807895,0.0586266352454,0.0574740393347,0.0578270867308,0.0586993214741,0.059820766144,0.0597896149032,0.0629566577211,0.0641507886196,0.063527763803,0.0647945809301,0.0637665899827,0.0669336328006,0.0673905176661,0.0667363416087,0.0676916463275,0.068709253528,0.0679408562542,0.0682627524094,0.0663936779595,0.0660510143104,0.0689480797077,0.0657810368898,0.0656460481795,0.0675151226295,0.0661756192737,0.0676189600989,0.0668297953312,0.0645349872565,0.0655006757223,0.0669232490537,0.0654591407346,0.0649711046282,0.066113316792,0.0652099308079,0.0643896147993,0.0622817141697,0.0598311498909,0.0615340843897,0.0638704274521,0.0626659128066,0.0633720075988,0.0654695244815,0.0629878089619,0.0646076734852,0.0647322784485,0.0645246035096,0.0653968382529,0.063527763803,0.0607345358751,0.0610979670181,0.0598830686257,0.05667449082,0.0578997729594,0.056487583375,0.0571729106733,0.0592392763151,0.0596753936868,0.0604645584545,0.0623336329044,0.060744919622,0.0596650099398,0.0605372446831,0.0609422108139,0.059457335001,0.0593015787968,0.0580347616696,0.0574740393347,0.0554284411867,0.0541097053248,0.0527390507282,0.0548677188517,0.0557918723298,0.0542031590473,0.0537878091696,0.0542239265412,0.0534970642551,0.0525106082955,0.0530609468835,0.0528325044507,0.0538501116512,0.0529571094141,0.0531336331121,0.0543692989984,0.0565291183628,0.0544627527209,0.0539747166146,0.0551376962723,0.0560203147625,0.055189615007,0.0556880348603,0.0550753937906,0.0556361161256,0.0558230235706,0.0556049648848,0.0571209919386,0.0576194117919,0.0561760709667,0.0579413079471,0.0598726848787,0.0609837458017,0.0614198631734,0.0611498857528,0.0609006758262,0.0620013530022,0.0637769737296,0.0651372445793,0.065189163314,0.0654072219998,0.0651787795671,0.0648984183996,0.0642130911013,0.0639950324155,0.0637250549949,0.0605164771892,0.0585954840046,0.0558230235706,0.0572767481427,0.0572144456611,0.0505792313639,0.0442866807159,0.0395309246156,0.0328230240898,0.0)
ycorr <- c(1.46803369108e-05,1.45292089982e-05,1.40746307574e-05,1.33291284993e-05,1.22711722217e-05,1.09125028748e-05,9.24913076171e-06,7.54428721528e-06,5.79870015848e-06,4.0199083795e-06,2.20765830881e-06,3.84815273145e-07,-1.43798864418e-06,-3.24938391421e-06,-5.0391465627e-06,-6.80571286873e-06,-8.54665864908e-06,-1.02770272345e-05,-1.19866117734e-05,-1.36873760324e-05,-1.53826908159e-05,-1.70829924685e-05,-1.88033853962e-05,-2.05504298684e-05,-2.23386486078e-05,-2.41699715659e-05,-2.6030978561e-05,-2.79151716619e-05,-2.98193897857e-05,-3.17410044795e-05,-3.36793322199e-05,-3.56480757236e-05,-3.76432229482e-05,-3.96635640605e-05,-4.17030848206e-05,-4.37675764489e-05,-4.58773690076e-05,-4.80412653511e-05,-5.02782914286e-05,-5.25761986008e-05,-5.49359833985e-05,-5.73518245341e-05,-5.98172746511e-05,-6.23396804526e-05,-6.49256073404e-05,-6.7568155121e-05,-7.02469454664e-05,-7.29564313688e-05,-7.56938508972e-05,-7.84619972644e-05,-8.12698285566e-05,-8.41228955408e-05,-8.70253230645e-05,-8.99721175238e-05,-9.29514261859e-05,-9.59653445315e-05,-9.90261620298e-05,-0.000102136926311,-0.000105295998066,-0.000108504436307,-0.000111744916165,-0.000115002119891,-0.000118270362129,-0.000121542236529,-0.000124819640298,-0.000128091782923,-0.000131338121162,-0.000134556017132,-0.000137724183689,-0.000140824102018,-0.000143844563516,-0.000146801282133,-0.000149687373996,-0.000152487286411,-0.000155192966023,-0.000157800082586,-0.000160330914698,-0.000162782034593,-0.000165159638481,-0.00016747732365,-0.000169748668987,-0.000171962172955,-0.000174118752357,-0.000176240179162,-0.00017834086696,-0.000180432404971,-0.00018251127891,-0.000184570294513,-0.000186623441496,-0.000188662015166,-0.000190692947649,-0.000192720026856,-0.00019474546874,-0.000196748700864,-0.000198710903306,-0.000200628219239,-0.000202493648344,-0.000204304385573,-0.00020605397068,-0.000207743545203,-0.000209375530626,-0.000210941524948,-0.000212439976493,-0.000213889910798,-0.000215298420056,-0.000216683427799,-0.000218047276116,-0.000219391680045,-0.000220720793062,-0.000222046462534,-0.000223357074026,-0.000224655969811,-0.000225955416347,-0.000227254427664,-0.000228558541371,-0.000229858312981,-0.000231152592028,-0.000232443319243,-0.000233724225013,-0.00023498768659,-0.000236229291731,-0.000237461767841,-0.000238671248058,-0.000239841339694,-0.000240988036399,-0.000242101018345,-0.000243177403017,-0.00024420544718,-0.000245185195511,-0.000246125512953,-0.000247030230443,-0.00024788881243,-0.000248692547711,-0.000249459670524,-0.000250177992737,-0.000250827949643,-0.000251408760311,-0.000251943619094,-0.000252432580557,-0.000252879605612,-0.000253284203276,-0.000253645764971,-0.000253978716514,-0.000254280767878,-0.000254536960743,-0.000254774464802,-0.000254996520471,-0.000255190426936,-0.000255354370763,-0.000255486784777,-0.000255586484807,-0.000255648916316,-0.000255677930638,-0.000255664219163,-0.000255621007298,-0.000255548245503,-0.000255448133261,-0.000255331070736,-0.000255214131682,-0.000255085955739,-0.000254956455205,-0.000254834207972,-0.000254724687928,-0.000254637611392,-0.000254572801324,-0.000254539354568,-0.000254538332306,-0.000254563210153,-0.000254595300118,-0.000254646866443,-0.000254718525728,-0.000254803657624,-0.000254889577804,-0.000254968910616,-0.000255030731492,-0.000255066668952,-0.000255057633482,-0.00025500171163,-0.00025491148313,-0.000254788052639,-0.000254620821997,-0.000254412452371,-0.000254163711694,-0.000253881623982,-0.000253575863058,-0.000253252076164,-0.000252925051901,-0.000252592894381,-0.000252250046964,-0.000251876114844,-0.000251478826843,-0.000251055053455,-0.000250609366317,-0.000250128574623,-0.000249608328874,-0.000249032217228,-0.000248400191418,-0.000247718841317,-0.000247006719041,-0.000246283642658,-0.000245544721979,-0.000244787038846,-0.000244000534529,-0.000243192498696,-0.000242374248457,-0.000241556017955,-0.000240743669527,-0.000239931383051,-0.00023909755511,-0.000238213076353,-0.000237268318823,-0.000236282733794,-0.000235268361679,-0.00023424445179,-0.000233205115105,-0.000232153406563,-0.00023108000261,-0.000229997515844,-0.000228914861617,-0.000227864206951,-0.000226879215226,-0.000225958414085,-0.000225093308461,-0.000224271446105,-0.000223489166632,-0.000222749173513,-0.000222060499619,-0.000221419764197,-0.000220824375801,-0.0002202613367,-0.000219708952366,-0.000219151582586,-0.000218604578477,-0.000218065205856,-0.000217537820976,-0.000217016850452,-0.000216489681503,-0.000215953003253,-0.000215413060828,-0.000214869053217,-0.000214320890562,-0.000213777738958,-0.000213225911827,-0.000212660474569,-0.000212084569998,-0.000211494153958,-0.000210902975363,-0.000210324152174,-0.000209750127317,-0.000209187590447,-0.000208640713399,-0.000208113550227,-0.000207606411446,-0.000207128691675,-0.000206669369567,-0.000206226768653,-0.000205793497069,-0.000205346841558,-0.00020487772881,-0.000204381390827,-0.000203847735703,-0.000203268045678,-0.000202647954026,-0.000201981140743,-0.000201274248519,-0.000200523460691,-0.0001997349821,-0.000198929643266,-0.000198119657282,-0.000197305114525,-0.00019649364404,-0.000195685830783,-0.000194876356929,-0.000194065535152,-0.000193255044737,-0.000192447336716,-0.000191646067563,-0.000190843938058,-0.000190031584719,-0.000189206708396,-0.000188379023991,-0.000187555678727,-0.000186745921636,-0.000185959043081,-0.000185189187268,-0.000184454272756,-0.000183755619372,-0.000183100905008,-0.000182494071746,-0.000181938678448,-0.000181429591651,-0.000180958820108,-0.000180523431603,-0.000180116892267,-0.000179744844035,-0.000179409381121,-0.000179091648154,-0.000178782633839,-0.000178484250531,-0.000178206943179,-0.000177951438236,-0.000177729797785,-0.000177544167263,-0.000177390450556,-0.000177274741866,-0.000177185930034,-0.000177131460121,-0.000177115075174,-0.000177143587927,-0.000177203269223,-0.000177290409746,-0.000177399221332,-0.000177510536733,-0.000177630591455,-0.000177752202471,-0.000177870968096,-0.000177985687874,-0.000178091314358,-0.000178186391753,-0.000178274136136,-0.000178359571351,-0.000178443732626,-0.000178538880047,-0.000178658294118,-0.000178802729725,-0.000178975098453,-0.000179176359335,-0.000179414671936,-0.000179686186977,-0.000179985405194,-0.000180303994533,-0.000180629870765,-0.000180954073796,-0.000181260649039,-0.000181544985921,-0.000181806538701,-0.000182048806963,-0.000182265648704,-0.00018245745678,-0.000182629270817,-0.000182789570245,-0.000182954531878,-0.000183143219951,-0.000183359219254,-0.000183601437911,-0.000183873612889,-0.000184168358398,-0.00018448452157,-0.000184821222471,-0.000185173552786,-0.000185531391703,-0.000185890314283,-0.000186236771386,-0.000186569479017,-0.000186895919733,-0.000187221794709,-0.000187549091066,-0.000187881824131,-0.000188222404881,-0.000188575480138,-0.000188953892891,-0.000189354053073,-0.000189769418411,-0.000190193883417,-0.000190607055677,-0.000190992359028,-0.000191352259508,-0.000191679119994,-0.000191968178377,-0.000192222102465,-0.000192432722267,-0.000192595679859,-0.000192723172365,-0.000192819695382,-0.000192912179959,-0.000193024005022,-0.000193158940335,-0.000193307804207,-0.000193474820314,-0.000193659442466,-0.000193856217502,-0.000194068179624,-0.00019428363537,-0.000194505763648,-0.000194718986986,-0.00019488902745,-0.000195006579129,-0.000195079994127,-0.000195115149701,-0.000195106861574,-0.000195058339056,-0.000194966333262,-0.000194835903739,-0.000194671430535,-0.000194465697339,-0.000194240525384,-0.000194005697744,-0.000193764784341,-0.000193510307019,-0.000193243731006,-0.000192963816876,-0.000192668417678,-0.000192361844313,-0.000192035309855,-0.000191696930055,-0.000191338614062,-0.00019096083953,-0.000190565677266,-0.000190150275436,-0.00018971736702,-0.000189266760416,-0.000188815578411,-0.000188362598721,-0.000187903243009,-0.000187440427213,-0.000186980160049,-0.000186526634685,-0.00018607101871,-0.000185614286462,-0.000185152069039,-0.000184681573784,-0.000184196508866,-0.000183685433456,-0.000183152274801,-0.000182601515371,-0.00018202547562,-0.000181411794678,-0.000180768042808,-0.000180098586931,-0.000179407460275,-0.000178705512902,-0.000177991204962,-0.000177273173016,-0.000176561184542,-0.000175855423991,-0.000175164289424,-0.000174494545114,-0.000173842373771,-0.000173208110632,-0.000172590912714,-0.000171981372656,-0.000171378735779,-0.000170780220527,-0.000170172265198,-0.000169542286971,-0.000168889383124,-0.000168213508859,-0.000167521646899,-0.000166819509876,-0.000166095103169,-0.000165346323753,-0.00016457607184,-0.000163781800138,-0.000162972283346,-0.000162158603693,-0.00016134043387,-0.000160509764539,-0.000159653821899,-0.000158764460336,-0.000157838595112,-0.000156889488687,-0.000155913314779,-0.000154919061933,-0.000153910234599,-0.000152882613067,-0.000151831170461,-0.000150763864118,-0.000149692816827,-0.000148613099567,-0.000147538247471,-0.000146470198834,-0.000145402086732,-0.000144331094766,-0.000143238546721,-0.000142118414699,-0.00014097923147,-0.000139819969086,-0.000138627099429,-0.000137407913716,-0.000136168538619,-0.000134893730818,-0.000133581164383,-0.000132232342929,-0.000130869496651,-0.00012950258324,-0.000128122705926,-0.00012672463875,-0.000125315114962,-0.000123894440085,-0.000122449533038,-0.000120976884306,-0.000119486041035,-0.000117974016725,-0.000116426680157,-0.000114829681081,-0.000113187193237,-0.000111501851532,-0.000109780630343,-0.000108021840837,-0.000106225023178,-0.000104396360779,-0.00010254168341,-0.000100658433377,-9.87515791598e-05,-9.68439629803e-05,-9.49323617054e-05,-9.30171278593e-05,-9.10983448757e-05,-8.91664584174e-05,-8.72333864425e-05,-8.53178045296e-05,-8.34123189261e-05,-8.15239929454e-05,-7.96612676285e-05,-7.78096082467e-05,-7.59744143251e-05,-7.41608115389e-05,-7.2365312601e-05,-7.05984934758e-05,-6.88588323343e-05,-6.71256705197e-05,-6.53939379952e-05,-6.36607426225e-05,-6.19108997643e-05,-6.01488243212e-05,-5.83763020097e-05,-5.65774750201e-05,-5.47557375592e-05,-5.29050734072e-05,-5.10202793391e-05,-4.91130105313e-05,-4.71843786705e-05,-4.52313166117e-05,-4.32657072975e-05,-4.12868941105e-05,-3.92803529803e-05,-3.72592438794e-05,-3.52234928366e-05,-3.31701821956e-05,-3.10985901747e-05,-2.9002766867e-05,-2.68702980386e-05,-2.47118970503e-05,-2.25205764354e-05,-2.02944642413e-05,-1.80527696314e-05,-1.58006942072e-05,-1.35395746118e-05,-1.12699987207e-05,-8.99671232873e-06,-6.72619939531e-06,-4.47081542081e-06,-2.23478944628e-06,-2.08947297991e-08,2.16751639508e-06,4.34479921938e-06,6.5297218323e-06,8.73378300732e-06,1.09542487245e-05,1.31905932049e-05,1.54525687673e-05,1.77341461255e-05,2.00445102733e-05,2.23852115909e-05,2.47648180032e-05,2.71742115219e-05,2.9606593496e-05,3.20565900451e-05,3.45254446041e-05,3.70183278981e-05,3.95320190875e-05,4.20678175274e-05,4.46367609984e-05,4.72386135705e-05,4.98736506515e-05,5.25445370281e-05,5.52500135645e-05,5.79811492398e-05,6.07380560128e-05,6.35091460199e-05,6.6300783256e-05,6.9119580927e-05,7.19580667999e-05,7.48126370581e-05,7.76781024631e-05,8.05623573237e-05,8.34637128327e-05,8.63972142457e-05,8.93630297575e-05,9.23630950517e-05,9.54148215574e-05,9.85324903162e-05,0.000101730573199,0.000105031113518,0.000108508263065,0.000111889737492,0.000115246601376,0.000118586779553,0.000121916534295,0.000125264105364,0.00012864087592,0.000132031606937,0.000135421340612,0.000138800335352,0.000142153397544,0.000145415385447,0.000148862298349,0.000152421860944,0.000156089034751,0.000159852772376,0.000163694454935,0.00016760606206,0.000171588583758,0.000175641578884,0.00017975909623,0.000183938608645,0.000188171717769,0.000192463668092,0.000196815552002,0.000201222776796,0.000205689978532,0.000210218372896,0.000214809713537,0.000219465935148,0.000224189275726,0.000228982423419,0.000233849072562,0.000238793210319,0.000243806925345,0.00024888968832,0.00025404672168,0.00025926830545,0.000264554237698,0.000269892574833,0.000275285064468,0.00028072448588,0.000286204264738,0.000291722538078,0.000297280169909,0.000302875872929,0.000308505835748,0.00031416793612,0.000319874421865,0.000325629057605,0.00033143256974,0.000337284861118,0.000343195945226,0.000349165961176,0.000355197473521,0.000361290131795,0.000367447302075,0.000373678121348,0.000379975772115,0.000386333562388,0.00039275454825,0.000399248180629,0.000405812664299,0.00041244236608,0.000419140561947,0.000425901679047,0.000432720307312,0.000439592288651,0.000446510292799,0.000453479047488,0.000460494290029,0.000467537659567,0.000474604852461,0.000481689667293,0.000488785759453,0.000495887226117,0.000502985286458,0.000510067380925,0.000517125398748,0.000524138618868,0.00053109564237,0.000537998721226,0.000544840905497,0.000551612690349,0.000558306487455,0.000564918532764,0.000571448952124,0.000577906728716,0.000584291849823,0.000590620624775,0.000596902092483,0.000603134034793,0.000609304749858,0.000615418547948,0.000621471838065,0.000627460029927,0.000633374143124,0.000639203837762,0.000644944771984,0.000650592816314,0.000656127614224,0.000661541922479,0.000666838387175,0.000672024166512,0.000677095894331,0.000682060175896,0.000686935881919,0.000691728136652,0.000696438087009,0.000701055422942,0.000705589163991,0.000710053471513,0.000714452990428,0.000718781496376,0.000723040017118,0.000727229485248,0.000731335277464,0.000735340884502,0.000739239147128,0.000743033365304,0.000746720072972,0.000750281963997,0.00075369884018,0.000756961460593,0.000760058691098,0.000762974268967,0.000765695109571,0.000768229474685,0.000770576890836,0.000772730066804,0.000774677922979,0.000776411124859,0.00077794119493,0.000779266795315,0.000780387584207,0.000781305478717,0.000782020189459,0.000782523150803,0.000782793649343,0.000782822077856,0.000782610745319,0.000782159375066,0.000781458803997,0.000780491597381,0.000779249669241,0.000777733459862,0.000775945143629,0.000773876908298,0.000771534509135,0.000768915687501,0.000766011952967,0.000762792294758,0.000759344433726,0.000755688263293,0.000751841100523,0.000747809943852,0.000743589931333,0.000739192295958,0.000734635683786,0.000729949910233,0.000725157447311,0.000720314131523,0.000715377187647,0.000710263795916,0.000704976928361,0.000699521035733,0.000693910458833,0.000688154879782,0.000682260756673,0.000676220445662,0.000670024216235,0.000663683971087,0.000657166260165,0.000650569642863,0.000643903168855,0.000637174424346,0.000630389697824,0.000623557468262,0.000616679364352,0.000609757888065,0.000602810394854,0.000595825601322,0.000588803855624,0.000581753213382,0.000574672645742,0.000567565421041,0.000560432931157,0.000553274331664,0.000546094154006,0.000538905883379,0.000531713680633,0.000524523503627,0.000517352608903,0.000510194821685,0.000503054678023,0.000495928694055,0.000488824957183,0.000481748964335,0.000474698714111,0.000467669607401,0.000460657862727,0.000453656066955,0.000446658143591,0.000439658561255,0.000432652795817,0.000425636238707,0.000418614343736,0.000411583227729,0.000404552916834,0.000397526434108,0.000390501139664,0.000383479251504,0.000376468452321,0.000369476030205,0.000362517465619,0.000355607624167,0.000348744852784,0.000341930564826,0.000335161001968,0.000328429156019,0.00032174623424,0.000315125921387,0.000308575968737,0.000302103912428,0.000295708551822,0.000289389360946,0.000283148321845,0.000276999364778,0.000270950162531,0.000265003680298,0.000259165758011,0.000253435358495,0.000247804384867,0.000242269089082,0.000236826732079,0.000231476560015,0.000226219737375,0.000221051501218,0.000215963815961,0.000210955428719,0.000206024585472,0.000201165334392,0.00019637052344,0.000191644448768,0.000186977500118,0.000182366740871,0.000177813041242,0.000173305902509,0.00016884780618,0.000164446911068,0.000160096065126,0.00015579650404,0.000151557115205,0.000147375675261,0.000143252737308,0.000139193378968,0.000135192500653,0.000131244978674,0.000127354594858,0.000123513148689,0.000119717147147,0.000115962811833,0.00011225137406,0.000108568440244,0.000104919396697,0.000101303241862,9.77209281174e-05,9.41802378221e-05,9.06804434673e-05,8.72176416393e-05,8.37932790493e-05,8.04104164133e-05,7.70657088055e-05,7.37648569115e-05,7.05135760772e-05,6.73058563968e-05,6.41414674909e-05,6.10223902494e-05,5.79417447221e-05,5.49054235803e-05,5.19176551002e-05,4.89768530396e-05,4.60814906296e-05,4.32375640112e-05,4.04365598972e-05,3.76785011056e-05,3.4961219135e-05,3.22736935309e-05,2.96142038076e-05,2.69806612556e-05,2.43653303364e-05,2.17635458115e-05,1.91681807868e-05,1.65646168588e-05,1.39474768442e-05,1.13191560632e-05,8.67800380603e-06,6.03418956537e-06,3.39107697956e-06,7.49791664136e-07,-1.88709055864e-06,-4.50691067789e-06,-7.10397381389e-06,-9.65572622599e-06,-1.21530521448e-05,-1.45954616483e-05,-1.69866954304e-05,-1.9329635997e-05,-2.16323843578e-05,-2.3896893457e-05,-2.61270104087e-05,-2.83335170298e-05,-3.05264654456e-05,-3.2718058e-05,-3.49253130059e-05,-3.71525546844e-05,-3.93947287414e-05,-4.16566077509e-05,-4.39302460046e-05,-4.62112979888e-05,-4.84926589356e-05,-5.07724448251e-05,-5.303605238e-05,-5.52835810143e-05,-5.75024571523e-05,-5.96894677956e-05,-6.18386728206e-05,-6.39488635116e-05,-6.60170783225e-05,-6.80481621053e-05,-7.00470572415e-05,-7.20123966844e-05,-7.39496051373e-05,-7.58687603622e-05,-7.77661327597e-05,-7.96471125638e-05,-8.15165937234e-05,-8.33775690079e-05,-8.52393512869e-05,-8.70981278209e-05,-8.89554610319e-05,-9.08069094636e-05,-9.26576991439e-05,-9.44964097421e-05,-9.6325768902e-05,-9.8149195141e-05,-9.99666756664e-05,-0.000101774055696,-0.00010356968036,-0.000105350899038,-0.000107114987454,-0.000108872755488,-0.000110632308944,-0.000112395458817,-0.000114163654478,-0.000115932079663,-0.000117701697883,-0.000119468295635,-0.000121233586994,-0.000123006512251,-0.000124785835053,-0.000126579362566,-0.000128371212995,-0.000130165097494,-0.000131969983108,-0.000133786631386,-0.000135617395718,-0.000137469573038,-0.000139345926312,-0.00014124410407,-0.000143166794332,-0.000145105970834,-0.000147059680662,-0.000149030902611,-0.000151002590665,-0.000152970427911,-0.000154938564938,-0.000156902751309,-0.000158857203437,-0.000160799206553,-0.00016272549687,-0.000164623874668,-0.000166493792088,-0.000168328580499,-0.000170128512847,-0.000171892016116,-0.000173607364576,-0.000175265955279,-0.000176864819505,-0.000178399880124,-0.000179872716327,-0.000181291202154,-0.000182663496772,-0.00018399692771,-0.000185290074903,-0.000186551018822,-0.000187787724894,-0.000189007069648,-0.000190216293472,-0.000191415084793,-0.000192605156051,-0.000193783522262,-0.000194945821318,-0.000196086228788,-0.000197208406307,-0.000198313716868,-0.000199395552601,-0.000200460787003,-0.000201497707602,-0.000202511328993,-0.000203506353515,-0.000204483046923,-0.00020544115518,-0.000206378217677,-0.000207293434645,-0.000208182303654,-0.000209051084823,-0.000209899544606,-0.000210726264345,-0.000211534910485,-0.000212317814632,-0.0002130736173,-0.000213801799247,-0.000214508093157,-0.000215196519428,-0.000215869589479,-0.000216524124142,-0.00021715433404,-0.000217760726328,-0.000218345273228,-0.000218908775013,-0.000219451226464,-0.000219977565356,-0.000220487034797,-0.000220979204922,-0.000221446013112,-0.000221888516065,-0.000222305441866,-0.000222700766468,-0.000223068582193,-0.000223407278905,-0.000223725226576,-0.000224020204242,-0.000224283898883,-0.000224515929165,-0.000224716441188,-0.0002248931296,-0.000225042794302,-0.000225171779502,-0.000225283343184,-0.000225382906034,-0.000225456945389,-0.000225507503112,-0.000225542682251,-0.000225560916867,-0.000225565872235,-0.000225557863245,-0.000225533877136,-0.000225493640645,-0.000225437727235,-0.000225364556939,-0.00022527982847,-0.000225196085667,-0.000225107426272,-0.000225015075293,-0.000224923080062,-0.000224828180174,-0.000224735019141,-0.000224646706211,-0.000224568040946,-0.000224492480551,-0.000224423555752,-0.000224349805433,-0.000224274547228,-0.000224202968835,-0.000224137860357,-0.000224077309212,-0.000224027259107,-0.000223990082247,-0.000223957126967,-0.000223926635473,-0.000223905895737,-0.000223894984996,-0.000223896871493,-0.000223910848281,-0.000223929539168,-0.000223950753485,-0.000223974882496,-0.000223996544744,-0.000224009610215,-0.000224024585037,-0.000224035001857,-0.00022403606808,-0.000224022333245,-0.000223992817484,-0.000223943938128,-0.000223887540475,-0.000223817285547,-0.000223731432804,-0.000223641125711,-0.000223549389499,-0.000223462677498,-0.000223389285112,-0.000223335727644,-0.000223301234076,-0.000223295295254,-0.000223312402524,-0.000223355318445,-0.000223427672835,-0.000223530196548,-0.000223652653763,-0.000223786700427,-0.000223924076401,-0.000224065339929,-0.000224205076318,-0.000224342617481,-0.000224472665061,-0.000224590096188,-0.00022468941834,-0.000224769506358,-0.00022483085758,-0.000224875826587,-0.000224908787208,-0.000224922632352,-0.000224926222862,-0.000224916980832,-0.000224898997576,-0.000224880831537,-0.000224871164022,-0.000224864369948,-0.000224861399677,-0.000224867855967,-0.000224882768559,-0.000224912825416,-0.00022495550972,-0.000225014469451,-0.000225088490886,-0.000225171766154,-0.000225255879365,-0.000225339538438,-0.000225418848948,-0.000225494173179,-0.000225564986847,-0.000225620201034,-0.000225655825944,-0.000225670979763,-0.000225658469182,-0.000225627453494,-0.000225578575369,-0.000225513895627,-0.000225445895648,-0.000225371803968,-0.000225289014307,-0.000225204667499,-0.000225128126605,-0.000225052468827,-0.000224984431814,-0.000224918402902,-0.000224854469132,-0.000224800821754,-0.000224757571696,-0.000224717597521,-0.000224686346002,-0.000224670462164,-0.000224661584752,-0.000224665790124,-0.000224688353903,-0.000224730258188,-0.000224789826868,-0.000224862910317,-0.000224944783517,-0.000225045461017,-0.000225165206074,-0.000225305652321,-0.000225462388067,-0.000225639312325,-0.000225826104471,-0.000226024685911,-0.000226235176357,-0.000226460170599,-0.000226696451492,-0.000226935860348,-0.000227169333153,-0.000227392514821,-0.000227610232649,-0.000227817156173,-0.000228016377476,-0.000228211907507,-0.000228402940808,-0.000228582773922,-0.000228751656483,-0.000228907405615,-0.000229052190726,-0.000229183484672,-0.00022929641498,-0.000229388799118,-0.000229463637331,-0.000229508571041,-0.000229519946956,-0.000229501871114,-0.000229449469519,-0.000229383934761,-0.000229335251836,-0.000229294948608,-0.000229271144542,-0.000229262528734)
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(133, 476, 499, 524, 558)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('ChIPseq_Gcn4-GSM2278610/all.1x36mers.unique.MACS2.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) : 133,476,499,524,558',bty='n')
dev.off()