# R script for Peak Model
#  -- generated by MACS
p <- c(0.0383104987239,0.0447201221592,0.0511665560665,0.0573001009619,0.0639259859202,0.0637327309422,0.0634106393123,0.0638109531952,0.0641238422071,0.0638109531952,0.0635486785823,0.0635486785823,0.0631851751714,0.0630931489914,0.0626882337995,0.0628308743785,0.0623937500236,0.0620808610117,0.0616529392748,0.0615471091678,0.0614458803698,0.0613124424089,0.0615010960778,0.0616345340388,0.0616299327298,0.0616575405838,0.0622373055176,0.0622603120626,0.0624305604956,0.0627802599795,0.0627940639065,0.0628170704515,0.0627618547435,0.0626238154735,0.0627572534345,0.0626560246365,0.0624029526416,0.0625547958385,0.0623293316976,0.0623109264616,0.0626146128555,0.0625685997655,0.0627342468895,0.0626744298725,0.0624443644226,0.0626238154735,0.0626698285635,0.0623569395516,0.0623983513326,0.0620854623207,0.0617541680728,0.0616115274938,0.0615056973868,0.0617863772357,0.0618139850897,0.0615241026228,0.0614458803698,0.0615379065498,0.0616851484378,0.0616345340388,0.0615056973868,0.0616897497468,0.0615149000048,0.0615885209488,0.0616069261848,0.0616805471288,0.0617403641458,0.0618323903257,0.0614458803698,0.0616897497468,0.0620394492307,0.0618277890167,0.0619934361407,0.0617541680728,0.0621820898096,0.0622096976636,0.0625685997655,0.0625455932205,0.0625824036925,0.0625870050015,0.0627664560525,0.0628768874685,0.0627848612885,0.0630977503004,0.0625363906025,0.0623615408606,0.0621958937366,0.0624811748946,0.0629229005584,0.0626054102375,0.0623155277706,0.0624075539506,0.0624121552596,0.0621038675567,0.0624213578776,0.0624443644226,0.0620992662477,0.0619152138877,0.0619520243597,0.0621452793376,0.0620486518487,0.0619382204327,0.0621544819556,0.0623431356246,0.0623753447876,0.0628400769965,0.0631575673174,0.0632219856434,0.0631023516094,0.0631805738624,0.0631207568454,0.0632679987334,0.0631299594634,0.0631207568454,0.0630701424464,0.0627020377265,0.0624995801306,0.0626744298725,0.0626606259455,0.0626422207095,0.0625870050015,0.0625916063105,0.0628952927044,0.0627158416535,0.0624351618046,0.0628354756875,0.0635256720373,0.0633692275313,0.0633692275313,0.0635670838183,0.0640594238811,0.0640824304261,0.0640594238811,0.064593175725,0.0648876595009,0.064478143,0.0639904042462,0.0642480775501,0.064422927292,0.064436731219,0.0643631102751,0.064514953472,0.0642434762411,0.0639535937742,0.0642112670781,0.064597777034,0.064699005832,0.064560966562,0.064648391433,0.064712809759,0.0649888882989,0.0652603655298,0.0650763131699,0.0653017773108,0.0653201825468,0.0655456466878,0.0658033199917,0.0658309278457,0.0658171239187,0.0659827710426,0.0658355291547,0.0655824571597,0.0657849147557,0.0658999474807,0.0660932024586,0.0656560781037,0.0656790846487,0.0656192676317,0.0652695681478,0.0652649668388,0.0652695681478,0.0652787707658,0.0655916597777,0.0658999474807,0.0657066925027,0.0662312417286,0.0657987186827,0.0660149802056,0.0662496469646,0.0664889150325,0.0668110066624,0.0673999742143,0.0674920003942,0.0671929153093,0.0671653074553,0.0674735951582,0.0681867980531,0.0680487587831,0.0681407849631,0.0679153208221,0.0677542750072,0.0673493598153,0.0675564187202,0.0676576475182,0.0677036606082,0.0673217519613,0.0668800262974,0.0671699087643,0.0677128632262,0.0678232946422,0.0680395561651,0.068380053031,0.068251216379,0.0682098045981,0.068499687065,0.0689000009479,0.0692128899598,0.0693463279208,0.0690978572348,0.0690380402178,0.0691898834148,0.0689414127289,0.0691944847238,0.0693831383927,0.0694337527917,0.0693739357747,0.0700549295066,0.0701285504505,0.0705058577884,0.0709567860703,0.0709475834523,0.0707451258564,0.0710442109413,0.0712466685373,0.0713478973352,0.0716331784932,0.0712788777002,0.0712420672283,0.0713617012622,0.0717574138361,0.0718586426341,0.0726270612369,0.0726408651639,0.0727604991979,0.0728065122878,0.0726684730179,0.0729031397768,0.0731930222437,0.0731101986818,0.0727743031249,0.0730043685748,0.0729951659568,0.0731654143897,0.0733908785307,0.0737175714696,0.0738740159756,0.0741132840435,0.0743295455664,0.0747344607583,0.0752129968942,0.0753188270012,0.0754706701981,0.0754982780521,0.0756133107771,0.0757559513561,0.07587558539,0.075898591935,0.0757835592101,0.0757145395751,0.0758065657551,0.076068840368,0.0764599516329,0.0766302000658,0.0766900170828,0.0768372589708,0.0769660956227,0.0772007623817,0.0774492330676,0.0776286841186,0.0777115076806,0.0778863574225,0.0778219390965,0.0781808411984,0.0790872990712,0.0793633776111,0.0795980443701,0.0793495736841,0.0795796391341,0.0800259661069,0.0803066459559,0.0806793519848,0.0809370252887,0.0813143326266,0.0809278226707,0.0815167902225,0.0817790648355,0.0823772350053,0.0826809213992,0.0828925816132,0.0828511698322,0.0826165030733,0.0827729475792,0.0829063855402,0.0829754051752,0.0828465685232,0.0830352221922,0.0832606863331,0.083720817233,0.0842269612228,0.0849447654266,0.0857131840294,0.0863619685983,0.0869325309141,0.0880368450738,0.0889341003286,0.0901028328143,0.0909172645071,0.0922700493527,0.0932547294785,0.0941427821152,0.094869788937,0.0958452664448,0.0965952798116,0.0970047963125,0.0976857900443,0.0979710712022,0.0983253719951,0.0982057379612,0.098757895041,0.098859123839,0.0992594377219,0.0993974769918,0.0992548364129,0.0996321437508,0.0999312288357,0.100175098213,0.100612222568,0.101376039861,0.101371438552,0.101629111856,0.102172066318,0.102098445374,0.102797844342,0.10271502078,0.102678210308,0.103046315028,0.103303988332,0.103262576551,0.103483439383,0.104026393845,0.104081609553,0.104389897256,0.104592354851,0.105139910622,0.105475806179,0.105848512208,0.106152198602,0.106543309867,0.106649139974,0.107054055166,0.107463571667,0.108006526129,0.108572487135,0.109129245524,0.109368513592,0.109630788205,0.109851651037,0.110440618589,0.110840932472,0.111112409703,0.111153821484,0.11121823981,0.111255050282,0.110698291893,0.110735102365,0.110753507601,0.111176828029,0.11071209582,0.110735102365,0.110822527236,0.110914553416,0.111535730131,0.111756592963,0.112796488796,0.113229011842,0.113578711326,0.113592515253,0.114314920766,0.114857875228,0.115225979948,0.116173849601,0.11663858181,0.116891653805,0.116951470822,0.11783492215,0.118345667449,0.119252125322,0.119311942339,0.119551210407,0.119574216952,0.119689249677,0.11976287062,0.120020543924,0.120733746819,0.120793563836,0.120871786089,0.120756753364,0.121345720916,0.121856466215,0.122219969626,0.122762924088,0.123476126983,0.12357735578,0.12312182619,0.123246061533,0.123710793741,0.124078898461,0.124157120714,0.124400990091,0.124902532772,0.125178611312,0.125169408694,0.125758376246,0.126420964742,0.126770664226,0.127129566328,0.127727736497,0.128210873942,0.128233880487,0.128325906667,0.128348913212,0.128555972117,0.128565174735,0.12927837763,0.12937040381,0.129628077114,0.130042194924,0.130189436812,0.130852025308,0.131473202022,0.131832104124,0.132352052041,0.132812182941,0.133083660172,0.133668026415,0.133957908882,0.134077542916,0.134404235855,0.134896575918,0.135292288491,0.13589505997,0.136640472028,0.137362877541,0.1375975443,0.138053073891,0.138448786465,0.138913518673,0.138554616572,0.138646642752,0.138513204791,0.138577623117,0.138306145886,0.138025466037,0.137993256874,0.138319949813,0.138421178611,0.138365962903,0.1389273226,0.138959531763,0.138674250606,0.138402773375,0.138623636207,0.139309231247,0.139999427597,0.140004028906,0.140247898283,0.140211087811,0.140344525772,0.140597597767,0.141586879202,0.142520944928,0.14310991248,0.143178932115,0.142534748855,0.142631376344,0.142585363254,0.143192736042,0.143671272178,0.143675873487,0.143910540246,0.144057782134,0.143919742864,0.144287847584,0.144955037389,0.145433573525,0.145948920133,0.145497991851,0.146077756785,0.146215796055,0.146224998673,0.146169782965,0.146616109937,0.146744946589,0.146896789786,0.14660230601,0.147315508905,0.147789443732,0.147715822788,0.147738829333,0.147651404462,0.148203561542,0.148079326199,0.147637600535,0.1475685809,0.147637600535,0.147209678798,0.147651404462,0.147453548175,0.147508763883,0.147656005771,0.14697041073,0.146289416999,0.146519482448,0.146459665431,0.146409051032,0.145774070391,0.14472037063,0.144453494708,0.14449030518,0.144195821404,0.143836919302,0.143450409346,0.142912056193,0.142516343619,0.142566958018,0.142198853299,0.142507141002,0.14210222581,0.141757127635,0.14104392474,0.140892081543,0.141361415061,0.141310800662,0.140560787295,0.139502486225,0.139369048264,0.138660446679,0.138214119706,0.13764355739,0.137703374407,0.136681883809,0.135821439026,0.134965595552,0.134818353665,0.13456528167,0.133930301028,0.133622013325,0.13309286279,0.132641934508,0.13189652245,0.131730875326,0.131220130027,0.130852025308,0.130594352004,0.130005384452,0.130005384452,0.128914874219,0.128827449348,0.128431736774,0.127980808492,0.127387239631,0.126848886479,0.127060546693,0.126641827574,0.12610807573,0.125850402426,0.125850402426,0.125335055818,0.125215421784,0.125123395604,0.125155604767,0.125155604767,0.124120310242,0.124069695843,0.124060493225,0.12339790473,0.123177041898,0.123131028808,0.12270770838,0.122537459947,0.122127943446,0.122022113339,0.122381015441,0.12238561675,0.122261381407,0.121985302867,0.121948492395,0.121759838726,0.1212352895,0.120678531111,0.120015942615,0.119385563283,0.118815000967,0.11783492215,0.117130921873,0.116472934686,0.116045012949,0.115156960313,0.114457561345,0.113767364995,0.113123181735,0.112304148733,0.110859337708,0.109676801295,0.108337820376,0.107159885273,0.105733479483,0.104210446205,0.103340798804,0.102135255846,0.100975725978,0.100023255016,0.0994434900818,0.098918940856,0.0983851890121,0.0982609536691,0.0974741298304,0.0973222866334,0.0968253452615,0.0962639855637,0.0961673580747,0.0960523253497,0.0955645865959,0.09513206355,0.094998625589,0.0944372658911,0.0944050567282,0.0944510698181,0.0939909389183,0.0942164030592,0.0940829650982,0.0936550433614,0.0935814224174,0.0935262067094,0.0932685334055,0.0933927687484,0.0934479844564,0.0929556443935,0.0932869386415,0.0929740496295,0.0930936836635,0.0928728208316,0.0923850820777,0.0922010297177,0.0923712781507,0.0919801668858,0.09136359148,0.091142728648,0.0904847414612,0.0905169506242,0.0899371856903,0.0899325843813,0.0897715385664,0.0896334992964,0.0893620220655,0.0891319566155,0.0889064924746,0.0888420741486,0.0886764270247,0.0883359301588,0.0882024921978,0.0880460476918,0.0880552503098,0.0879540215119,0.0876779429719,0.087378857887,0.087530701084,0.087360452651,0.0871165832741,0.0866886615372,0.0860904913673,0.0857822036644,0.0855843473775,0.0851886348036,0.0850091837526,0.0848941510277,0.0846134711787,0.0843972096558,0.0839094709019,0.0833435098951,0.0830996405181,0.0824232480953,0.0825888952193,0.0820873525384,0.0818986988694,0.0817606595995,0.0815167902225,0.0812223064466,0.0813235352446,0.0816916399645,0.0818434831615,0.0819493132684,0.0810106462327,0.0807253650748,0.0803756655908,0.0802100184669,0.0800397700339,0.0794646064091,0.0791333121612,0.0785397433003,0.0783372857044,0.0779691809845,0.0780428019285,0.0779047626585,0.0775734684106,0.0770857296567,0.0770673244207,0.0769200825328,0.0768878733698,0.0769154812238,0.0771593506007,0.0765887882848,0.0764461477059,0.0763955333069,0.0762160822559,0.075949206334,0.0757145395751,0.0755995068501,0.0751255720232,0.0748678987193,0.0742467220045,0.0746194280334,0.0742651272405,0.0739246303745,0.0735979374356,0.0734322903117,0.0730917934458,0.0731286039178,0.0732528392607,0.0731516104628,0.0730135711928,0.0725764468379,0.0727374926529,0.072222146045,0.072332577461,0.072194538191,0.072084106775,0.0719322635781,0.0716975968191,0.0714537274422,0.0713156881722,0.0715595575492,0.0712512698463,0.0719322635781,0.0716883942011,0.0715365510042,0.0712190606833,0.0710212043963,0.0705840800414,0.0704736486255,0.0703034001925,0.0697052300227,0.0694751645727,0.0689506153469,0.0689598179649,0.0687159485879,0.068416863503,0.068265020306,0.068587111936,0.0681361836541,0.0681131771091,0.0677726802432,0.0679797391481,0.0678509024961,0.0674827977762,0.0679245234401,0.0679659352211,0.0678140920242,0.0677910854792,0.0677128632262,0.0673585624333,0.0676116344282,0.0675472161022,0.0673815689783,0.0674137781413,0.0663876862345,0.0661484181666,0.0660701959136,0.0657573069017,0.0661392155486,0.0659045487897,0.0655042349068,0.0651821432768,0.0651775419678,0.0650395026979,0.0653063786198,0.0655640519237,0.0654306139628,0.0651637380409,0.064781829394,0.064455136455,0.064560966562,0.064703607141,0.064459737764,0.0639167833022,0.0638661689032,0.0634336458573,0.0632127830254,0.0632219856434,0.0629367044854,0.0632081817164,0.0632035804074,0.0627802599795,0.0628170704515,0.0629229005584,0.0625870050015,0.0625317892935,0.0626514233275,0.0624351618046,0.0625962076195,0.0627480508165,0.0629597110304,0.0628630835415,0.0625409919115,0.0625271879845,0.0627526521255,0.0628492796145,0.0627434495075,0.0627020377265,0.0625962076195,0.0622879199166,0.0618968086517,0.0617679719997,0.0617311615278,0.0618922073427,0.0617403641458,0.0614596842968,0.0615241026228,0.0617909785447,0.0614550829878,0.0618876060337,0.0617265602188,0.0617633706907,0.0620854623207,0.0620716583937,0.0624305604956,0.0624535670406,0.0624811748946,0.0619198151967,0.0623523382426,0.0618830047247,0.0621038675567,0.0622142989726,0.0617725733087,0.0617725733087,0.0615241026228,0.0614596842968,0.0612802332459,0.0616483379658,0.0615931222578,0.0619152138877,0.0620164426857,0.0621176714837,0.0624351618046,0.0626652272545,0.0624581683496,0.0625732010745,0.0626284167825,0.0626974364175,0.0625685997655,0.0623799460966,0.0619658282867,0.0616805471288,0.0618277890167,0.0612940371729,0.0613032397909,0.0612296188469,0.0610455664869,0.060728076166,0.0604151871541,0.0602725465751,0.0604980107161,0.060806298419,0.0605992395141,0.0612526253919,0.0612066123019,0.060833906273,0.060732677475,0.060774089256,0.060866115436,0.060875318054,0.060852311509,0.060797095801,0.060640651295,0.0601161020692,0.060626847368,0.0611283900489,0.0611145861219,0.060944337689,0.0610961808859,0.060875318054,0.060714272239,0.0603231609741,0.0605348211881,0.060728076166,0.0603829779911,0.0602679452661,0.0601667164682,0.0603691740641,0.0601391086142,0.0604888080981,0.0603691740641,0.060645252604,0.060769487947,0.060705069621,0.0604565989351,0.060626847368,0.0610041547059,0.0612020109929,0.0616805471288,0.0612572267009,0.0614872921508,0.0613768607348,0.0612112136109,0.0614090698978,0.0617173576008,0.0617035536738,0.0619796322137,0.0618185863987,0.0619796322137,0.0621774885006,0.0620072400677,0.0620670570847,0.0622142989726,0.0623753447876,0.0623477369336,0.0621314754107,0.0615102986958,0.0615609130948,0.0616023248758,0.0618277890167,0.0621452793376,0.0621774885006,0.0619980374497,0.0614780895328,0.0616391353478,0.0618738021067,0.0621728871916,0.0621176714837,0.0618738021067,0.0618599981797,0.0617173576008,0.0617449654548,0.0617771746177,0.0620992662477,0.0619888348317,0.0620532531577,0.0621360767196,0.0623615408606,0.0622373055176,0.0624535670406,0.0627480508165,0.0626376194005,0.0627480508165,0.0623983513326,0.0622373055176,0.0619060112697,0.0618830047247,0.0618369916347,0.0621360767196,0.0618692007977,0.0617127562918,0.0617449654548,0.0617679719997,0.0620164426857,0.0620624557757,0.0624443644226,0.0623017238436,0.0624535670406,0.0624857762036,0.0624719722766,0.0626008089285,0.0626790311815,0.0626882337995,0.0628078678335,0.0628722861595,0.0628170704515,0.0628998940134,0.0627526521255,0.0624673709676,0.0627710573615,0.0629919201934,0.0630057241204,0.0632127830254,0.0630287306654,0.0630379332834,0.0627710573615,0.0628584822325,0.0628584822325,0.0631759725534,0.0630195280474,0.0626192141645,0.0626652272545,0.0625639984565,0.0625501945295,0.0626928351085,0.0630241293564,0.0633140118233,0.0635026654923,0.0635394759643,0.0639996068642,0.0642388749321,0.064768025467,0.0649336725909,0.0651867445858,0.0652419602938,0.0652741694568,0.0651775419678,0.0650901170969,0.064675999287,0.0643815155111,0.0641100382801,0.0638937767572,0.0641376461341,0.0639766003192,0.0641928618421,0.0642066657691,0.0641514500611,0.0639950055552,0.0642756854041,0.0641376461341,0.0643355024211,0.0643170971851,0.0639259859202,0.0641652539881,0.0638937767572,0.0640640251901,0.0640134107912,0.0642940906401,0.064441332528,0.06461618227,0.064685201905,0.0648922608099,0.0650947184059,0.0650072935349,0.0652557642208,0.0653477904008,0.0653247838558,0.0653201825468,0.0655916597777,0.0655962610867,0.0656376728677,0.0655962610867,0.0654674244348,0.0654904309798,0.0654628231258,0.0653938034908,0.0656054637047,0.0653523917098,0.0653984047998,0.0654076074178,0.0655732545417,0.0651039210239,0.0652143524398,0.0654398165808,0.0652787707658,0.0653109799288,0.0653799995638,0.0655226401428,0.0654720257438,0.0654536205078,0.0652005485128,0.0653431890918,0.0651959472038,0.0649796856809,0.0653155812378,0.0655548493057,0.0654260126538,0.0656146663227,0.0656100650137,0.0658217252277,0.0658999474807,0.0663462744535,0.0662128364926,0.0659735684246,0.0663094639816,0.0657711108287,0.0656744833397,0.0654214113448,0.0652005485128,0.0650855157879,0.0654352152718,0.0651637380409,0.0653431890918,0.0657112938117,0.0649750843719,0.0653339864738,0.0656836859577,0.0659551631886,0.0660839998406,0.0660195815146,0.0658263265367,0.0656560781037,0.0655456466878,0.0657987186827,0.0661392155486,0.0661714247116,0.0659367579526,0.0657112938117,0.0653707969458,0.0654536205078,0.0655226401428,0.0651499341139,0.0652373589848,0.0649014634279,0.064680600596,0.0643216984941,0.0641330448251,0.0641652539881,0.064551763944,0.064478143,0.0643631102751,0.0651315288779,0.0653569930188,0.0656790846487,0.0658079213007,0.0660563919866,0.0662220391106,0.0662634508916,0.0659735684246,0.0657250977387,0.0656606794127,0.0653063786198,0.0648922608099,0.064791032012,0.0650625092429,0.0650717118609,0.0652557642208,0.0655134375248,0.0658171239187,0.0661254116216,0.0660563919866,0.0664290980155,0.0666499608475,0.0665625359765,0.0662680522006,0.0661070063856,0.0659689671156,0.0658033199917,0.0656376728677,0.0657757121377,0.0656008623957,0.0651545354229,0.0654444178898,0.0655180388338,0.0655778558507,0.0653247838558,0.0654904309798,0.0654168100358,0.0654582218168,0.0653431890918,0.0656882872667,0.0657250977387,0.0655410453788,0.0655134375248,0.0653109799288,0.0657435029747,0.0654582218168,0.0655502479968,0.0655916597777,0.0657895160647,0.0658723396267,0.0660425880596,0.0660978037676,0.0660241828236,0.0660932024586,0.0661116076946,0.0664705097965,0.0665809412125,0.0665809412125,0.0660011762786,0.0658539343907,0.0656974898847,0.0658769409357,0.0660563919866,0.0660333854416,0.0656882872667,0.0652327576758,0.0655272414518,0.0653892021818,0.0657573069017,0.0660287841326,0.0662036338746,0.0659689671156,0.0655548493057,0.0657757121377,0.0661622220936,0.0665533333585,0.0659413592616,0.0661254116216,0.0657158951207,0.0656330715587,0.0656974898847,0.0656882872667,0.0657803134467,0.0658171239187,0.0654628231258,0.0651131236419,0.0652833720748,0.0649796856809,0.0652511629118,0.0651729406589,0.0648462477199,0.0644045220561,0.0641376461341,0.0643032932581,0.0579488855308,0.0515760725674,0.0450606190251,0.0386371916628,0.0)
m <- c(0.0381803278749,0.0446887044409,0.0511372444473,0.0578987756888,0.0639882963372,0.0636937163511,0.0638318007196,0.0640251188354,0.0636062629178,0.0639652822757,0.0637535529108,0.0635510291704,0.06334850543,0.0631091591914,0.0634451644879,0.0638824316547,0.0639146513407,0.0638271979073,0.0641539975793,0.0642000257021,0.0642276425758,0.0644807972513,0.064950284104,0.0650147234759,0.0649456812917,0.0650883684724,0.0653185090865,0.0651574106567,0.0653139062742,0.065424373769,0.0656222946971,0.0656268975094,0.0654059625199,0.0654796075164,0.0656084862602,0.0651251909707,0.0650331347251,0.0652632753391,0.0649963122268,0.0650101206636,0.0654980187655,0.0657143509427,0.0655256356392,0.0656545143831,0.0655808693865,0.0658018043761,0.0654427850181,0.0655670609497,0.065898463434,0.065718953755,0.0653461259602,0.0653415231479,0.0656683228199,0.0655440468883,0.0657603790655,0.0657327621918,0.0657972015638,0.0659122718708,0.0659951224919,0.0660181365533,0.0659905196796,0.0656176918848,0.06550722439,0.065097574097,0.0647569659882,0.0649732981654,0.0648306109847,0.0647845828619,0.0649594897285,0.0651620134689,0.0651804247181,0.0651758219058,0.0648996531689,0.0652632753391,0.0657649818778,0.0657005425059,0.0665014318428,0.0664968290306,0.0661700293586,0.066128604048,0.0661654265463,0.0662068518568,0.0663265249761,0.0666395162113,0.0665520627779,0.066667133085,0.0660181365533,0.0658616409357,0.0659721084305,0.0662114546691,0.0658846549971,0.0662298659182,0.0663955671604,0.0661516181095,0.0659951224919,0.0658708465603,0.0662943052902,0.06645540372,0.0663357306007,0.0663863615358,0.0670215496307,0.0669018765113,0.0669525074464,0.0666993527709,0.0668374371394,0.0669386990096,0.066634913399,0.0665980909008,0.0665934880885,0.0665382543411,0.0664968290306,0.0664369924709,0.0666303105867,0.0668788624499,0.0664369924709,0.0663863615358,0.0665152402797,0.0663679502867,0.0661470152972,0.0660411506147,0.065571663762,0.0655808693865,0.0654013597076,0.0652494669023,0.0654611962672,0.0654796075164,0.0654657990795,0.065834024062,0.0659582999936,0.0658386268743,0.0659214774954,0.0660963843621,0.066128604048,0.0663357306007,0.0666625302727,0.0664323896586,0.0661240012358,0.0658156128129,0.0659582999936,0.0657143509427,0.0653691400216,0.0648306109847,0.064591264746,0.0645314281864,0.063969885088,0.0638732260301,0.0643841381934,0.0643657269442,0.0642552594495,0.0646741153671,0.0652954950251,0.0655440468883,0.0657925987515,0.065718953755,0.0657879959392,0.0659951224919,0.0656499115708,0.0657879959392,0.065898463434,0.065603883448,0.0653277147111,0.0653645372093,0.0652402612777,0.0651620134689,0.0655486497006,0.0656453087585,0.06550722439,0.0656591171953,0.0655164300146,0.0654335793935,0.0650837656601,0.0651528078444,0.0650883684724,0.0652678781514,0.06524486409,0.0652034387795,0.065359934397,0.0647845828619,0.0645774563092,0.0646971294285,0.064885844732,0.0647109378653,0.0645682506846,0.0644393719407,0.0641263807056,0.0638732260301,0.0637213332248,0.0637995810336,0.0637765669722,0.0638732260301,0.0639146513407,0.0639928991494,0.0644071522548,0.0641586003916,0.0641586003916,0.06429668476,0.0643933438179,0.0647017322408,0.0646372928688,0.0643058903846,0.0640849553951,0.0637903754091,0.0636891135389,0.063528015109,0.0635142066722,0.0634589729248,0.06308614513,0.0628007707685,0.062938855137,0.063021705758,0.0632840660581,0.06334850543,0.0632978744949,0.0634037391774,0.0634911926108,0.0632978744949,0.0631551873142,0.0631459816896,0.0630907479423,0.0633392998055,0.0630999535668,0.0632886688704,0.063021705758,0.0626949060861,0.0628514017036,0.0628514017036,0.0633991363651,0.0635694404195,0.0636246741669,0.0633715194914,0.0636614966652,0.0635234122967,0.0633300941809,0.0638640204056,0.0637857725968,0.0637213332248,0.0638179922827,0.0637259360371,0.0635924544809,0.0637443472862,0.0633254913686,0.0632794632458,0.0633024773072,0.0633991363651,0.0630769395054,0.0629480607615,0.0626396723387,0.062253036107,0.0627225229597,0.0627363313966,0.0628560045159,0.062906635451,0.0630263085703,0.0628882242019,0.063021705758,0.0631782013756,0.0630953507545,0.0634313560511,0.0631966126247,0.0630355141949,0.0633070801195,0.0631137620037,0.0630309113826,0.0627869623317,0.0626212610896,0.0627455370212,0.0624003261,0.0623266811035,0.0621471714246,0.0618203717526,0.0615948339508,0.0621471714246,0.0621747882983,0.0618249745649,0.0622254192333,0.0621563770491,0.0624739710965,0.0623865176632,0.0621563770491,0.0623036670421,0.0623036670421,0.0618157689403,0.0617053014455,0.061811166128,0.0615902311385,0.0614107214595,0.0611943892823,0.0613554877121,0.0615580114525,0.0613969130227,0.0613324736507,0.0613140624016,0.0616132451999,0.0617697408175,0.0617651380052,0.0618617970631,0.0621379658,0.0622484332948,0.0621333629877,0.0624187373492,0.0622898586053,0.0622622417316,0.0618756055,0.0617513295684,0.0617053014455,0.0620459095544,0.062253036107,0.0619630589333,0.0618848111245,0.0621379658,0.0620090870561,0.0622438304825,0.0625476160931,0.0628375932668,0.0626810976492,0.0622254192333,0.0617513295684,0.0618756055,0.0618986195614,0.0614521467701,0.0615902311385,0.0612358145928,0.0612450202174,0.0608445755489,0.0606788743068,0.0607525193033,0.0609182205454,0.0609044121086,0.0611483611595,0.0611621695963,0.0613002539648,0.0618756055,0.0619078251859,0.0620182926807,0.0620597179912,0.0622024051719,0.0623404895404,0.0622944614176,0.0622944614176,0.0621793911105,0.0622346248579,0.0617329183192,0.0619124279982,0.062285255793,0.0626258639018,0.0625844385913,0.0626074526527,0.0625660273422,0.0624509570351,0.0627409342089,0.0625107935948,0.0625338076562,0.0624187373492,0.0622944614176,0.0620274983052,0.0620505123667,0.0620919376772,0.0623589007895,0.0626949060861,0.0629296495124,0.0633577110546,0.0632702576212,0.063380725116,0.0636476882283,0.0634497673002,0.0636799079143,0.0635142066722,0.0635142066722,0.0630401170072,0.0630631310686,0.0628283876422,0.0631505845019,0.0628652101405,0.0627547426457,0.0632978744949,0.0632564491844,0.0632794632458,0.0634175476143,0.0638732260301,0.0638916372792,0.063707524788,0.0635740432318,0.0636062629178,0.0634543701125,0.0636108657301,0.0636983191634,0.0639975019617,0.0637489500985,0.0634681785493,0.0633623138669,0.0635326179213,0.0638179922827,0.0641908200775,0.0644163578793,0.0645774563092,0.0647845828619,0.0644209606916,0.0645958675583,0.0650193262882,0.0650883684724,0.0650515459742,0.0647937884864,0.0645590450601,0.064655704118,0.0642368482004,0.0636845107266,0.0639882963372,0.0639146513407,0.0638364035319,0.0638962400915,0.0643749325688,0.0648950503566,0.0650285319128,0.0649364756671,0.0650561487865,0.0654427850181,0.06524486409,0.0657143509427,0.0659997253042,0.0659767112428,0.0659122718708,0.0659214774954,0.0661193984235,0.0664646093446,0.0667177640201,0.0669156849482,0.0671274143131,0.067076783378,0.0667453808938,0.0668558483885,0.0670629749412,0.0667361752692,0.0666809415218,0.0667315724569,0.0665934880885,0.0664784177814,0.0666763387095,0.0668006146411,0.0671688396237,0.0675186533571,0.0673667605518,0.0681032105168,0.0681216217659,0.0682597061344,0.0684622298748,0.0689501279766,0.068973142038,0.0688994970415,0.0690145673485,0.0690836095328,0.069479451389,0.0690559926591,0.0694656429521,0.0693459698328,0.0696865779416,0.0693459698328,0.0696543582557,0.0696589610679,0.0694380260784,0.0693966007679,0.0693091473345,0.0694334232661,0.0693137501468,0.0696221385697,0.0698246623101,0.0703079575996,0.0704138222821,0.0703171632242,0.0707590332032,0.0708418838243,0.071099641312,0.0713988241103,0.0718729137753,0.0719787784578,0.0720294093929,0.0720294093929,0.0723884287509,0.0730558365317,0.0733043883949,0.0736772161897,0.0740868664827,0.0747220545776,0.0746392039565,0.0748509333215,0.0749383867548,0.0751040879969,0.0751777329934,0.0751777329934,0.0753756539215,0.0756103973479,0.0757392760918,0.0757300704672,0.0759602110813,0.0762455854427,0.0764941373059,0.076903787599,0.0769498157218,0.0772996294552,0.0773410547657,0.0778795838027,0.0778749809904,0.0778749809904,0.0778749809904,0.0778979950518,0.0780821075431,0.0783812903413,0.0786390478291,0.0790855206204,0.0795273905994,0.0794169231047,0.0795918299714,0.0797483255889,0.0798910127697,0.0802086068171,0.0807241217926,0.0805676261751,0.0807655471032,0.0806596824207,0.0805354064891,0.0801027421346,0.0803697052469,0.0805952430487,0.0811337720857,0.0813639126997,0.0814191464471,0.0816861095595,0.0821878160981,0.0826619057631,0.0830577476193,0.0837021413387,0.0839092678914,0.0839552960142,0.0840427494476,0.0841716281915,0.0845766756722,0.0847009516038,0.0847331712898,0.0843741519318,0.0846687319179,0.0846134981705,0.0847838022249,0.0851244103337,0.0855662803127,0.0857918181145,0.0858930799847,0.086403992148,0.0864500202708,0.0873015405429,0.0880241820711,0.0886501645413,0.0892715441993,0.0897502366766,0.0896673860555,0.0899573632293,0.0897686479257,0.089593741059,0.0899251435433,0.0896811944924,0.0893267779467,0.0896996057415,0.0898791154205,0.0901598869697,0.0906984160066,0.090689210382,0.0908272947505,0.0915039081559,0.0917754740805,0.0923416199911,0.0925947746666,0.0923692368648,0.0920976709402,0.0919918062577,0.0923416199911,0.0931839346386,0.0940952914703,0.0943530489581,0.0944451052037,0.0944220911423,0.0941275111563,0.0948593583091,0.0954577239056,0.0957062757688,0.0960238698163,0.0961757626216,0.0961021176251,0.0963874919865,0.0966360438497,0.096820156341,0.0975105781832,0.0977315131727,0.0979570509745,0.0981411634657,0.0978603919166,0.0982654393973,0.0981825887763,0.0981273550289,0.0987441318746,0.0995220071502,0.0999454658801,0.100373527422,0.101151402698,0.10236654514,0.103595496019,0.104018954749,0.105174260632,0.106550501504,0.107788658008,0.10880127671,0.110729855056,0.111806913129,0.113045069633,0.113813739284,0.11437067957,0.115125540784,0.116313066353,0.117132366939,0.11784120003,0.119199029654,0.119728353066,0.120547653652,0.120708752082,0.121730576408,0.1224394095,0.123037775096,0.123120625717,0.123622332256,0.124018174112,0.123023966659,0.122407189814,0.122342750442,0.12231973638,0.122430203875,0.1227017698,0.122614316366,0.123134434154,0.12306539197,0.122780017609,0.123622332256,0.123875486932,0.1240135713,0.124773035326,0.124515277839,0.12528394749,0.125776448404,0.126614160239,0.126839698041,0.127428858013,0.127971989862,0.12843227109,0.128676220141,0.12891556638,0.129941993519,0.129389656045,0.129923582269,0.129472506666,0.129872951334,0.13065082661,0.130765896917,0.131327440015,0.132155946226,0.132395292465,0.132340058717,0.13301206931,0.133219195863,0.133803753023,0.134820974537,0.135074129212,0.135672494809,0.136026911355,0.136547029142,0.137002707558,0.13744918035,0.137822008144,0.138576869359,0.139299510887,0.13928570245,0.13991168492,0.140482433643,0.141149841424,0.141587108591,0.141651547963,0.142360381054,0.14311984508,0.143465056001,0.143732019114,0.144100244096,0.144362604396,0.144878119372,0.145099054361,0.145301578102,0.146162303998,0.146180715248,0.146700833035,0.146696230223,0.146880342714,0.147193333949,0.147340623943,0.147087469267,0.146981604585,0.147322212693,0.147612189867,0.147768685485,0.14733602113,0.147662820802,0.148196747027,0.148454504515,0.148003428911,0.147906769853,0.148192144215,0.147911372665,0.147764082672,0.14755695612,0.147695040488,0.147446488625,0.146765272407,0.146240551807,0.145950574633,0.145867724012,0.145619172149,0.145738845269,0.145628377774,0.145817093077,0.145775667767,0.145794079016,0.145582349651,0.145646789023,0.146061042128,0.145748050893,0.145204919044,0.144542114075,0.144298165024,0.144058818786,0.143497275687,0.1432395182,0.142700989163,0.141633136713,0.141043976741,0.141154444236,0.141407598912,0.141798837956,0.141541080468,0.141034771117,0.140482433643,0.140224676155,0.140565284264,0.140836850189,0.140694163008,0.140063577725,0.13991168492,0.139437595255,0.139584885248,0.139060164648,0.13934553901,0.139400772757,0.138645911543,0.138471004676,0.138742570601,0.138549252485,0.138070560008,0.137435371913,0.137200628486,0.137343315667,0.137196025674,0.136597660078,0.136708127572,0.136767964132,0.136473384146,0.136082145102,0.135847401676,0.135515999191,0.134489572053,0.13385898677,0.133062700245,0.132887793379,0.132427512151,0.131985642171,0.131534566568,0.131322837203,0.131134121899,0.131281411892,0.130876364412,0.131023654405,0.131258397831,0.130917789722,0.13085335035,0.130480522555,0.129909773833,0.129546151662,0.128828112946,0.12816991079,0.128294186722,0.127682012688,0.1268995346,0.126641777113,0.126126262137,0.12601119183,0.125652172472,0.125923738397,0.126130864949,0.126195304321,0.125684392158,0.125458854356,0.125113643435,0.124805255012,0.124326562535,0.123461233826,0.123180462277,0.122563685431,0.122149432326,0.121408379549,0.121463613296,0.121399173924,0.121523449856,0.12068573802,0.12080541114,0.120630504273,0.120317513038,0.120174825857,0.119553446199,0.11949360964,0.118798584985,0.11838433188,0.117997695648,0.117675498788,0.117086338816,0.117118558502,0.116653674462,0.115576616388,0.115466148893,0.115222199842,0.115153157658,0.114844769235,0.114356871133,0.114421310505,0.114306240198,0.113984043339,0.113569790233,0.114145141768,0.113942618028,0.113353458056,0.112879368391,0.11273668121,0.11263541934,0.112037053744,0.111475510645,0.110955392857,0.110665415684,0.110412261008,0.11041686382,0.109804689787,0.109542329487,0.108976183576,0.108976183576,0.108939361078,0.108907141392,0.108653986717,0.108364009543,0.107770246759,0.107181086787,0.106757628057,0.106476856508,0.105993561218,0.10515124657,0.105017765014,0.104806035649,0.104456221916,0.104313534735,0.103876267568,0.103554070709,0.103788814135,0.103181242914,0.102905074177,0.103199654163,0.10325488791,0.102651919502,0.102504629509,0.102674933563,0.102122596089,0.101620889551,0.10125726738,0.101303295503,0.101307898315,0.100640490535,0.100180209306,0.100083550249,0.0998994377573,0.0995081987133,0.099273455287,0.0994345537168,0.0994621705905,0.0987625431237,0.0983160703324,0.097703896299,0.0968063479041,0.0966314410374,0.0960929120005,0.0954255042197,0.0957477010794,0.0949652229915,0.0939387958528,0.0940170436615,0.0929445884,0.0927742843455,0.0922081384349,0.0913842350365,0.0900171997889,0.0889907726502,0.0875086670955,0.0867031749463,0.0860219587286,0.0847331712898,0.0843235209967,0.0836008794685,0.0832234488615,0.0823443117157,0.083002513872,0.0830577476193,0.0831037757421,0.082611274828,0.0826204804526,0.0823120920297,0.0822292414087,0.0819622782963,0.08172753487,0.0816216701875,0.0806044486733,0.0803466911855,0.0798127649609,0.0799324380802,0.0798081621486,0.0800935365101,0.079683886217,0.0796976946539,0.0796378580942,0.0797437227767,0.0796654749679,0.079274235924,0.0793156612345,0.0792466190503,0.0785792112695,0.0781189300413,0.0782892340957,0.0776264291272,0.0771109141517,0.0765539738656,0.0767150722955,0.0762363798182,0.0761765432585,0.0760292532655,0.0761305151357,0.0759187857708,0.0756978507812,0.0753986679829,0.0749982233145,0.0751363076829,0.0743262127214,0.074123688981,0.0737876836844,0.0734562812002,0.073207729337,0.0732353462107,0.0728395043544,0.0727888734193,0.0728118874808,0.0727704621702,0.073060439344,0.0730098084089,0.0730190140334,0.072733639672,0.0726645974877,0.0726830087369,0.0725909524912,0.0726461862386,0.0726323778018,0.0721306712631,0.0716795956595,0.0716473759735,0.0712975622401,0.0710858328752,0.0708464866366,0.0703585885347,0.0701652704189,0.070036391675,0.069889101682,0.0696681666925,0.0699259241803,0.0697878398118,0.0693091473345,0.0691342404679,0.0691066235942,0.0689639364134,0.0689915532871,0.0688534689187,0.0688534689187,0.0686509451783,0.068024962708,0.0681216217659,0.0685542861204,0.0684392158133,0.0684484214379,0.0682689117589,0.0677257799097,0.0673529521149,0.067224073371,0.067256293057,0.0676613405378,0.0675462702307,0.0670445636921,0.0669433018219,0.0669340961973,0.0669709186956,0.0675232561693,0.0677810136571,0.067909892401,0.0677579995957,0.067698163036,0.0672010593096,0.0671872508728,0.0670675777535,0.0666717358973,0.0670491665043,0.0663771559112,0.0661562209217,0.0655624581374,0.0655256356392,0.0651159853461,0.0655164300146,0.0657925987515,0.0658800521848,0.0656453087585,0.0646188816197,0.0646326900566,0.0647339519268,0.0646879238039,0.0645866619337,0.0644807972513,0.0643196988214,0.0643104931969,0.0646372928688,0.064623484432,0.0650101206636,0.0650607515987,0.0649963122268,0.0652080415917,0.0653875512707,0.0656591171953,0.0653875512707,0.0648904475443,0.0644900028758,0.0644393719407,0.0643058903846,0.0643150960091,0.0641862172653,0.0639238569652,0.0635372207336,0.0634313560511,0.0635142066722,0.0633070801195,0.0629526635738,0.0631828041879,0.0631505845019,0.0631045563791,0.0627087145229,0.0627639482703,0.0628145792054,0.0623036670421,0.0625568217176,0.0625522189053,0.0627961679563,0.0624693682843,0.0623404895404,0.0623635036018,0.0624463542229,0.0623681064141,0.0623542979772,0.0628421960791,0.0625246020316,0.0628790185773,0.0629204438879,0.0632380379353,0.0633346969932,0.0635326179213,0.0634773841739,0.0636568938529,0.063707524788,0.0635556319827,0.0635786460441,0.0632058182493,0.0632196266861,0.0630401170072,0.0628145792054,0.0627133173352,0.0626857004615,0.0622898586053,0.0626764948369,0.062759345458,0.0625384104685,0.0628882242019,0.0625430132808,0.0622484332948,0.0624187373492,0.0620781292403,0.0622024051719,0.0625338076562,0.0619354420596,0.061811166128,0.0618571942508,0.0613600905244,0.0618525914385,0.062317475479,0.0624371485983,0.0626764948369,0.0623727092264,0.0623036670421,0.0626672892124,0.0623727092264,0.0629848832598,0.0629480607615,0.0624095317246,0.0623496951649,0.0620274983052,0.0616868901964,0.0617099042578,0.0616684789473,0.0615303945788,0.0616408620736,0.0608123558629,0.0610148796033,0.0613416792753,0.0611713752209,0.061516586142,0.0618986195614,0.0624003261,0.0620321011175,0.0619722645579,0.061990675807,0.0618986195614,0.0619124279982,0.0617973576912,0.0617467267561,0.061811166128,0.0616178480122,0.0614107214595,0.0617283155069,0.0615027777052,0.0615994367631,0.0620459095544,0.0620136898684,0.0617421239438,0.061958456121,0.061778946442,0.0618387830017,0.0618295773771,0.0617697408175,0.0619492504965,0.0619400448719,0.0619308392473,0.0620274983052,0.0624509570351,0.0623865176632,0.0623542979772,0.0625107935948,0.062285255793,0.0623082698544,0.0624279429737,0.0625199992194,0.0622806529807,0.062496985158,0.0623957232878,0.0623727092264,0.0623358867281,0.0623589007895,0.0625982470281,0.0627225229597,0.0628882242019,0.0627639482703,0.0628007707685,0.0627777567071,0.062727125772,0.0629296495124,0.0629572663861,0.0624555598474,0.0625061907825,0.0626718920247,0.0623220782913,0.0623727092264,0.0626580835878,0.0625061907825,0.0626764948369,0.0622070079842,0.0624463542229,0.0630078973212,0.062791565144,0.0626212610896,0.0628882242019,0.0628698129528,0.0626626864001,0.0627455370212,0.062727125772,0.063053925444,0.0629342523247,0.0628053735808,0.0631275704405,0.0632196266861,0.0629986916966,0.0627685510826,0.0566053854377,0.0502857241752,0.0438832122916,0.0375359341555,0.0)
ycorr <- c(7.86194572292e-05,7.84742305413e-05,7.80454887316e-05,7.73322885782e-05,7.63369028648e-05,7.50592351622e-05,7.35000273459e-05,7.19213787394e-05,7.03281376552e-05,6.87248003991e-05,6.71108945803e-05,6.54971068509e-05,6.38921447787e-05,6.22954152556e-05,6.07083543524e-05,5.91253160207e-05,5.75487362949e-05,5.59790673768e-05,5.44138239811e-05,5.2851523495e-05,5.12932945021e-05,4.9733496651e-05,4.81641430518e-05,4.65801194469e-05,4.49782982206e-05,4.33649376438e-05,4.17386333774e-05,4.01021270572e-05,3.84503025611e-05,3.67890232944e-05,3.51133366185e-05,3.34208547652e-05,3.17160975826e-05,3.00000953569e-05,2.82739374365e-05,2.65337153094e-05,2.47806273186e-05,2.30137783677e-05,2.12395607093e-05,1.94563533412e-05,1.76588211036e-05,1.58502964671e-05,1.4030014181e-05,1.21950539905e-05,1.03437822481e-05,8.48055681296e-06,6.60656638618e-06,4.71594796052e-06,2.81045630098e-06,8.79384592311e-07,-1.0693952473e-06,-3.03531281653e-06,-5.01805315025e-06,-7.01833091149e-06,-9.03471304246e-06,-1.10714502439e-05,-1.31297200452e-05,-1.52074362081e-05,-1.73072613902e-05,-1.94240242466e-05,-2.15556893621e-05,-2.370667914e-05,-2.58777388915e-05,-2.80678288617e-05,-3.02682769198e-05,-3.24796835407e-05,-3.47030721675e-05,-3.69399031724e-05,-3.91871212594e-05,-4.14412451631e-05,-4.37042422265e-05,-4.59749356799e-05,-4.82502318237e-05,-5.0529275815e-05,-5.28191405986e-05,-5.51219722166e-05,-5.74371259644e-05,-5.97564234412e-05,-6.20808643311e-05,-6.44140788285e-05,-6.67588338105e-05,-6.91112216609e-05,-7.14687324714e-05,-7.38315909723e-05,-7.62010274028e-05,-7.85741807939e-05,-8.09493779842e-05,-8.33270477841e-05,-8.57136928834e-05,-8.81064007919e-05,-9.04985804049e-05,-9.28891532836e-05,-9.52839965404e-05,-9.76827292922e-05,-0.000100084556109,-0.000102483214538,-0.000104878274928,-0.000107272196869,-0.000109658737858,-0.000112032281192,-0.00011439278474,-0.000116745484361,-0.000119089925345,-0.000121426753704,-0.000123755927544,-0.000126080280554,-0.000128402265905,-0.000130720078596,-0.000133032663391,-0.000135346931677,-0.000137666533408,-0.000139988720268,-0.000142305811994,-0.000144614891918,-0.000146915456705,-0.000149208932501,-0.000151490681997,-0.000153762699222,-0.00015602120358,-0.00015826255721,-0.000160484450357,-0.000162690913712,-0.000164892670163,-0.000167097449223,-0.000169303888863,-0.000171504088887,-0.000173692950699,-0.00017587327894,-0.000178048672943,-0.000180226017257,-0.000182410942258,-0.000184598522347,-0.00018678272137,-0.000188952998657,-0.000191109782267,-0.000193256221187,-0.000195403777843,-0.000197557697278,-0.000199709976167,-0.000201857432101,-0.000203999920412,-0.000206136287716,-0.000208268520357,-0.000210397024878,-0.000212528097779,-0.000214660476909,-0.000216795594327,-0.00021892434799,-0.00022105132414,-0.000223182149207,-0.000225311185744,-0.000227432502814,-0.000229548307431,-0.000231657122453,-0.000233752856504,-0.000235832458035,-0.000237891512617,-0.000239932244209,-0.000241956927657,-0.000243961966164,-0.000245948519195,-0.000247919824376,-0.000249878944292,-0.000251827622431,-0.000253765614792,-0.000255702915682,-0.000257641145987,-0.000259578634262,-0.000261514657612,-0.000263447519307,-0.000265374140127,-0.000267295737438,-0.000269207947695,-0.000271110468918,-0.000273005931394,-0.000274894741939,-0.00027677178273,-0.000278638889434,-0.000280497199424,-0.000282345659466,-0.000284185411217,-0.000286022349187,-0.00028785571833,-0.000289689687833,-0.000291521608299,-0.000293347492176,-0.000295167935801,-0.000296984490903,-0.000298793913101,-0.000300594635323,-0.000302387020067,-0.000304170418163,-0.000305943902398,-0.000307704872782,-0.000309456048788,-0.000311199215592,-0.00031293546248,-0.000314660684278,-0.000316378435551,-0.000318090560282,-0.000319801104223,-0.000321510879677,-0.000323216638113,-0.000324917302269,-0.000326612244586,-0.000328299923207,-0.00032998148001,-0.000331655469693,-0.00033332668973,-0.00033499242802,-0.000336648602585,-0.000338288125118,-0.000339914375121,-0.000341532948759,-0.000343142628788,-0.000344743239094,-0.000346332757432,-0.000347912462461,-0.000349480623861,-0.00035103889928,-0.000352585446042,-0.000354128663754,-0.000355670082555,-0.000357202125939,-0.000358722413774,-0.000360232534674,-0.000361736884039,-0.000363234751008,-0.00036472546342,-0.000366208338968,-0.00036768396105,-0.00036915452718,-0.000370619517222,-0.000372081524439,-0.000373543749047,-0.000375005463698,-0.000376465953424,-0.000377923963644,-0.00037938146555,-0.000380836564743,-0.000382290982305,-0.000383740746761,-0.000385181986565,-0.000386608586293,-0.000388023155448,-0.000389423987227,-0.000390810528206,-0.000392184718171,-0.000393546283459,-0.000394894485804,-0.000396230889184,-0.000397554323996,-0.000398866864395,-0.000400174956989,-0.000401475741786,-0.000402770791396,-0.000404063417508,-0.000405356847976,-0.000406644279617,-0.000407927042881,-0.00040920744594,-0.000410481739892,-0.000411751455877,-0.000413015809144,-0.000414274674909,-0.000415531487616,-0.000416781598329,-0.000418023321233,-0.000419256031132,-0.000420482202277,-0.000421699437932,-0.000422906468683,-0.000424108194752,-0.000425306347434,-0.000426498307566,-0.000427679136514,-0.000428847421113,-0.000430001418386,-0.00043114440339,-0.000432274473253,-0.000433390251892,-0.00043449685748,-0.000435588368869,-0.000436657208783,-0.000437704428024,-0.000438727028766,-0.000439728112098,-0.000440706193913,-0.000441660872595,-0.000442582039772,-0.000443469031356,-0.000444318073723,-0.000445124877575,-0.000445895852616,-0.000446632102909,-0.000447333707961,-0.000448005710076,-0.000448648157957,-0.000449261573365,-0.000449860999951,-0.000450452665743,-0.000451041586761,-0.000451630926986,-0.000452222927966,-0.000452814505494,-0.000453412031626,-0.000454012377056,-0.000454616820906,-0.00045522302766,-0.000455826011236,-0.000456418026689,-0.000456995858199,-0.0004575636237,-0.000458122991245,-0.000458674905213,-0.000459217529736,-0.000459749789562,-0.000460271268125,-0.000460784378153,-0.000461290581206,-0.000461795351439,-0.00046229792543,-0.000462797725905,-0.000463283831558,-0.000463757756231,-0.000464219990936,-0.000464670474789,-0.000465106502498,-0.000465526646462,-0.000465932573562,-0.000466320472042,-0.000466694771381,-0.000467054524705,-0.000467404187759,-0.000467745473963,-0.000468076456997,-0.000468392642044,-0.000468697408146,-0.000468995699966,-0.0004692844021,-0.00046956099494,-0.00046982648256,-0.000470077771496,-0.00047031510303,-0.00047053921241,-0.000470750744475,-0.000470950813856,-0.000471140077375,-0.000471318689325,-0.000471485212075,-0.000471643761048,-0.00047179323363,-0.000471933216892,-0.00047206482565,-0.00047218848722,-0.000472301511648,-0.000472408357694,-0.000472509387414,-0.000472600579474,-0.000472680168955,-0.000472748667905,-0.000472805320579,-0.000472850412872,-0.000472886054304,-0.000472907219641,-0.000472913703018,-0.000472905879228,-0.000472881742842,-0.000472841512898,-0.000472794077996,-0.000472738962944,-0.000472670446081,-0.000472589610295,-0.000472495918554,-0.000472390046117,-0.000472278313219,-0.000472157792017,-0.000472028470996,-0.000471888415626,-0.000471731177154,-0.000471555937939,-0.000471368696368,-0.000471170409953,-0.000470961641424,-0.000470742427422,-0.000470507818375,-0.000470255537755,-0.00046998898311,-0.000469708892861,-0.000469418674305,-0.000469120778044,-0.000468807271933,-0.000468476118069,-0.000468130509674,-0.000467769596596,-0.000467396895702,-0.00046701674183,-0.000466627685078,-0.000466226047884,-0.000465812944971,-0.000465384494369,-0.000464944571071,-0.000464495842799,-0.000464033501458,-0.000463561829058,-0.000463076722778,-0.000462575673648,-0.000462054287748,-0.000461516142635,-0.000460958484081,-0.000460382953204,-0.000459793306376,-0.000459190121809,-0.000458572223873,-0.000457933805014,-0.000457270945841,-0.000456588563841,-0.000455885342603,-0.000455164910885,-0.00045442729028,-0.000453674708884,-0.000452904848068,-0.000452116309856,-0.000451305177286,-0.000450476535218,-0.000449637893459,-0.000448786771832,-0.000447925378629,-0.000447054182896,-0.000446173848556,-0.000445280628071,-0.000444372694503,-0.000443447046626,-0.000442502990136,-0.000441543376398,-0.0004405674102,-0.000439574903002,-0.000438565258626,-0.000437533706159,-0.000436479715004,-0.000435403416897,-0.000434305851075,-0.000433189246052,-0.000432059574767,-0.00043091491211,-0.000429753257915,-0.000428570463194,-0.000427369465704,-0.000426153022587,-0.00042491916517,-0.000423670079286,-0.000422403318278,-0.0004211221484,-0.000419826411758,-0.000418511736687,-0.000417180530496,-0.000415833676153,-0.000414471017618,-0.000413089621502,-0.000411693288769,-0.000410283513862,-0.000408859886078,-0.000407420994401,-0.000405965804163,-0.000404494739369,-0.000403006753191,-0.000401499144669,-0.000399973400122,-0.00039843167157,-0.000396870642468,-0.000395283614542,-0.000393671599876,-0.000392034652092,-0.000390373525666,-0.000388685925926,-0.000386973323977,-0.000385236890626,-0.000383476048316,-0.00038169270875,-0.000379886845497,-0.000378061954679,-0.000376221851853,-0.000374363810474,-0.000372484528426,-0.000370587143339,-0.000368669565911,-0.000366733298585,-0.000364780294808,-0.000362807248048,-0.000360810831087,-0.000358790168115,-0.000356742538592,-0.000354670151568,-0.000352578582933,-0.000350469466315,-0.000348343002306,-0.000346197487757,-0.000344030954753,-0.000341844084551,-0.000339639950771,-0.000337422680565,-0.000335188685546,-0.000332937923118,-0.000330666237765,-0.000328369002351,-0.000326045788998,-0.000323697923954,-0.000321327874166,-0.00031893432275,-0.000316516357488,-0.000314071888608,-0.00031160337139,-0.000309115384003,-0.000306608946235,-0.000304085821152,-0.000301549021222,-0.000299000803926,-0.000296433697496,-0.00029384987196,-0.000291249287665,-0.000288628507075,-0.000285990855013,-0.00028333044497,-0.000280646676536,-0.000277943262758,-0.000275215182477,-0.000272460245264,-0.000269680912638,-0.000266878898248,-0.000264054946819,-0.000261212894006,-0.000258351758976,-0.000255469708703,-0.000252568444458,-0.000249644572676,-0.000246697669934,-0.000243729772603,-0.000240741432071,-0.000237728744939,-0.000234694343032,-0.000231638382907,-0.000228559394587,-0.0002254613616,-0.000222345862188,-0.000219211333678,-0.000216063430725,-0.000212900218929,-0.000209722399208,-0.000206533265363,-0.000203331844104,-0.000200115143556,-0.000196884668011,-0.000193638187876,-0.000190373406603,-0.000187091127997,-0.000183789869999,-0.000180468877992,-0.000177130227791,-0.000173773313625,-0.000170395754256,-0.000166998763257,-0.000163584606479,-0.000160150825031,-0.000156700231956,-0.000153233337074,-0.000149746689159,-0.000146241649687,-0.000142717346735,-0.000139170268653,-0.000135600326357,-0.000132010523553,-0.000128398627766,-0.000124767216343,-0.000121112404002,-0.000117436966737,-0.000113745206657,-0.000110038747269,-0.000106318134285,-0.000102586448749,-9.88461266351e-05,-9.50950376948e-05,-9.13329845515e-05,-8.75609327258e-05,-8.37804762992e-05,-7.99923957612e-05,-7.61922269841e-05,-7.23788644698e-05,-6.85519797862e-05,-6.4706323302e-05,-6.08385412635e-05,-5.6907092897e-05,-5.28659305409e-05,-4.86728202819e-05,-4.42942177357e-05,-3.94852670643e-05,-3.51309359729e-05,-3.09806410874e-05,-2.69972304565e-05,-2.31393886835e-05,-1.93640840937e-05,-1.56279106542e-05,-1.19736378067e-05,-8.44767889301e-06,-5.08900255503e-06,-1.9270887236e-06,7.9656041954e-07,3.9604956724e-06,7.31563385535e-06,1.08240564014e-05,1.44439364449e-05,1.81324473008e-05,2.18462462672e-05,2.55843253797e-05,2.93450865425e-05,3.31257714771e-05,3.69208649508e-05,4.07336736922e-05,4.45656111554e-05,4.84197456694e-05,5.22969266502e-05,5.61921983302e-05,6.00987470624e-05,6.40179157208e-05,6.79540593511e-05,7.19059528986e-05,7.58738142725e-05,7.98549921714e-05,8.38459243867e-05,8.78450128777e-05,9.18497028835e-05,9.58625133276e-05,9.98847003301e-05,0.000103917302917,0.000107954775023,0.000111993978752,0.000116036238456,0.000120087023297,0.000124149284359,0.00012822252345,0.00013230661999,0.000136399549105,0.000140499304405,0.000144607712568,0.000148727290669,0.000152860350661,0.000157005694634,0.000161160549489,0.000165321006602,0.000169485356166,0.000173657328265,0.000177836175725,0.000182022291107,0.000186218218204,0.000190424801605,0.000194641937913,0.000198868877675,0.000203106949164,0.000207357211746,0.000211618403131,0.000215888925043,0.00022016714232,0.000224456091085,0.000228753789748,0.000233056649175,0.000237365578984,0.000241679959707,0.000245999548799,0.000250322916484,0.000254651686038,0.000258988151502,0.000263335828955,0.000267697056218,0.000272074525936,0.00027646716675,0.000280874516066,0.000285294795076,0.000289725840866,0.000294168567984,0.000298624151348,0.000303089250577,0.000307561924977,0.000312036484697,0.000316505079576,0.000320966487127,0.000325424384625,0.000329879205856,0.000334331051193,0.000338783424535,0.000343236027326,0.000347687660115,0.000352137881388,0.000356586970818,0.000361038573495,0.000365494690061,0.000369947784933,0.000374397430603,0.000378846139529,0.000383288282998,0.000387717833809,0.000392134699668,0.000396540267722,0.000400934536175,0.000405317471097,0.000409686530672,0.000414042434115,0.000418389194832,0.00042272031698,0.000427035899296,0.000431339823133,0.000435634068803,0.000439919051821,0.00044419175634,0.000448449737553,0.000452690251276,0.000456916048321,0.000461124690212,0.000465317758962,0.000469497072038,0.00047365861095,0.00047779905558,0.000481912518097,0.000486002855756,0.000490069626027,0.000494113286769,0.000498135586095,0.000502131696168,0.000506101478611,0.000510044040569,0.00051396174544,0.000517856312693,0.000521733017293,0.000525593499996,0.00052943328423,0.000533256273213,0.000537060736089,0.000540844596169,0.000544608984134,0.000548353472123,0.000552075529516,0.00055577232179,0.000559441606155,0.000563076951103,0.000566681338311,0.000570254095633,0.000573791215099,0.000577299332661,0.000580778823046,0.000584233757924,0.000587663377012,0.000591068954998,0.000594450621451,0.00059781044428,0.000601149021905,0.000604464553169,0.000607759140686,0.000611030502275,0.000614274222755,0.000617487437881,0.000620668939537,0.000623818313714,0.000626936019073,0.000630020853094,0.000633071913007,0.000636089458838,0.000639074164118,0.000642020821083,0.000644932752988,0.000647807163044,0.000650645964345,0.000653448032132,0.000656213662459,0.000658940626563,0.000661628366045,0.000664274787681,0.000666878690396,0.000669441014744,0.000671961443234,0.00067443792022,0.000676870636876,0.000679258633919,0.0006815981083,0.000683890426136,0.000686133372075,0.000688329667943,0.000690481777085,0.000692588546423,0.000694650600327,0.000696668574132,0.000698642143769,0.000700572801771,0.000702460949454,0.000704307353825,0.000706113376824,0.000707879224568,0.00070960139845,0.000711278234223,0.000712911106256,0.000714500037826,0.000716046250614,0.000717551852218,0.000719017705801,0.0007204428149,0.000721826965129,0.000723167845906,0.000724465567971,0.000725722811522,0.000726937341473,0.000728110327969,0.000729239385482,0.000730323527233,0.000731358479627,0.000732342034542,0.000733273761044,0.000734156621804,0.000734989770131,0.000735776459537,0.000736517966166,0.000737212801172,0.000737858619244,0.000738454018896,0.000739000501513,0.000739501635271,0.000739961851494,0.000740380418724,0.00074075535886,0.000741086825641,0.000741369957913,0.00074160245239,0.000741791269683,0.00074193699789,0.000742041540028,0.000742104531282,0.000742123791222,0.000742096721434,0.000742025659872,0.000741909709943,0.000741749166633,0.000741549024341,0.000741308796365,0.000741026766184,0.000740701630496,0.000740332345612,0.000739915179168,0.00073945262012,0.000738943879859,0.000738388870289,0.000737792567255,0.000737152347173,0.000736466375134,0.000735734279695,0.000734956883684,0.000734136210723,0.000733277513829,0.000732382566398,0.000731451490636,0.00073048488103,0.000729479472481,0.000728434371306,0.000727350197222,0.000726226920918,0.000725065530266,0.000723864915746,0.000722622880971,0.00072133388363,0.000719997544259,0.00071861291179,0.000717182312623,0.000715710165392,0.00071419444542,0.000712637471462,0.000711038959039,0.000709397553625,0.000707715893897,0.000705998283793,0.000704247828874,0.000702465262753,0.000700647229826,0.000698791428372,0.000696894665977,0.000694960538583,0.000692989592415,0.000690983299274,0.000688943154756,0.000686865841132,0.000684748407457,0.000682590397042,0.000680391994176,0.000678155861982,0.000675884773056,0.000673577683327,0.000671232165594,0.000668846189068,0.000666417844617,0.000663946506585,0.000661434232005,0.000658879625768,0.000656285554643,0.000653648082613,0.000650966204617,0.000648234851328,0.000645455444323,0.000642629673126,0.000639757909592,0.000636841559588,0.000633879812324,0.000630871279646,0.000627816294621,0.000624714672831,0.000621572040013,0.000618390528734,0.000615171867741,0.000611918594129,0.000608628935421,0.000605302135334,0.0006019403335,0.000598547395274,0.000595125052173,0.000591676268098,0.000588198011938,0.000584691575864,0.000581155863731,0.000577588707481,0.00057399305015,0.000570371052661,0.000566725273113,0.000563055701367,0.000559362930239,0.000555644920892,0.000551902123435,0.000548134797145,0.000544345688885,0.000540539543276,0.000536715378391,0.000532872424431,0.000529006935499,0.00052511648061,0.00052119847697,0.000517251834301,0.000513280147168,0.000509286031046,0.000505269167634,0.000501224313264,0.000497152080564,0.000493055608039,0.000488934492966,0.000484792930228,0.000480634561367,0.000476462917417,0.00047227651826,0.000468071771058,0.000463845574174,0.000459600918464,0.000455340868308,0.000451061367954,0.000446765815883,0.000442454586877,0.000438123474887,0.000433773663498,0.000429402221197,0.00042501024899,0.000420599697868,0.000416172934168,0.000411726197402,0.000407260469473,0.000402776096512,0.000398268510199,0.000393741469035,0.000389191834345,0.000384621347021,0.0003800347026,0.000375432829662,0.000370812907711,0.000366176024799,0.000361524192972,0.000356856627281,0.00035217600671,0.000347482515586,0.000342774379084,0.000338055768174,0.000333322717263,0.000328574942999,0.000323814960122,0.000319043127391,0.00031425592594,0.000309452120367,0.000304633934773,0.000299802390733,0.000294964467055,0.000290118152665,0.000285267625395,0.000280415070332,0.000275556007382,0.0002706880028,0.000265818244117,0.000260951451189,0.000256089056436,0.000251228456647,0.000246365192815,0.000241500035088,0.000236630227225,0.000231752280278,0.000226869714903,0.000221984974972,0.000217096533553,0.000212203340381,0.000207305806368,0.0002024038801,0.00019750096196,0.000192598338984,0.000187694117787,0.000182794836441,0.000177901202521,0.000173014192638,0.000168138372949,0.00016327448027,0.000158417522189,0.000153566660446,0.000148725893146,0.000143896200187,0.000139082293195,0.000134284034454,0.00012949586451,0.000124721547259,0.000119954282368,0.00011519351262,0.000110444507337,0.000105711412944,0.000100989321704,9.62776077122e-05,9.15722763915e-05,8.68685742056e-05,8.21749836067e-05,7.74925602273e-05,7.28224563234e-05,6.81690576614e-05,6.35263936782e-05,5.88956401072e-05,5.42757580069e-05,4.96712374784e-05,4.50825202939e-05,4.05136413913e-05,3.59621093402e-05,3.14218246139e-05,2.68959481614e-05,2.23803820289e-05,1.78771929148e-05,1.33876523499e-05,8.91267253187e-06,4.44830308303e-06,-4.49647043523e-09,-4.4479063165e-06,-8.88163903155e-06,-1.33026646391e-05,-1.77114752388e-05,-2.21108281239e-05,-2.64959540957e-05,-3.08694170853e-05,-3.52296286347e-05,-3.95779794581e-05,-4.39090508108e-05,-4.82198446375e-05,-5.25084084526e-05,-5.67742769824e-05,-6.10194010657e-05,-6.52419460674e-05,-6.94419983106e-05,-7.36213233857e-05,-7.77779126421e-05,-8.19089590474e-05,-8.60177348144e-05,-9.01056990374e-05,-9.41752672943e-05,-9.82280455934e-05,-0.00010226236547,-0.000106275478505,-0.000110266502571,-0.000114230767863,-0.00011816833188,-0.000122082140782,-0.000125974736359,-0.000129844325513,-0.000133690142428,-0.000137512853189,-0.000141310781111,-0.000145084632241,-0.000148837427289,-0.000152570105116,-0.000156285446351,-0.000159980592111,-0.000163654518343,-0.000167304015167,-0.000170930486575,-0.000174531814771,-0.000178108301011,-0.000181659515779,-0.000185184167307,-0.000188679682778,-0.000192149681208,-0.00019559565743,-0.000199019900693,-0.000202423735042,-0.000205805836515,-0.000209163920864,-0.000212498119867,-0.000215811510213,-0.00021910415651,-0.000222381404476,-0.000225637996787,-0.00022887144889,-0.000232076085362,-0.000235253085939,-0.000238400573512,-0.000241519838778,-0.000244614557852,-0.00024768176903,-0.000250718298605,-0.000253724937367,-0.000256702027069,-0.000259654141535,-0.000262581664006,-0.000265487823339,-0.000268371374712,-0.000271232769043,-0.000274069395052,-0.000276881968286,-0.000279671220329,-0.000282438119522,-0.000285181116176,-0.000287896510812,-0.000290580949096,-0.000293233608324,-0.000295855784117,-0.000298451105222,-0.000301017786684,-0.000303560687753,-0.000306078317079,-0.000308571523838,-0.000311036342116,-0.000313473948462,-0.000315886578886,-0.000318277524253,-0.00032064871779,-0.000322996218686,-0.000325315223493,-0.000327607029163,-0.000329868119037,-0.000332096740899,-0.000334294648121,-0.000336462640145,-0.000338601863079,-0.000340712337402,-0.000342790498209,-0.000344835963981,-0.000346853841039,-0.00034884484963,-0.000350811670375,-0.000352752890922,-0.000354671111547,-0.00035656516301,-0.000358438635472,-0.000360286386165,-0.000362104884779,-0.00036389565949,-0.000365658282548,-0.000367389396151,-0.000369090887866,-0.000370764329494,-0.00037241052421,-0.000374029661135,-0.000375617631441,-0.000377172817701,-0.000378702287884,-0.00038020958124,-0.000381697150499,-0.000383164797855,-0.000384609923983,-0.000386030434197,-0.000387425318022,-0.000388794838201,-0.000390139638564,-0.000391468159032,-0.00039277728874,-0.000394065368887,-0.000395329470489,-0.000396564232323,-0.000397769700614,-0.00039895095655,-0.000400109360999,-0.000401239237229,-0.000402346678435,-0.000403426649099,-0.000404478506948,-0.000405503849519,-0.000406502240514,-0.00040747852368,-0.000408356727208,-0.000409058219697,-0.000409583881544,-0.000409934010477,-0.000410110184125)
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(232)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('C2C12-myoblast-H3K27ac-AM_39113_31814008-RT_Fix_BLK-5933_IP_D2-17871.mm10.36mers.unique.MACS-2.1.0.p1e-1_model.pdf',height=6,width=6)
plot(x,p,type='l',col=c('red'),main='Peak Model',xlab='Distance to the middle',ylab='Percentage')
lines(x,m,col=c('blue'))
legend('topleft',c('forward tags','reverse tags'),lty=c(1,1,1),col=c('red','blue'))
plot(xcorr,ycorr,type='l',col=c('black'),main='Cross-Correlation',xlab='Lag between + and - tags',ylab='Correlation')
abline(v=altd,lty=2,col=c('red'))
legend('topleft','alternative lag(s)',lty=2,col='red')
legend('right','alt lag(s) : 232',bty='n')
dev.off()