# R script for Peak Model
#  -- generated by MACS
p <- c(0.0421517842244,0.0491984272183,0.0562217840778,0.0632412599149,0.0701805279559,0.0699101500624,0.0697807826493,0.0693875057134,0.069423728589,0.0694314906338,0.0695311035419,0.0693241156809,0.0692154470539,0.0690149275635,0.0690614998322,0.0692193280763,0.0693991487805,0.0695828505072,0.0696229544053,0.0694664198354,0.0693564575342,0.0693913867357,0.0694392526786,0.0694547767682,0.0693396397705,0.0693241156809,0.0691882798971,0.069167581111,0.0690744365735,0.0691210088423,0.069118421494,0.0690640871805,0.0689735299913,0.0691248898647,0.0693823310168,0.0691766368299,0.0690369200237,0.0689696489689,0.0690058718446,0.068842868904,0.068556966921,0.0685750783588,0.0686604608515,0.0686992710754,0.0684263058337,0.0684043133735,0.0685582605951,0.0686125949086,0.0685065136298,0.0685013389333,0.068881679128,0.069069261877,0.068941188138,0.069009752867,0.0690576188098,0.0691921609195,0.0692452015589,0.0692141533797,0.0692102723573,0.0692568446261,0.0691132467975,0.0690162212376,0.0689994034739,0.068813114399,0.0688765044314,0.0689541248793,0.068714795165,0.06874454967,0.0687691294785,0.0687730105009,0.068970942643,0.068970942643,0.0693060042431,0.0693292903774,0.0691313582353,0.0690213959342,0.0692581383002,0.0692141533797,0.0691365329319,0.0691352392577,0.0688842664762,0.0689282513967,0.0685297997642,0.0684457109457,0.0686643418739,0.0687135014909,0.0686307063465,0.0687212635357,0.0687225572098,0.0687367876252,0.0687406686476,0.068518156697,0.0687432559959,0.068793709287,0.0688260511403,0.0686940963789,0.0689450691604,0.0689023779141,0.0689321324191,0.0690188085859,0.0690317453272,0.0691779305041,0.0688570993195,0.0688570993195,0.0686928027048,0.0688480436005,0.0686630481997,0.0686721039187,0.0686138885828,0.068567316314,0.0685259187418,0.068488402192,0.0687277319063,0.0684431235974,0.0684172501148,0.0685272124159,0.0685052199557,0.068537561809,0.0685996581673,0.0687212635357,0.0687768915233,0.0688040586801,0.0689489501828,0.0693810373427,0.0695323972161,0.0692348521658,0.0693797436686,0.0694974680145,0.0695039363852,0.0694638324871,0.069432784308,0.0693590448825,0.0691637000886,0.0690796112701,0.0691856925488,0.0691028974044,0.0690330390013,0.0690899606631,0.0694094981736,0.0693603385566,0.0694366653303,0.0697212736393,0.0698532284007,0.0699580160053,0.0698014814354,0.0700666846324,0.0700964391374,0.07012231262,0.0698752208609,0.0700951454632,0.0702361559436,0.0701300746648,0.0701986393938,0.0702620294262,0.0704547868718,0.0706203771606,0.0707626813151,0.0707057596533,0.0709916616363,0.070861000549,0.0708299523699,0.0709166285367,0.070880405661,0.0707212837429,0.0704948907699,0.0704509058494,0.0702736724934,0.0702271002246,0.0698933322987,0.0698389979852,0.0698687524902,0.0699761274432,0.0700718593289,0.0702646167745,0.0705815669367,0.070771737034,0.0709049854695,0.0711339657908,0.0715285364009,0.0718338434959,0.0718830031129,0.0719450994712,0.0720369503345,0.0721391505909,0.0721727861183,0.0719994337847,0.0720990466928,0.072307328228,0.0723396700813,0.0722374698249,0.0725958175593,0.0726566202435,0.072740709062,0.0728636081045,0.0729515779454,0.0731042314929,0.0732879332196,0.0731676215254,0.073114580886,0.0730576592242,0.0728351472736,0.0727536458033,0.0728713701493,0.0728002180721,0.0728519650373,0.0729748640798,0.0729295854852,0.0729231171145,0.0729412285524,0.0731352796721,0.0733021636351,0.0735660731579,0.0736100580783,0.0736592176953,0.0735350249787,0.0736618050436,0.0738830233201,0.074177981022,0.0742336090097,0.0744587083086,0.0745233920151,0.0745777263286,0.0748545725928,0.0749955830731,0.0752336191133,0.0753177079318,0.0752594925959,0.0751417682499,0.0755725617357,0.0756553568801,0.0756669999473,0.0755156400739,0.0755738554098,0.0757472077435,0.0757898989898,0.0758429396292,0.0760538085126,0.0763422978439,0.0762633837219,0.0761210795674,0.0763733460231,0.0766139694115,0.0765091818069,0.076412156247,0.0765971516478,0.076668303725,0.0767510988694,0.0766902961853,0.0766747720957,0.0768442434069,0.0768727042378,0.0770473502455,0.0771094466039,0.0773552446888,0.0774587386193,0.0776075111445,0.0777938002194,0.078095226292,0.0782646976032,0.0786178706411,0.078793810323,0.0790357273856,0.0794380600404,0.079532498252,0.0798390990212,0.0800098640065,0.080192272059,0.0801237073301,0.0805674375572,0.0806023667587,0.0806334149379,0.0807951242043,0.081008580436,0.0811547656128,0.081068089446,0.0814160877874,0.0814031510461,0.0815842654245,0.0815157006955,0.0815920274693,0.0818028963527,0.0817382126461,0.0816748226137,0.0819775423604,0.0820784489427,0.0819775423604,0.0823074292639,0.0822750874107,0.0823695256222,0.0826515465829,0.0829684967451,0.0833540116363,0.0834212826911,0.0833708294,0.0834587992409,0.0838313773908,0.0838080912564,0.0842996874263,0.0847227188673,0.0851974972735,0.0857809443068,0.0863566292953,0.0872402087271,0.088332069694,0.0897512302162,0.0909530534843,0.092229909852,0.0934045659633,0.0944110444376,0.0951277399064,0.0957913947358,0.0967047286726,0.0972635958974,0.0976426424179,0.0979233697044,0.0978509239531,0.0979156076596,0.0978767974357,0.0980540307917,0.0983412264489,0.098696986835,0.09872674134,0.0988561087532,0.0991821146343,0.0992235122065,0.0992299805772,0.0995443433911,0.0997590932969,0.0998871670359,0.100065694066,0.100303730106,0.100523654709,0.100680189278,0.100750047682,0.101103220719,0.101436988645,0.10154177625,0.102050190184,0.102351616256,0.102493920411,0.102654336003,0.102777235046,0.103052787636,0.102986810255,0.103140757476,0.103408548022,0.103550852176,0.103430540482,0.10354567748,0.103874270709,0.103963534224,0.104008812819,0.104202863938,0.104636244772,0.104620720683,0.104971306372,0.104953194935,0.105045045798,0.105226160176,0.10548101398,0.105508181137,0.105851004782,0.106103271237,0.106197709449,0.106624621912,0.106847133863,0.107349079426,0.107711308183,0.107768229845,0.107686728374,0.108116228186,0.108227484161,0.108201610679,0.108605237008,0.108813518543,0.10880963752,0.108814812217,0.108861384486,0.109135643402,0.109606540785,0.109578079954,0.109785067815,0.110069676124,0.110237853761,0.110059326731,0.110354284433,0.11057550271,0.110981716387,0.111142131979,0.111048987442,0.111314190639,0.111659601632,0.112148610454,0.112202944767,0.112641500298,0.112810971609,0.113006316403,0.113071000109,0.113409942732,0.113711368804,0.114103352066,0.114074891235,0.114015382225,0.114435826318,0.114847214692,0.115158990157,0.115585902621,0.115768310673,0.115950718726,0.116290955022,0.116490180839,0.116776082822,0.117117612792,0.117140898927,0.117122787489,0.117212051004,0.117177121802,0.117385403338,0.117650606535,0.117738576376,0.11786535644,0.117760568836,0.117801966408,0.117936508518,0.118196537018,0.118331079128,0.118538066989,0.118817500601,0.118717887693,0.118930050251,0.118822675298,0.119222420604,0.119278048592,0.119184904054,0.119090465843,0.119342732298,0.119214658559,0.119306509423,0.119657095112,0.1197127231,0.119921004635,0.120095650643,0.12030134483,0.120488927579,0.120645462149,0.120632525408,0.120899022279,0.120957237615,0.120931364132,0.121049088478,0.121351808225,0.121412610909,0.121552327715,0.121848579091,0.121855047462,0.121726973723,0.122038749188,0.122259967465,0.122363461395,0.1223932159,0.122362167721,0.12236475507,0.122473423697,0.122309127082,0.12254975047,0.122829184083,0.122902923508,0.123159070986,0.123309137185,0.123402281723,0.12355493527,0.123569165686,0.12358598345,0.1242185901,0.124194010291,0.124294916874,0.124200478662,0.124078873294,0.12416554946,0.124230233167,0.124103453102,0.124194010291,0.124201772336,0.123721819233,0.123843424602,0.123632555718,0.123514831372,0.123428155206,0.123375114566,0.123416512138,0.123558816293,0.123433329902,0.123371233544,0.123457909711,0.123247040827,0.123059458078,0.12319141284,0.122830477757,0.122570449256,0.122355699351,0.122261261139,0.122116369636,0.122034868166,0.121645472252,0.12166358369,0.121644178578,0.121501874424,0.121486350334,0.121297473911,0.120919721065,0.120512213713,0.120553611286,0.120534206174,0.12056137333,0.120417775502,0.120223724382,0.12010082534,0.119952052814,0.119984394668,0.120032260611,0.11988478176,0.119786462526,0.119397066612,0.119029663159,0.11872306239,0.118565234146,0.118609219066,0.118415167946,0.118212061108,0.118296149926,0.11845397817,0.11792486545,0.117558755671,0.117717877589,0.117560049345,0.117342712091,0.116803249979,0.116711399115,0.116447489592,0.115948131378,0.115588489969,0.11557296588,0.115437130096,0.115042559486,0.114702323189,0.114444882037,0.114232719479,0.114008913855,0.113560008931,0.113215891612,0.112917052888,0.112657024387,0.112527656974,0.1122663348,0.112180952307,0.112311613394,0.112041235501,0.111598798948,0.111787675371,0.111724285339,0.111284436134,0.111072273576,0.110945493511,0.110867873064,0.110620781304,0.110191281493,0.110182225774,0.110146002898,0.109729439828,0.109514689922,0.10945129989,0.109788948838,0.109878212353,0.11008390654,0.110188694145,0.110557391272,0.110444841623,0.110615606608,0.110961017601,0.110923501051,0.11097007332,0.110415087118,0.109835521107,0.109531507686,0.109045086212,0.108407304866,0.107966161987,0.107649211825,0.107069645814,0.106807029965,0.106478436736,0.106153724529,0.106061873665,0.105738455132,0.105398218836,0.105297312254,0.105094205415,0.104637538447,0.103911787259,0.10327659326,0.102570247185,0.101831559255,0.100850954264,0.0996724171301,0.0988806885617,0.0976491107886,0.0963114517367,0.095123858884,0.0939686078846,0.0930384561841,0.0923372848049,0.0916270577068,0.0910319676063,0.0905054422348,0.0900280764803,0.0895998703428,0.0895119005019,0.0892441099567,0.0893890014594,0.0891897756431,0.088755101135,0.0884640244554,0.0885338828585,0.0884536750624,0.0881147324399,0.0879685472631,0.0878171873897,0.0878508229171,0.0875907944167,0.0877085187627,0.0877900202329,0.0879724282855,0.087495062531,0.0872660822097,0.0873139481526,0.0872052795255,0.0869762992043,0.0866399439301,0.0865571487857,0.0861121248845,0.0856761567022,0.0852259581044,0.0851159958033,0.0851185831515,0.0848119823824,0.0845144373322,0.0845390171407,0.084630868004,0.0845286677476,0.084385069919,0.0843954193121,0.0843488470433,0.084237591068,0.0840254285105,0.0841185730479,0.0839141725352,0.0836826048656,0.0833760040965,0.0830254184069,0.0831185629443,0.0830499982154,0.0829296865212,0.0828895826231,0.0828417166802,0.0825674577644,0.0825700451126,0.0824419713736,0.0823630572516,0.0824199789134,0.0821573630647,0.0819348511141,0.0817744355218,0.081559685616,0.0813319989688,0.0812090999264,0.0812323860607,0.081087494558,0.0808429901472,0.0807537266321,0.0803617433703,0.0801392314197,0.0799516486706,0.0799193068173,0.0794859259833,0.0795467286675,0.0794613461748,0.0790874743508,0.0789775120496,0.0787575874473,0.0788326205469,0.0787097215044,0.0785531869345,0.0782595229067,0.078469098116,0.0779878513391,0.0776553770873,0.0777498152989,0.0776786632217,0.0776010427738,0.0775518831568,0.0775415337637,0.0775027235398,0.0773759434749,0.0772129405344,0.0769516183598,0.0767653292849,0.0765259995706,0.0763513535628,0.0760331097265,0.0759904184802,0.0758429396292,0.0756398327905,0.0755195210963,0.0753940347056,0.0753409940662,0.0751262441604,0.075053798409,0.07486621566,0.0750033451179,0.0746928633263,0.0747446102916,0.0747756584708,0.0746449973835,0.0742724192336,0.0742633635147,0.0743487460074,0.0744160170622,0.0745311540599,0.0741443454946,0.0740731934174,0.0737652989741,0.0735803035733,0.0734949210806,0.0737174330312,0.0737691799965,0.0736669797401,0.0733875461277,0.0730266110451,0.0732944015903,0.0732840521972,0.0731275176273,0.0730175553261,0.0727575268257,0.0725518326388,0.0723849486759,0.0723435511037,0.0723823613276,0.0724418703377,0.0721430316133,0.0717872712272,0.0717911522495,0.0716604911623,0.0718635980009,0.0718623043268,0.0718700663716,0.0716811899484,0.0716242682866,0.0715220680302,0.0711973558232,0.0713008497537,0.0712866193383,0.07122452298,0.0708571195267,0.0707264584394,0.0705906226556,0.0705906226556,0.0704651362648,0.0701766469335,0.0705492250834,0.0704315007374,0.070417270322,0.0703344751776,0.0704923034216,0.0703499992671,0.0701611228439,0.070004588274,0.0697950130648,0.0698816892316,0.0695763821365,0.0696126050122,0.0693629259049,0.0691611127403,0.0691391202801,0.0692038039867,0.0693085915913,0.0693616322307,0.069472888206,0.0694159665442,0.0693318777257,0.0691313582353,0.069137826606,0.0692400268624,0.0692102723573,0.0691028974044,0.0689321324191,0.0685983644932,0.0684754654507,0.0684301868561,0.0685492048762,0.0685608479434,0.0683926703063,0.068419837463,0.0684275995078,0.0682231989951,0.0683098751619,0.0684651160576,0.0684819338213,0.0684146627665,0.0683137561843,0.0681740393781,0.0682749459603,0.0683473917117,0.0681611026368,0.0684081943959,0.0683590347789,0.0682943510723,0.0683085814877,0.0683189308808,0.068242604107,0.0683241055773,0.068439242575,0.0684043133735,0.0683629158013,0.0681313481317,0.0680640770769,0.0681986191866,0.068183095097,0.0682697712638,0.0683021131171,0.0682736522862,0.0679424717085,0.0677665320267,0.0679256539448,0.0681455785472,0.0681818014229,0.0681132366939,0.0679812819325,0.0676539823772,0.0675453137502,0.0676539823772,0.067828628385,0.0677911118352,0.0676837368823,0.0675582504915,0.0675052098521,0.067484511066,0.0673305638444,0.0676268152205,0.0677510079371,0.0673913665286,0.0672594117671,0.0673435005857,0.0672050774536,0.0672244825656,0.0672102521502,0.0672322446104,0.0673499689563,0.0672568244189,0.0671559178366,0.0674625186058,0.0676268152205,0.0675556631432,0.0677031419942,0.0677290154769,0.0677316028251,0.0677018483201,0.0677367775216,0.0676151721533,0.0677251344545,0.0677587699819,0.0677277218027,0.0675867113224,0.0675880049965,0.0675362580313,0.0676087037826,0.0676902052529,0.0675905923448,0.0678299220591,0.0677083166908,0.0676371646135,0.0678273347108,0.0679437653827,0.0679592894723,0.0677328964993,0.0678325094074,0.0678312157332,0.0680382035943,0.0678234536885,0.0680705454476,0.068183095097,0.0678454461487,0.06785838289,0.0676682127927,0.0678131042954,0.0676488076807,0.06785838289,0.0680032743927,0.0681313481317,0.0681313481317,0.0680589023804,0.0681714520298,0.0681222924128,0.0683784398908,0.0685362681349,0.0685789593812,0.0682969384206,0.0680472593132,0.0681067683232,0.0681494595696,0.0681908571418,0.0683655031495,0.068567316314,0.0684819338213,0.068478052799,0.0685052199557,0.0686514051326,0.0687173825133,0.0689127273071,0.0687536053889,0.0687691294785,0.0685983644932,0.0683642094754,0.0685388554831,0.0685052199557,0.068478052799,0.0686009518414,0.0687070331202,0.0684961642368,0.0684340678785,0.0683512727341,0.0686630481997,0.0688092333766,0.0688247574662,0.0688273448144,0.0688674487125,0.0687290255805,0.0686255316499,0.0686695165704,0.0687070331202,0.0687199698615,0.0683564474306,0.0685880151001,0.0684146627665,0.0683331612962,0.068153340592,0.0682244926692,0.0681546342661,0.0682180242985,0.0685543795727,0.068763954782,0.0689334260932,0.0688480436005,0.0690951353596,0.0693383460964,0.0696540025844,0.0695375719126,0.0697820763234,0.069817005525,0.0696954001566,0.0696772887188,0.0698299422663,0.069876514535,0.0697911320424,0.0695970809226,0.0695052300593,0.069650121562,0.0697756079528,0.0697963067389,0.0699347298709,0.0699347298709,0.0699347298709,0.0698946259729,0.0701145505752,0.0703862221428,0.0705311136455,0.0704793666803,0.0704431438046,0.0705142958818,0.0701882900007,0.0701468924285,0.0700886770926,0.0702529737073,0.0701947583714,0.0700382238015,0.0701430114061,0.0701999330679,0.0700796213737,0.0700873834185,0.0702879029088,0.0704017462324,0.0703603486602,0.0701236062941,0.0700822087219,0.0702633231003,0.0702879029088,0.0704923034216,0.0706384885984,0.0708571195267,0.0709463830417,0.0711481962062,0.0711326721166,0.0712633332039,0.0713797638758,0.0712620395298,0.0710641073877,0.0709334463004,0.0708415954371,0.0705957973521,0.0706721241259,0.070575098566,0.0707536255961,0.0708713499421,0.0707807927529,0.0709218032332,0.0711042112858,0.0712620395298,0.0713745891792,0.0713357789553,0.0711727760147,0.0712646268781,0.071313786495,0.0713073181244,0.0713810575499,0.0712296976765,0.0712775636194,0.0713163738433,0.0714716147391,0.0716993013862,0.071854542282,0.0717484610032,0.0718493675855,0.0719722666279,0.0719813223469,0.0720343629863,0.0719075829214,0.0719593298866,0.0719489804936,0.0719657982573,0.0717872712272,0.0716488480951,0.0714159867514,0.0715544098835,0.0716941266897,0.071884296787,0.072209008994,0.0720291882897,0.0720291882897,0.0722038342975,0.07238624235,0.0724612754496,0.0728209168582,0.0725867618404,0.0724742121909,0.0725660630543,0.0722491128921,0.0722219457353,0.0723655435639,0.0722672243299,0.0721507936581,0.0720537680982,0.0718868841353,0.0717937395978,0.0717846838789,0.0717588103963,0.0719308690557,0.0719347500781,0.0716721342295,0.0716617848364,0.0719127576179,0.0722555812627,0.0722297077801,0.0723474321261,0.0723513131485,0.0722064216457,0.0721572620287,0.0722374698249,0.0724289335963,0.0722400571732,0.0723319080365,0.0723422574295,0.0723707182604,0.0723474321261,0.0724121158326,0.0726799063778,0.0727911623531,0.0730201426744,0.0728804258682,0.0729451095748,0.0726695569848,0.0724832679099,0.0724198778774,0.0724470450342,0.0724172905292,0.0721714924442,0.0721223328272,0.0720472997276,0.071963210909,0.0720071958295,0.0720964593446,0.0721042213894,0.0720162515484,0.0718985272025,0.071952861516,0.071982616021,0.0717963269461,0.0719683856056,0.0720550617724,0.0720861099515,0.0719852033693,0.072149499984,0.0724819742357,0.0725841744921,0.0726048732782,0.0724819742357,0.0726928431192,0.0725492452906,0.0725479516164,0.0725738250991,0.0725854681662,0.0725492452906,0.0723526068226,0.0723836550017,0.0722762800488,0.0725712377508,0.0723383764071,0.0723707182604,0.0724573944272,0.0724211715516,0.0725427769199,0.0725854681662,0.0725699440767,0.0725220781338,0.0724095284844,0.0723163839469,0.0726061669523,0.0723551941708,0.0723332017106,0.0723681309122,0.0723888296983,0.0723306143624,0.072337082733,0.0724910299546,0.0728040990945,0.0727859876566,0.0728299725771,0.0728364409477,0.0728053927686,0.0726359214574,0.0724509260566,0.0722180647129,0.0723396700813,0.072042125031,0.0717536356997,0.0715919264333,0.0715544098835,0.0716320303314,0.0716359113538,0.0719438057971,0.0719166386403,0.07205118075,0.0720266009415,0.0722154773647,0.0723163839469,0.0726385088056,0.07238624235,0.072494910977,0.0724172905292,0.0721391505909,0.072454807079,0.0726501518728,0.0724806805616,0.0724987919994,0.072553126313,0.0724431640118,0.0727006051639,0.072533721201,0.0725738250991,0.0727238912983,0.072514316089,0.0724017664396,0.0723901233724,0.072307328228,0.0722310014542,0.072130094872,0.0719541551901,0.0718765347422,0.0720641174913,0.0721236265013,0.0720369503345,0.0721016340411,0.0722517002403,0.0723539004967,0.072189603882,0.0723241459917,0.0723797739793,0.0725130224149,0.072287923116,0.0721184518048,0.0721740797924,0.0718817094387,0.0718260814511,0.0718377245183,0.0719567425384,0.0717872712272,0.0717432863067,0.0715776960179,0.0644055666332,0.0572243815297,0.0500703635828,0.0430547687681,0.0)
m <- c(0.0429626827987,0.0501901951045,0.0575315672533,0.0646879171572,0.0717601660408,0.0718339161663,0.0718753197456,0.0717692230737,0.0716851220534,0.0719180171867,0.0719464821475,0.0721095087408,0.0720085875164,0.0721509123201,0.0723488731835,0.0724161539998,0.0726011762446,0.0724899041254,0.0726192903106,0.0725274261191,0.0724187417235,0.0722699476105,0.072213017689,0.0722337194786,0.0719645962134,0.0718468547849,0.0718170959623,0.0718274468571,0.07180156962,0.0721496184583,0.0721586754912,0.0721030394316,0.0722867678146,0.0721470307345,0.0722880616764,0.0723488731835,0.0722181931364,0.0723126450516,0.072282886229,0.0721754956953,0.0722583028538,0.0723139389135,0.072222074722,0.072361811802,0.0724950795728,0.0724510882698,0.0725222506717,0.0724847286779,0.0723928644864,0.0723631056638,0.0723398161505,0.0724549698553,0.0723566363546,0.0722117238272,0.0722104299653,0.0722984125712,0.0722647721631,0.0722298378931,0.0722958248475,0.0721651448005,0.0721845527283,0.072152206182,0.0722246624457,0.072396746072,0.0723592240783,0.0724355619276,0.0722971187094,0.0724704961976,0.0725597726654,0.0725662419746,0.0726076455539,0.0724601453028,0.0725144875005,0.0723695749731,0.0723048818805,0.0723889829009,0.0725947069354,0.0724368557894,0.0724743777831,0.0724730839213,0.0725248383954,0.0725701235602,0.0726658693372,0.0727422071865,0.0729712207343,0.0728288959306,0.0728392468254,0.0729582821158,0.0729518128066,0.0732972739211,0.0733399713622,0.0733464406714,0.0729893348003,0.0730333261032,0.0728922951614,0.0728948828851,0.0729712207343,0.0730126243136,0.0731420104988,0.0729117030891,0.0728366591017,0.0729621637014,0.0731717693214,0.0731549491173,0.0731640061503,0.0731834140781,0.0730837867155,0.0728379529636,0.0727680844236,0.0727344440154,0.0727719660091,0.0728728872336,0.0729906286621,0.072903939918,0.0730385015506,0.0730048611425,0.0729013521943,0.0730734358206,0.0730604972021,0.0731122516762,0.0729285232932,0.072755145805,0.0725248383954,0.0726399921002,0.0725882376261,0.0725623603891,0.072790080075,0.0729531066684,0.0727913739369,0.0727654966999,0.0728069002791,0.0726801018176,0.0726904527124,0.0728094880028,0.0727784353184,0.072878062681,0.0728457161347,0.0726749263702,0.072869005648,0.072615408725,0.072799137108,0.0728159573121,0.0729414619117,0.072790080075,0.072694334298,0.0725093120531,0.0723566363546,0.0722156054127,0.0723152327753,0.0725507156324,0.0723462854598,0.0723579302164,0.0723436977361,0.0723333468413,0.0725261322572,0.0725843560406,0.0725351892902,0.0725080181913,0.072187140452,0.0720538726812,0.0721483245964,0.0722000790705,0.0721677325242,0.0722194869983,0.0718792013312,0.0719529514567,0.0719917673123,0.0720771621945,0.0720590481286,0.0721108026027,0.0718701442982,0.0719930611742,0.0720047059308,0.0718494425086,0.0718843767786,0.0717951003108,0.0718817890549,0.0718054512056,0.0719645962134,0.0718080389293,0.0721250350831,0.0720150568256,0.0719063724301,0.0718416793375,0.0719710655227,0.0718520302323,0.0717109992904,0.0718817890549,0.0717536967315,0.0718727320219,0.071933543529,0.0717588721789,0.0718753197456,0.0720021182071,0.0721004517079,0.0722117238272,0.0722841800909,0.0721612632149,0.072178083419,0.0722337194786,0.0722557151301,0.0721806711427,0.0720344647534,0.071854617956,0.0716061964804,0.0718041573437,0.0716877097771,0.0716087842041,0.0716734772967,0.0715725560722,0.071373301347,0.071259441504,0.0714185865118,0.0715324463548,0.0714315251303,0.0712607353659,0.0712982573596,0.0713318977677,0.0712775555699,0.0711947484114,0.0710938271869,0.0712400335762,0.0711002964962,0.0709631471399,0.0710692438118,0.0708065898558,0.0706319185057,0.070647444848,0.0706008658213,0.070603453545,0.0706759098087,0.0706008658213,0.070577576308,0.0707160195261,0.0706435632624,0.0707276642828,0.0707004931839,0.0706681466376,0.0705956903739,0.0706953177365,0.0706461509861,0.0708208223362,0.0706345062295,0.0703252732468,0.0703563259313,0.0703175100757,0.0703472688983,0.0702968082861,0.0701816545812,0.070131193969,0.0699487594478,0.0698788909078,0.0698672461512,0.0699086497304,0.0700548561197,0.0701324878308,0.0703084530427,0.0701738914101,0.0701286062453,0.0700354481919,0.0702942205624,0.0702424660883,0.0703485627601,0.0706047474069,0.0703822031683,0.0701506018968,0.069903474283,0.070061325429,0.0700509745342,0.0699073558686,0.0696666975641,0.06961494309,0.0694363901544,0.069203495021,0.0691944379881,0.0693199425877,0.0693328812062,0.0691711484747,0.0692099643303,0.0693057101074,0.0690844597306,0.0689291963084,0.0688515645973,0.0688567400447,0.0688347443932,0.0688813234199,0.0688412137025,0.0687558188202,0.0686950073132,0.068565621128,0.0685785597465,0.0685358623054,0.068591498365,0.0684452919757,0.0681722871249,0.0680532518345,0.0680416070779,0.0680092605316,0.0679109270308,0.0679600937812,0.068119238789,0.0682525065598,0.0681218265127,0.0679820894327,0.0682188661516,0.0682253354609,0.0682007520857,0.0683534277842,0.0684323533572,0.0684362349427,0.0682266293227,0.0680791290716,0.068189107329,0.0684401165283,0.0684220024624,0.0681205326508,0.0680959492756,0.067926453373,0.067961387643,0.0681011247231,0.0681270019601,0.0681942827764,0.0681360589931,0.0680118482553,0.0681063001705,0.0683650725409,0.0682887346916,0.0683184935142,0.0682292170464,0.0681205326508,0.0682628574546,0.0681489976116,0.0681502914734,0.0681425283023,0.0678889313793,0.0678281198723,0.0678772866226,0.0679083393071,0.0678785804845,0.0678294137341,0.0679018699978,0.0680868922427,0.0682111029805,0.0682227477372,0.0682719144875,0.0681929889146,0.0681671116775,0.0681438221642,0.0680804229334,0.0680234930119,0.0678708173134,0.0677440188519,0.0676845012067,0.0675732290874,0.0675370009555,0.0676676810026,0.0674968912381,0.0675344132318,0.0677323740952,0.0676249835615,0.067558996607,0.0677491942993,0.0677970671878,0.0678941068267,0.0678488216619,0.0678902252412,0.0680985369994,0.0681360589931,0.0682615635927,0.0683624848172,0.0684142392913,0.068328844409,0.0682421556649,0.0683081426194,0.0683611909553,0.0682123968423,0.0682292170464,0.0680972431375,0.0677491942993,0.067821650563,0.0678837559319,0.0678203567012,0.067935510406,0.0678527032475,0.0678837559319,0.0679393919915,0.0681153572034,0.0681839318816,0.0683210812379,0.0682369802175,0.0683624848172,0.0684064761201,0.0684038883964,0.0687131213791,0.0687946346758,0.0688399198406,0.0686600730432,0.0688645032158,0.0689266085847,0.0689990648484,0.0688839111436,0.0689214331373,0.0689059067951,0.0687415863398,0.0684957525879,0.0683767172976,0.0683780111594,0.0681179449271,0.0683120242049,0.0682977917246,0.0683974190872,0.0681787564342,0.0682874408298,0.0680687781768,0.0684724630746,0.0686833625565,0.0687247661358,0.0689925955391,0.0689537796836,0.068958955131,0.0688062794324,0.0691556221325,0.0690223543617,0.0692112581922,0.0692720696992,0.0693406443774,0.0693807540948,0.0694118067792,0.06944027174,0.069658934393,0.0697947898874,0.0698607768419,0.070140251002,0.0702566985686,0.0702618740161,0.0702282336079,0.0703524443457,0.0703123346283,0.0702838696675,0.070384790892,0.0706629711902,0.0707677740002,0.0707315458684,0.0707496599343,0.0706953177365,0.0708906908762,0.0710666560881,0.0711662834507,0.0714056478933,0.0714405821633,0.0714923366374,0.0714599900911,0.0715803192433,0.0719102540156,0.0720357586153,0.072222074722,0.0722427765116,0.0723902767627,0.0723669872494,0.072501548882,0.0723954522102,0.0723048818805,0.0722958248475,0.0721961974849,0.0721573816294,0.0721987852086,0.0722867678146,0.0722233685838,0.0722660660249,0.0723242898083,0.0725067243294,0.0728819442665,0.0730811989918,0.0732118790388,0.07349911637,0.0734874716133,0.0736634368252,0.0737203667467,0.0739028012678,0.0739079767152,0.0739092705771,0.0739338539523,0.0741654552238,0.0743220125079,0.0743841178768,0.074417758285,0.0744164644231,0.074776158018,0.0748563774528,0.0750957418955,0.0753195799959,0.0756870367619,0.0756145804982,0.075589997123,0.0757711377823,0.0759678047838,0.0761489454431,0.0760958971071,0.0761567086142,0.0761864674368,0.0762498666675,0.0761450638575,0.0762873886612,0.0764982881431,0.0765267531039,0.0766509638417,0.0768993853173,0.0770028942655,0.0773755264789,0.0773444737944,0.0775514916907,0.0775721934804,0.0779836415493,0.0782255937157,0.0783303965257,0.0786680944691,0.0788155947202,0.0789682704188,0.0788362965099,0.0790911872947,0.0792710340922,0.0795906179696,0.0795453328048,0.0796824821611,0.079946429979,0.0797264734641,0.0796993023652,0.0801275706383,0.0802194348298,0.0803281192253,0.0804950274043,0.0805597204969,0.0807964972158,0.0809090631969,0.0810112782832,0.0813657964307,0.0815404677807,0.0817009066504,0.0821485828512,0.0825561493346,0.0826700091776,0.0829261938243,0.0829650096799,0.0830853388321,0.0832561285966,0.0834411508415,0.0835446597896,0.0834049227096,0.0834424447033,0.0833932779529,0.0837542654097,0.08376849789,0.0838383664301,0.0839095288319,0.0840609106686,0.0843843761316,0.0845810431332,0.0847738285491,0.0849083901817,0.0850157807155,0.0848385216417,0.0849782587218,0.0850338947814,0.0854763955348,0.0855824922067,0.0853897067907,0.08543111037,0.0858115057545,0.0858347952678,0.0862488310605,0.0863950374498,0.0865968798987,0.0867197967747,0.0867288538076,0.0868090732425,0.0869371655658,0.0870562008562,0.087136420291,0.0872412231011,0.0872878021277,0.0873951926615,0.0877975836975,0.0880977596472,0.0880227156597,0.0882323212798,0.0886049534932,0.0888870153769,0.0891897790503,0.0892829371037,0.0895223015463,0.0898354161145,0.0897539028178,0.0898716442464,0.0901562938538,0.0903529608553,0.0904603513891,0.0903891889872,0.0904073030531,0.0909442557218,0.0913673485474,0.0919638188612,0.0925809909647,0.0935449180445,0.0944545029265,0.0955193512308,0.096811919221,0.0985845099584,0.0998460252642,0.101011794793,0.101784230319,0.10282578911,0.10362280801,0.104405594431,0.10480281002,0.105359170616,0.105700750145,0.10557136396,0.105660640427,0.105981518167,0.106405904854,0.106550817382,0.107050248057,0.107400884619,0.108113802499,0.108539483048,0.108818957208,0.109418015246,0.11002871804,0.110462161761,0.110605780426,0.110933127475,0.110970649468,0.111141439233,0.111154377851,0.111090978621,0.111057338213,0.11086714052,0.110639420834,0.110600604979,0.110808916737,0.110685999861,0.111009465324,0.110755868401,0.110709289374,0.110880079139,0.111050868903,0.111210013911,0.111605935638,0.111665453283,0.111450672216,0.11157229523,0.111594290881,0.111983743299,0.112267099044,0.112437888809,0.112631968087,0.112951551964,0.113020126642,0.113099052215,0.113555785449,0.114156137348,0.114602519687,0.114431729923,0.114759076971,0.114905283361,0.115303792811,0.115276621712,0.115843333203,0.116359584082,0.11666493548,0.116689518855,0.116578246735,0.117121668713,0.117220002214,0.117464542104,0.117495594789,0.117873402449,0.117882459482,0.117947152575,0.118274499624,0.118208512669,0.118680772245,0.118839917253,0.118962834129,0.119088338728,0.11922936967,0.119449326185,0.11933417248,0.119506256107,0.119693866075,0.120406783956,0.120223055573,0.120470183187,0.120872574223,0.121373298759,0.121535031491,0.121819681098,0.122013760376,0.122213015101,0.12222595372,0.121977532244,0.122161260627,0.122277708194,0.122326874944,0.122315230188,0.122394155761,0.122457554991,0.122689156263,0.122510603327,0.122866415337,0.122985450627,0.12288970485,0.122888410988,0.12294534091,0.123100604332,0.123223521208,0.123349025807,0.12337878463,0.123495232197,0.123151064944,0.123213170313,0.123584508665,0.123552162118,0.123655671066,0.123546986671,0.123581920941,0.12332961788,0.123214464175,0.12334385036,0.123826460831,0.123918325022,0.123827754693,0.124076176168,0.124201680768,0.124087820925,0.12434271171,0.124424225007,0.124580782291,0.124466922448,0.123941614536,0.123875627581,0.123857513515,0.123654377205,0.123512052401,0.123456416341,0.12315494653,0.123147183358,0.122788783625,0.122765494112,0.122724090533,0.122388980313,0.122255712542,0.122134089528,0.121760163453,0.121815799513,0.121603606169,0.121528562182,0.12147163226,0.121051127158,0.120946324348,0.12096832,0.120778122307,0.12057757372,0.120650029984,0.120365380376,0.1203679681,0.120041914913,0.120115665039,0.120312332041,0.120142836138,0.119837484741,0.11968998449,0.119441563014,0.11913103617,0.119080575557,0.11874028989,0.118644544113,0.11867042135,0.118378008572,0.11848151752,0.118513864066,0.118418118289,0.118529390408,0.118313315479,0.118023490424,0.117961385055,0.117983380707,0.11772719606,0.117688380205,0.117697437237,0.117627568697,0.117327392748,0.117121668713,0.117194124977,0.117001339561,0.116767150566,0.116447566688,0.116105987159,0.115884736783,0.115399538588,0.115078660849,0.114870349091,0.114570173141,0.114229887474,0.114123790802,0.114112146045,0.113874075465,0.113802913063,0.113648943502,0.113642474193,0.113306070111,0.113346179829,0.113253021776,0.113133986485,0.112991661681,0.112607384711,0.112414599295,0.111999269641,0.111692624382,0.111375628228,0.111427382702,0.111137557647,0.110924070442,0.110585078637,0.110233148213,0.110186569186,0.11000801625,0.109931678401,0.109879923927,0.109556458464,0.109254988653,0.108978102216,0.108754264116,0.108570535733,0.108310469501,0.108005118103,0.107937837287,0.107657069265,0.107469459297,0.107425467994,0.10715763859,0.107298669532,0.10722750713,0.107047660333,0.106887221463,0.106880752154,0.106640093849,0.106497769046,0.106396847821,0.106021627884,0.105932351416,0.105300946833,0.105015003363,0.10478210823,0.10443276553,0.104183050192,0.103823356597,0.103767720538,0.103523180648,0.103490834101,0.103243706488,0.103452018246,0.10314019754,0.103391206739,0.103440373489,0.103418377838,0.103375680397,0.103096206237,0.102622652799,0.102369055876,0.102217674039,0.101901971747,0.101613440554,0.101031202721,0.100789250554,0.100566706316,0.100278175123,0.0999779991731,0.0999689421401,0.0997580426582,0.0992689628781,0.0990917038044,0.0991382828311,0.0988989183884,0.0988730411514,0.0984059570228,0.0983943122661,0.0983904306805,0.0982662199427,0.0982908033179,0.0985832160965,0.098351614825,0.0982649260809,0.0983671411672,0.0983322068972,0.0981122503823,0.0980307370857,0.09760764426,0.0972971174155,0.096567379331,0.0956823778241,0.0950859075103,0.0941245681542,0.0929536231781,0.0917412746226,0.0907592334769,0.0893592749529,0.088361707465,0.0872114642785,0.0863031732583,0.0854621630544,0.0848204075758,0.0842627531175,0.0838603620815,0.0834269183611,0.0830620493188,0.0831150976547,0.0829494833377,0.0828188032906,0.0825457984398,0.0826764784869,0.0822275084242,0.0821304687853,0.0819480342642,0.0819506219879,0.0820023764619,0.0818277051119,0.0815482309519,0.0812816954103,0.081118668817,0.0809582299473,0.0808508394136,0.080672286478,0.080444566792,0.0800641714075,0.0798170437938,0.0792878542963,0.0793007929148,0.07929044202,0.0792542138881,0.0789980292414,0.0788854632602,0.0787263182524,0.0787185550813,0.0787263182524,0.0787146734958,0.0787353752854,0.0784351993357,0.0782087735116,0.0782631157094,0.0782061857879,0.0781285540768,0.0778917773578,0.0776860533234,0.0773703510314,0.0771361620362,0.0770287715025,0.0769783108903,0.076692367421,0.0764737047679,0.0763274983787,0.0762666868716,0.0763223229313,0.0763611387868,0.0763676080961,0.0763559633394,0.0760894277979,0.0760829584886,0.0763055027272,0.0759910942971,0.0759264012045,0.0757581991637,0.0754787250037,0.0752898211733,0.0752303035281,0.0752587684888,0.0754450845955,0.075318286134,0.075283351864,0.0752742948311,0.0751293823036,0.0750103470132,0.0750582199018,0.075020697908,0.0748059168406,0.0746584165895,0.0745031531672,0.0743491836068,0.0741408718486,0.0741007621312,0.0740748848942,0.0739752575316,0.073936441676,0.0736919017859,0.073901507406,0.0735806296667,0.0733981951455,0.0732131729007,0.0730423831362,0.0729155846747,0.072738325601,0.0726658693372,0.0724290926183,0.0724924918491,0.0722867678146,0.0722880616764,0.0723113511898,0.0722984125712,0.0723385222887,0.0723721626968,0.072326877532,0.0722854739527,0.0723242898083,0.0722298378931,0.0720952762605,0.0720461095101,0.0719037847064,0.0719128417393,0.0717019422574,0.0715376218022,0.0714599900911,0.0714237619592,0.0713758890707,0.0712904941885,0.0712309765433,0.0710873578777,0.0710459542984,0.0710692438118,0.0712452090236,0.0713086082544,0.0711688711744,0.0713306039059,0.0712762617081,0.0712879064648,0.0711753404836,0.0712542660566,0.0711831036547,0.0710563051932,0.0706345062295,0.0704158435764,0.0703873786157,0.0700160402642,0.0699086497304,0.0699409962767,0.0699953384745,0.0697973776111,0.0696990441104,0.0695049648326,0.0697520924463,0.0699811059941,0.070061325429,0.0701609527916,0.0699047681449,0.0697857328545,0.0697960837493,0.0697106888671,0.0696537589456,0.0696563466693,0.0694027497463,0.0692979469362,0.0689667183021,0.0689395472032,0.0690831658688,0.0689511919599,0.0685423316146,0.0685319807198,0.0684401165283,0.0686134940165,0.0686820686946,0.0685643272661,0.068749349511,0.0686898318658,0.0686846564183,0.0685449193383,0.0686303142206,0.0687441740635,0.068880029558,0.0686950073132,0.0685073973446,0.0683107303431,0.0682628574546,0.0682602697309,0.0682861469679,0.0684698753509,0.0685086912065,0.0681153572034,0.0679380981297,0.0677789531219,0.068014435979,0.0680027912223,0.0679600937812,0.0679769139853,0.0679303349586,0.0679251595112,0.0679743262616,0.0681270019601,0.0683184935142,0.068486695555,0.068512572792,0.0685332745817,0.0686471344246,0.0686471344246,0.068512572792,0.0682628574546,0.0683482523368,0.068547507062,0.0684892832787,0.0683068487575,0.0680506641108,0.0681942827764,0.0678759927608,0.0677621329178,0.0677284925097,0.0678552909712,0.0677491942993,0.0675188868896,0.0673662111911,0.0674852464815,0.0675046544092,0.0675693475018,0.0677194354767,0.06763792218,0.0675926370152,0.0675784045348,0.0676107510811,0.0676676810026,0.0678320014578,0.0676094572193,0.0678591725567,0.0678371769052,0.0679109270308,0.0680157298408,0.0682719144875,0.0683068487575,0.0683754234357,0.068433647219,0.0684970464498,0.068652309872,0.0685617395424,0.0684232963242,0.0683275505472,0.0681425283023,0.0681011247231,0.0682059275331,0.068337901442,0.0682641513164,0.0680105543934,0.0681218265127,0.0680027912223,0.0680881861045,0.0683391953038,0.0686419589772,0.068661366905,0.0685500947857,0.0683702479883,0.068547507062,0.0688218057747,0.0687105336554,0.0689304901702,0.0688502707354,0.0687014766224,0.0682900285535,0.068233098632,0.0681412344405,0.0681645239538,0.0679833832945,0.0677388434045,0.0677724838126,0.0675020666855,0.0675796983967,0.0676405099037,0.0681282958219,0.0681645239538,0.0684245901861,0.0682512126979,0.068451761285,0.0686329019443,0.0686781871091,0.0686859502802,0.068740292478,0.0688295689458,0.0687260599976,0.0686924195895,0.0683948313635,0.0686833625565,0.0687234722739,0.068784283781,0.068705358208,0.0689201392754,0.0689123761043,0.0687894592284,0.0686820686946,0.068661366905,0.0688373321169,0.0688593277684,0.0689020252095,0.0688709725251,0.069098692211,0.0690663456647,0.0689718937495,0.0692190213633,0.0692875960414,0.0692720696992,0.0693497014103,0.0693678154763,0.069238429291,0.0623097990731,0.0553307082429,0.0484564202227,0.0416688209467,0.0)
ycorr <- c(9.26658778377e-05,9.25579720771e-05,9.22309844947e-05,9.16731247062e-05,9.08801954894e-05,8.98462540072e-05,8.85669788749e-05,8.72871253903e-05,8.60031694637e-05,8.47153791453e-05,8.34121045112e-05,8.20801785872e-05,8.07206444967e-05,7.93387509277e-05,7.79338435724e-05,7.65121270876e-05,7.50807395492e-05,7.36462387981e-05,7.22210830577e-05,7.0804240245e-05,6.94005468694e-05,6.80186773071e-05,6.66611677312e-05,6.532263029e-05,6.40052372361e-05,6.27042256727e-05,6.1416528366e-05,6.01372458229e-05,5.88576546285e-05,5.75735339465e-05,5.62825589006e-05,5.49744112553e-05,5.36500260022e-05,5.23149376756e-05,5.09703871969e-05,4.96107627151e-05,4.82388075014e-05,4.68516714001e-05,4.54505556381e-05,4.40363611884e-05,4.26088368287e-05,4.11736596313e-05,3.97356693367e-05,3.82865352452e-05,3.68155630053e-05,3.53239120267e-05,3.38190379894e-05,3.22995723513e-05,3.07667084153e-05,2.92202666203e-05,2.76663131969e-05,2.60969986685e-05,2.45062846687e-05,2.2895943576e-05,2.1276572805e-05,1.96560900321e-05,1.80270822545e-05,1.63865086819e-05,1.47393334884e-05,1.30829155782e-05,1.1415742648e-05,9.73759376717e-06,8.05925898366e-06,6.37900719214e-06,4.69665683078e-06,3.00290790853e-06,1.29864641409e-06,-4.07141894766e-07,-2.11806972052e-06,-3.83268896841e-06,-5.55210225957e-06,-7.26940549263e-06,-8.99302246219e-06,-1.07277089371e-05,-1.2475997673e-05,-1.42299705256e-05,-1.59876609179e-05,-1.77536694286e-05,-1.95316758821e-05,-2.13189618491e-05,-2.31189966897e-05,-2.49298725932e-05,-2.67530678164e-05,-2.85813733116e-05,-3.04067915457e-05,-3.22280645693e-05,-3.40566982906e-05,-3.58908429008e-05,-3.77271525801e-05,-3.95626564777e-05,-4.13989678285e-05,-4.32352275743e-05,-4.50699931622e-05,-4.69105406404e-05,-4.87593553249e-05,-5.06192871855e-05,-5.24847606542e-05,-5.43553961857e-05,-5.62340640571e-05,-5.81209129241e-05,-6.0016193573e-05,-6.19203487755e-05,-6.38309013602e-05,-6.57435259501e-05,-6.76555870857e-05,-6.95712238065e-05,-7.14897569225e-05,-7.34120540228e-05,-7.53343863035e-05,-7.72553447685e-05,-7.91733073323e-05,-8.10859463353e-05,-8.29995950122e-05,-8.49204549866e-05,-8.68514150655e-05,-8.87873692926e-05,-9.07273979837e-05,-9.26738966406e-05,-9.46229761617e-05,-9.65811458722e-05,-9.85452072417e-05,-0.000100519531772,-0.000102497484708,-0.000104466400901,-0.000106423940487,-0.000108374045108,-0.000110316839885,-0.000112249176642,-0.000114172098176,-0.000116085037001,-0.000117984963824,-0.000119868702008,-0.000121740658056,-0.000123609350222,-0.000125478548643,-0.000127346791345,-0.00012921354838,-0.000131076403692,-0.000132939083754,-0.000134797540645,-0.000136657642814,-0.000138518926202,-0.00014037960424,-0.000142235706638,-0.000144088632123,-0.00014593761644,-0.000147780106446,-0.000149620475691,-0.0001514590441,-0.000153294102884,-0.00015512653548,-0.000156957239249,-0.000158787484208,-0.000160620260162,-0.00016245079018,-0.000164277239037,-0.000166101924092,-0.000167922165437,-0.000169736895289,-0.000171548418994,-0.000173356364153,-0.000175167376638,-0.000176975272864,-0.000178781342926,-0.000180587107288,-0.000182395715447,-0.000184208683139,-0.000186025015826,-0.000187843845647,-0.00018966274237,-0.000191484512306,-0.000193304031494,-0.000195120087924,-0.000196937320293,-0.000198752996613,-0.000200565421165,-0.000202373889889,-0.000204178543557,-0.00020597838604,-0.000207777385953,-0.000209572930847,-0.00021136271886,-0.000213151340858,-0.000214930231246,-0.000216696358298,-0.000218449309738,-0.000220190990108,-0.000221921408153,-0.000223641527138,-0.000225355256402,-0.00022705997749,-0.000228757985978,-0.000230448491906,-0.000232135266327,-0.000233822020165,-0.000235511772115,-0.000237201729817,-0.000238891831175,-0.000240583349344,-0.000242269825153,-0.000243951497212,-0.000245625623928,-0.000247292545483,-0.000248951182295,-0.000250601464434,-0.000252243160273,-0.000253877190732,-0.000255504085963,-0.000257122569634,-0.000258734975581,-0.000260343297914,-0.000261951067266,-0.00026356499732,-0.00026517964904,-0.000266795994973,-0.000268410025228,-0.000270021880619,-0.000271628248937,-0.000273230881877,-0.000274832925203,-0.000276435555409,-0.000278037436345,-0.000279632083525,-0.000281221350265,-0.000282807473646,-0.000284395025915,-0.000285984776481,-0.000287578098349,-0.000289173048621,-0.000290768841319,-0.000292362104442,-0.00029394768503,-0.000295530746227,-0.000297109691282,-0.000298682705392,-0.000300246274712,-0.000301798470118,-0.000303338605891,-0.000304866724226,-0.000306386541611,-0.000307895645309,-0.000309402221861,-0.000310903311585,-0.000312399157615,-0.000313892432425,-0.000315388256658,-0.000316886027628,-0.000318391811237,-0.000319906647855,-0.000321431145639,-0.000322962059936,-0.000324498315811,-0.000326031547475,-0.000327565204968,-0.000329098157958,-0.00033062896339,-0.000332150868576,-0.000333664712129,-0.000335163155999,-0.000336646006809,-0.000338112491033,-0.000339562995343,-0.000341006941877,-0.000342446498609,-0.00034387737197,-0.000345300198727,-0.000346720756769,-0.000348136888662,-0.00034955670538,-0.000350974092352,-0.000352392925227,-0.000353816578628,-0.000355244017764,-0.000356671951325,-0.000358107517684,-0.000359548615796,-0.000360992697485,-0.000362438655471,-0.000363889306991,-0.000365339844725,-0.000366798807531,-0.000368253939119,-0.000369700039362,-0.000371129173238,-0.000372528265868,-0.000373889599371,-0.00037521192336,-0.000376485934157,-0.000377700510588,-0.000378850485637,-0.000379927298638,-0.000380926697023,-0.000381851516242,-0.000382706564267,-0.000383504396913,-0.00038425985207,-0.000384977406294,-0.000385668711712,-0.000386343646854,-0.000387015188847,-0.000387693826184,-0.000388391045547,-0.000389111832949,-0.000389858996958,-0.000390633814025,-0.00039142556702,-0.000392232114604,-0.000393050500405,-0.000393881104244,-0.000394723710313,-0.000395573519651,-0.000396421928777,-0.000397264852579,-0.000398100619218,-0.000398931249527,-0.000399753232218,-0.000400574252089,-0.000401392463803,-0.000402204223479,-0.000403006633855,-0.000403793173284,-0.000404571356521,-0.00040534527237,-0.000406118437803,-0.000406886885729,-0.000407651783708,-0.00040841299354,-0.00040916989077,-0.000409924832618,-0.00041068156409,-0.000411439176063,-0.00041219876187,-0.000412952489907,-0.000413700108223,-0.00041444002951,-0.000415174822508,-0.000415898914533,-0.000416612397128,-0.00041731277931,-0.000417997432398,-0.000418668021451,-0.000419325857298,-0.000419972745874,-0.000420609872373,-0.00042123628999,-0.000421854787982,-0.000422467093461,-0.000423078583268,-0.000423690725628,-0.000424306204095,-0.000424921085037,-0.000425534546916,-0.000426149564628,-0.000426764606325,-0.000427378982664,-0.000427989306311,-0.000428592595056,-0.000429187535492,-0.000429772196952,-0.000430346155031,-0.000430913307968,-0.000431475203224,-0.00043203113322,-0.000432576651625,-0.000433115784796,-0.000433648027526,-0.000434177957029,-0.000434703404173,-0.000435222254902,-0.000435735056343,-0.000436240045683,-0.000436731729637,-0.000437210197588,-0.000437675529707,-0.000438128936885,-0.000438571077885,-0.000439002410236,-0.00043941869944,-0.000439827042897,-0.00044022229741,-0.000440603703024,-0.000440973026098,-0.000441332266819,-0.000441683718508,-0.000442024350436,-0.000442352790348,-0.000442666087246,-0.000442968373912,-0.000443260174602,-0.000443540658882,-0.000443816710688,-0.0004440880639,-0.000444354913153,-0.000444616743898,-0.000444873446833,-0.000445128492969,-0.000445382331628,-0.000445635992067,-0.000445884085732,-0.00044612676114,-0.000446358134424,-0.000446578955592,-0.000446786385489,-0.000446978519974,-0.000447155994135,-0.00044731713489,-0.000447462287624,-0.000447590386168,-0.000447702553506,-0.000447798560986,-0.000447882155316,-0.000447956668909,-0.000448022982204,-0.000448083181864,-0.000448134800247,-0.000448180614116,-0.000448218044725,-0.000448243634471,-0.000448254651466,-0.000448253269164,-0.000448238541964,-0.000448205645318,-0.00044814773962,-0.000448062983398,-0.000447953730752,-0.000447818560689,-0.000447656830433,-0.000447476990988,-0.000447281647131,-0.000447071389473,-0.000446844489506,-0.000446601491366,-0.000446350499479,-0.000446098330746,-0.000445842692167,-0.000445582155832,-0.000445316233668,-0.000445039086325,-0.000444747309967,-0.000444437416882,-0.000444110040334,-0.000443765217782,-0.000443400702021,-0.000443011425539,-0.000442593954463,-0.000442151298574,-0.000441684683387,-0.000441198466042,-0.0004406907893,-0.000440163640358,-0.000439616942892,-0.000439056719707,-0.000438482484256,-0.00043789473386,-0.000437294195566,-0.000436680849155,-0.000436053986098,-0.000435407729522,-0.000434744385919,-0.000434070242237,-0.000433383513493,-0.000432681943502,-0.000431959265122,-0.000431215408556,-0.000430454130035,-0.000429674172597,-0.000428878379729,-0.00042806795921,-0.000427245375428,-0.000426401047055,-0.000425535489003,-0.000424644763524,-0.000423735482405,-0.000422806635767,-0.000421858383621,-0.000420890714998,-0.00041990212442,-0.000418891877185,-0.000417857924834,-0.000416803374966,-0.000415736140653,-0.000414654809486,-0.000413561583647,-0.000412451697088,-0.000411328438403,-0.000410190170974,-0.000409033165362,-0.000407855805203,-0.000406660901249,-0.000405451964519,-0.000404223513185,-0.000402973377388,-0.000401697866669,-0.000400402082691,-0.000399081037127,-0.000397733664383,-0.000396361525746,-0.000394969082419,-0.000393556825106,-0.000392117505262,-0.000390647773945,-0.000389153773133,-0.000387635857448,-0.000386096342433,-0.000384533387322,-0.000382951737529,-0.000381350073751,-0.000379727810821,-0.000378082189965,-0.000376416054665,-0.000374735006079,-0.00037303206116,-0.000371310250311,-0.000369570678617,-0.000367813536538,-0.000366037051913,-0.00036424555684,-0.00036243764392,-0.000360613313728,-0.000358770350795,-0.000356908467898,-0.000355028684058,-0.000353133905248,-0.000351213852433,-0.00034926712274,-0.000347290310414,-0.000345282520519,-0.000343244468184,-0.000341180093079,-0.000339089579424,-0.000336971388671,-0.000334827128449,-0.00033265282907,-0.000330453518906,-0.00032823772722,-0.000326009574259,-0.000323769279228,-0.000321512808781,-0.000319234983744,-0.000316937093998,-0.000314620665603,-0.000312286243633,-0.00030993466591,-0.000307565535672,-0.000305173365368,-0.000302746281841,-0.000300283854358,-0.000297790171397,-0.0002952697008,-0.00029272204483,-0.000290142926217,-0.000287535586839,-0.000284899912336,-0.000282235489577,-0.000279545051107,-0.000276841464212,-0.00027413051358,-0.000271411619222,-0.000268678690844,-0.000265933980436,-0.000263181774495,-0.000260419563828,-0.000257640226959,-0.000254848718653,-0.000252042737857,-0.00024921873026,-0.000246367153996,-0.000243486465611,-0.000240580577149,-0.000237653733678,-0.00023470278263,-0.000231725561443,-0.000228729249141,-0.00022571325506,-0.000222674337998,-0.000219611860001,-0.000216529910918,-0.000213430908858,-0.000210316299578,-0.000207179148286,-0.000204018346813,-0.000200836544203,-0.000197633762811,-0.000194406011515,-0.000191161088999,-0.000187898523785,-0.000184616077123,-0.00018131216468,-0.000177986039113,-0.000174637337097,-0.000171166530607,-0.000167475486591,-0.000163479540297,-0.000159116841609,-0.000153831355392,-0.00014949945472,-0.000145545123379,-0.000141902175902,-0.000138484269201,-0.000135185707854,-0.000131903518519,-0.000128734638486,-0.00012578021642,-0.000123118761931,-0.000120813332384,-0.000119421796255,-0.000117062983286,-0.000114312089121,-0.000111238568655,-0.00010792673685,-0.000104475817673,-0.000100990686081,-9.74743967446e-05,-9.39269943956e-05,-9.03473971081e-05,-8.67349261953e-05,-8.3090164929e-05,-7.94144569541e-05,-7.57088050459e-05,-7.19735515262e-05,-6.82159524324e-05,-6.44426956199e-05,-6.06538173959e-05,-5.6850729688e-05,-5.30307134303e-05,-4.91979121233e-05,-4.53555693459e-05,-4.15009793644e-05,-3.76308917157e-05,-3.3750318807e-05,-2.98602466321e-05,-2.5953418443e-05,-2.20330673523e-05,-1.80982738953e-05,-1.41504778352e-05,-1.01929000981e-05,-6.22144959767e-06,-2.23619557377e-06,1.75553537499e-06,5.75646990009e-06,9.77091468274e-06,1.3798563557e-05,1.78429408241e-05,2.19034865511e-05,2.59786251496e-05,3.00675183852e-05,3.41735532649e-05,3.82899254946e-05,4.24203475123e-05,4.6565472135e-05,5.07202137972e-05,5.48796595328e-05,5.90440742103e-05,6.32078248536e-05,6.73756468776e-05,7.15512971333e-05,7.57329706998e-05,7.99205987681e-05,8.41191777363e-05,8.83293218649e-05,9.25577824362e-05,9.68038786644e-05,0.000101071029355,0.000105363787306,0.000109678400786,0.000114013392113,0.000118362713002,0.000122731948168,0.000127117034457,0.000131513662256,0.000135918380772,0.000140336264373,0.000144761012964,0.000149192051197,0.000153626910445,0.000158068570047,0.000162518450254,0.000166978170114,0.000171444668495,0.00017592185043,0.000180408213962,0.000184901650681,0.000189400357921,0.000193905126881,0.000198419111079,0.000202940056858,0.000207470496024,0.000212007948984,0.000216551882435,0.000221101494891,0.000225652637862,0.000230212552054,0.000234780949314,0.000239355325738,0.000243940034345,0.000248530915717,0.00025312583153,0.00025771957278,0.000262315467197,0.000266913877555,0.000271516901244,0.000276120454587,0.000280720288924,0.0002853180131,0.000289907564544,0.000294490124507,0.000299066614833,0.000303640700798,0.000308211175093,0.000312774454461,0.000317329055798,0.000321873799719,0.0003264127391,0.000330947337972,0.000335479139032,0.000340007484677,0.000344529436504,0.000349042096616,0.000353549348555,0.000358051625748,0.000362553338947,0.000367053520736,0.000371554025587,0.000376050282993,0.000380537224592,0.00038501428949,0.000389482166976,0.000393942004396,0.000398392239199,0.000402829985392,0.000407254770887,0.000411660268969,0.000416045052876,0.000420410500406,0.00042475942878,0.000429092363062,0.000433410892957,0.000437713975766,0.000441996502936,0.000446257902759,0.000450496826606,0.000454713716297,0.000458905871559,0.00046307469468,0.000467216492301,0.000471330123911,0.000475416819064,0.000479472781626,0.000483500206935,0.000487507262454,0.000491493562044,0.000495455061105,0.000499397332695,0.000503320382454,0.00050722329594,0.000511112455229,0.000514985628077,0.0005188420036,0.000522680663741,0.000526495833005,0.000530283210445,0.000534050053414,0.000537794961408,0.000541509992225,0.000545198095765,0.000548853693176,0.00055247244081,0.000556058888309,0.000559614398718,0.000563139493345,0.000566638843951,0.000570111510568,0.000573553248086,0.000576967363496,0.000580356142854,0.000583722251489,0.000587069219236,0.000590396231926,0.000593700839766,0.000596979876214,0.000600230449392,0.000603450694492,0.000606641098111,0.000609801510691,0.00061293023891,0.000616027323348,0.000619088412105,0.000622113533853,0.000625103341517,0.000628061009509,0.000630987421521,0.000633884845299,0.000636751837242,0.000639586014982,0.000642387988246,0.000645157889406,0.000647890998333,0.000650589001954,0.000653247994335,0.00065586430155,0.000658437357563,0.000660966474681,0.000663453955766,0.000665905557684,0.000668322273933,0.000670698281648,0.000673034710676,0.000675334718551,0.000677600071659,0.000679833291471,0.000682031452753,0.000684189273208,0.000686307292637,0.0006883798569,0.000690402008135,0.000692377092414,0.000694310957905,0.000696201673088,0.000698045857892,0.000699841536537,0.00070159169048,0.000703297404232,0.000704958995806,0.000706576638365,0.000708154687705,0.000709691701589,0.000711184632078,0.000712628193885,0.00071402957594,0.000715391507314,0.000716715149258,0.000718001718117,0.000719252052538,0.000720466124884,0.000721641084493,0.000722776471469,0.000723877035509,0.000724943452924,0.000725973816378,0.000726961990014,0.00072790788807,0.000728808220223,0.000729661110183,0.000730468457771,0.000731234173715,0.000731959259109,0.000732640026676,0.000733273961753,0.000733863729972,0.000734416835591,0.000734930018349,0.000735410427542,0.000735857187105,0.000736269118321,0.000736640101037,0.000736973867146,0.000737270449326,0.000737533076934,0.000737759529163,0.000737943494964,0.000738081024661,0.00073817010898,0.000738207464083,0.000738195988884,0.000738140222056,0.000738037069248,0.000737886280902,0.000737687217784,0.000737437527488,0.000737138104849,0.000736793774514,0.000736408547306,0.000735986406153,0.000735525588436,0.000735028281289,0.000734490079988,0.000733912852967,0.000733292206333,0.00073262937687,0.000731930848229,0.000731198794415,0.000730429186711,0.000729617916257,0.000728766704659,0.00072786911225,0.000726924925186,0.000725937485017,0.000724911723398,0.000723849599562,0.00072274563998,0.000721592665919,0.000720386406003,0.00071912640124,0.00071780929572,0.000716434535826,0.000715004149252,0.00071351141642,0.000711949471794,0.000710314281853,0.000708599892103,0.000706812183404,0.000704957162905,0.000703039557737,0.000701061690707,0.000699022668104,0.000696921213729,0.00069475729255,0.000692537303839,0.000690269454607,0.000687958144237,0.000685603013634,0.000683198055518,0.000680740882372,0.000678226853385,0.00067566012383,0.000673043206891,0.000670383165311,0.000667683085734,0.00066493470744,0.00066213957994,0.000659298074527,0.000656415365459,0.000653495882307,0.000650542687565,0.000647560757509,0.000644549000725,0.000641507510833,0.000638432346404,0.000635329102097,0.000632199838582,0.000629042363652,0.000625857537734,0.000622643536816,0.000619403159738,0.000616131928043,0.000612831834529,0.00060950331741,0.000606150815196,0.000602770766476,0.000599361689667,0.000595927747961,0.000592467742757,0.000588983056878,0.000585476138725,0.00058194395688,0.000578389608227,0.000574809969537,0.00057119757682,0.000567551302187,0.000563874901217,0.00056016513326,0.000556421363691,0.000552642454764,0.000548827078644,0.000544975826332,0.0005410882836,0.000537163564308,0.000533209067838,0.000529230856017,0.000525222293292,0.00052118325967,0.000517115331603,0.000513020734435,0.000508902143383,0.000504762142994,0.000500601243872,0.000496419874423,0.000492214209232,0.000487978613665,0.000483718717981,0.000479443084441,0.000475152775109,0.000470847624891,0.000466522777945,0.000462173201005,0.00045779831514,0.000453401394349,0.000448987083443,0.000444557924687,0.000440111895843,0.000435644403648,0.000431152335277,0.000426633555156,0.000422092059833,0.000417532666663,0.000412960235868,0.00040837241036,0.000403762865099,0.000399134030939,0.000394487880413,0.000389826181133,0.000385148054067,0.000380459470315,0.000375756501311,0.000371039162151,0.000366307713662,0.000361559821348,0.000356799561793,0.000352030065398,0.000347247896774,0.000342453427158,0.000337645713666,0.000332821102569,0.000327981115881,0.000323131326476,0.00031826752199,0.000313390743782,0.000308502930572,0.000303596862532,0.000298673745677,0.00029373453331,0.000288782941515,0.000283824498558,0.000278865068593,0.00027390070223,0.000268928012122,0.00026394926739,0.000258966328015,0.000253981667992,0.000249003057683,0.000244028234885,0.000239056563659,0.000234082837078,0.00022910126703,0.000224110451327,0.000219111259081,0.000214110326366,0.00020910500233,0.000204099339266,0.000199088506854,0.000194072289036,0.000189053789077,0.000184035183999,0.000179021861923,0.000174015028847,0.000169019254596,0.000164034447181,0.000159062172823,0.000154097049757,0.000149135973682,0.000144184290016,0.000139240470083,0.000134304740388,0.000129376992205,0.000124458478578,0.000119551781668,0.000114652909828,0.000109757284159,0.00010486642802,9.99900705556e-05,9.51275151912e-05,9.02801103197e-05,8.54491090864e-05,8.06338709414e-05,7.58310967537e-05,7.10380437775e-05,6.62516330246e-05,6.14761822615e-05,5.67203121546e-05,5.19776031389e-05,4.72451966017e-05,4.25214968554e-05,3.78030232255e-05,3.30902876034e-05,2.83849135792e-05,2.36900020469e-05,1.90080932845e-05,1.43445132973e-05,9.68978754769e-06,5.04465241031e-06,4.13336129142e-07,-4.20011919727e-06,-8.7942359815e-06,-1.33725234475e-05,-1.7936984038e-05,-2.24898169204e-05,-2.70272077349e-05,-3.15527423778e-05,-3.60614484059e-05,-4.054839465e-05,-4.50193912135e-05,-4.94799053314e-05,-5.39335726535e-05,-5.83761748018e-05,-6.27999530447e-05,-6.72024621401e-05,-7.15839477567e-05,-7.59434047348e-05,-8.0284411088e-05,-8.46104750922e-05,-8.8919131887e-05,-9.3205022091e-05,-9.74658414958e-05,-0.000101699120425,-0.00010590928419,-0.000110098089771,-0.000114266576918,-0.00011841610916,-0.000122547558246,-0.000126657546395,-0.000130747440613,-0.000134815934082,-0.000138863989827,-0.000142887311291,-0.000146886295538,-0.000150859175505,-0.000154808668674,-0.000158732752908,-0.000162627838616,-0.000166496047438,-0.000170338663487,-0.000174155533845,-0.00017793956049,-0.000181700610119,-0.000185437890505,-0.000189150346352,-0.000192835422219,-0.000196495214499,-0.000200128900237,-0.000203737256757,-0.000207319282686,-0.00021087280625,-0.000214401522939,-0.000217908552276,-0.000221388254026,-0.000224843720674,-0.000228276463297,-0.000231684457326,-0.000235065131688,-0.000238419574345,-0.000241745420723,-0.000245046894503,-0.000248324998604,-0.000251574273803,-0.000254796323265,-0.000257988711101,-0.00026114979118,-0.000264275618857,-0.000267372761325,-0.000270438510936,-0.000273470626971,-0.000276473013728,-0.000279440837336,-0.000282372580395,-0.000285273096093,-0.000288143432504,-0.000290984486826,-0.00029380413137,-0.00029660461424,-0.000299383000075,-0.000302138272147,-0.000304869923288,-0.000307579057733,-0.000310265987241,-0.000312930034557,-0.000315571277582,-0.000318193251084,-0.000320794654192,-0.000323365611115,-0.000325908716509,-0.000328431144517,-0.000330934477354,-0.000333417512103,-0.00033588041799,-0.000338325539009,-0.000340750545886,-0.000343150241196,-0.000345517778893,-0.000347855872333,-0.000350166080808,-0.000352444576233,-0.000354684314772,-0.000356888697323,-0.000359062977037,-0.000361196593338,-0.000363292067076,-0.000365351386627,-0.000367381031831,-0.000369385796996,-0.000371366077808,-0.000373322786964,-0.000375258646219,-0.000377170313233,-0.000379054203166,-0.000380912993781,-0.000382751872101,-0.000384564940929,-0.000386350008974,-0.000388107313612,-0.000389835287915,-0.000391535420498,-0.000393211074741,-0.000394863638876,-0.000396497067956,-0.00039811255413,-0.00039956855344,-0.000400729174079,-0.000401597797299,-0.000402176653772,-0.000402464034528)
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(262)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('Cavia_porcellus-male-liver-H3K27Ac-ERR572149.50mers.unique.MACS2_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 262',bty='n')
dev.off()