# R script for Peak Model
#  -- generated by MACS
p <- c(0.03543814010140558,0.04173825389721102,0.048432124805254294,0.05407597674733,0.06011358580164354,0.063919904553276,0.06234487610432463,0.06181986662134085,0.06457616640700573,0.06523242826073546,0.06510117588998951,0.06496992351924356,0.06470741877775167,0.06457616640700573,0.06601994248521113,0.06260738084581653,0.06326364269954626,0.06247612847507058,0.06234487610432463,0.06378865218253005,0.06418240929476789,0.06418240929476789,0.06418240929476789,0.06470741877775167,0.06405115692402194,0.06667620433894088,0.06641369959744899,0.06798872804640034,0.06680745670968682,0.06667620433894088,0.06693870908043277,0.06877624227087602,0.0693012517538598,0.07127003731504901,0.07192629916877874,0.07218880391027063,0.07218880391027063,0.07166379442728685,0.06969500886609764,0.06995751360758953,0.07074502783206521,0.06838248515863818,0.06693870908043277,0.06523242826073546,0.06405115692402194,0.06208237136283274,0.06116360476761112,0.0616886142505949,0.0653636806314814,0.06523242826073546,0.06628244722670303,0.0678574756756544,0.06903874701236791,0.07008876597833548,0.06943250412460575,0.07022001834908143,0.07232005628101658,0.07127003731504901,0.06877624227087602,0.06877624227087602,0.06654495196819493,0.06523242826073546,0.06444491403625978,0.06260738084581653,0.06286988558730842,0.06181986662134085,0.06129485713835706,0.06247612847507058,0.06405115692402194,0.06313239032880032,0.06496992351924356,0.0656261853729733,0.06706996145117872,0.06877624227087602,0.0693012517538598,0.06916999938311386,0.06903874701236791,0.06772622330490845,0.0678574756756544,0.0678574756756544,0.06615119485595708,0.06615119485595708,0.06496992351924356,0.0656261853729733,0.06575743774371924,0.06693870908043277,0.06601994248521113,0.06877624227087602,0.06811998041714629,0.06680745670968682,0.06693870908043277,0.06733246619267061,0.06772622330490845,0.06615119485595708,0.06641369959744899,0.06693870908043277,0.06982626123684359,0.06746371856341656,0.07022001834908143,0.07166379442728685,0.0715325420565409,0.07074502783206521,0.07113878494430306,0.07192629916877874,0.07074502783206521,0.07113878494430306,0.07008876597833548,0.07140128968579496,0.06811998041714629,0.06890749464162196,0.06811998041714629,0.0678574756756544,0.06877624227087602,0.06772622330490845,0.06890749464162196,0.06890749464162196,0.06838248515863818,0.06746371856341656,0.06825123278789223,0.06864498990013007,0.07022001834908143,0.07140128968579496,0.07127003731504901,0.07310757050549226,0.07297631813474631,0.0732388228762382,0.07297631813474631,0.07205755153952469,0.07048252309057332,0.07087628020281116,0.07035127071982737,0.07048252309057332,0.06943250412460575,0.06811998041714629,0.06825123278789223,0.06641369959744899,0.0678574756756544,0.06877624227087602,0.0693012517538598,0.06693870908043277,0.06641369959744899,0.06772622330490845,0.06720121382192466,0.06667620433894088,0.0678574756756544,0.06943250412460575,0.06995751360758953,0.07008876597833548,0.07087628020281116,0.07140128968579496,0.0732388228762382,0.07140128968579496,0.07284506576400036,0.07271381339325442,0.07205755153952469,0.07258256102250847,0.07022001834908143,0.06943250412460575,0.06877624227087602,0.06916999938311386,0.0678574756756544,0.06864498990013007,0.06969500886609764,0.07166379442728685,0.07100753257355712,0.07022001834908143,0.06969500886609764,0.07192629916877874,0.07140128968579496,0.07363257998847604,0.07402633710071388,0.07337007524698415,0.07337007524698415,0.0715325420565409,0.07245130865176252,0.07192629916877874,0.07192629916877874,0.0693012517538598,0.06969500886609764,0.06720121382192466,0.06680745670968682,0.06851373752938412,0.06680745670968682,0.06982626123684359,0.06890749464162196,0.06825123278789223,0.07022001834908143,0.06969500886609764,0.06943250412460575,0.06982626123684359,0.06916999938311386,0.06838248515863818,0.06772622330490845,0.06352614744103816,0.06431366166551383,0.06405115692402194,0.06378865218253005,0.06549493300222735,0.06838248515863818,0.06851373752938412,0.06982626123684359,0.06798872804640034,0.0693012517538598,0.07337007524698415,0.07533886080817334,0.07638887977414092,0.07770140348160039,0.07940768430129769,0.0788826748183139,0.07809516059383823,0.0771763939986166,0.07730764636936255,0.07638887977414092,0.0752076084374274,0.07271381339325442,0.07481385132518956,0.07258256102250847,0.07205755153952469,0.06995751360758953,0.07192629916877874,0.07205755153952469,0.07310757050549226,0.0735013276177301,0.07245130865176252,0.07363257998847604,0.07035127071982737,0.07113878494430306,0.07022001834908143,0.07087628020281116,0.07074502783206521,0.07140128968579496,0.07284506576400036,0.0735013276177301,0.07625762740339498,0.07612637503264903,0.07757015111085444,0.07940768430129769,0.0791451795598058,0.08019519852577338,0.07927643193055174,0.07875142244756796,0.0771763939986166,0.07586387029115714,0.07245130865176252,0.07061377546131926,0.0715325420565409,0.06943250412460575,0.07127003731504901,0.0693012517538598,0.0695637564953517,0.06811998041714629,0.0678574756756544,0.06746371856341656,0.06969500886609764,0.07035127071982737,0.06969500886609764,0.06969500886609764,0.06825123278789223,0.0695637564953517,0.06851373752938412,0.07074502783206521,0.07297631813474631,0.07376383235922199,0.07297631813474631,0.07363257998847604,0.0732388228762382,0.0715325420565409,0.07087628020281116,0.06995751360758953,0.07140128968579496,0.07087628020281116,0.07008876597833548,0.0715325420565409,0.07218880391027063,0.07192629916877874,0.07140128968579496,0.07297631813474631,0.07415758947145983,0.07468259895444361,0.07455134658369766,0.0749451036959355,0.0732388228762382,0.07284506576400036,0.07140128968579496,0.07258256102250847,0.07258256102250847,0.07455134658369766,0.07468259895444361,0.07455134658369766,0.07481385132518956,0.07415758947145983,0.07468259895444361,0.07625762740339498,0.0788826748183139,0.0771763939986166,0.0774388987401085,0.07665138451563282,0.07796390822309228,0.07822641296458417,0.07848891770607606,0.07980144141353553,0.08242648882845446,0.08321400305293014,0.0850515362433734,0.08820159314127611,0.0966017448690167,0.11038324379734109,0.12390223798417359,0.1379462416539899,0.14805267420142776,0.16078415416378458,0.17115309145271437,0.17824071947299547,0.1875596377959577,0.1974035656019037,0.20488495073442264,0.20357242702696318,0.20094737961204423,0.19897859405085505,0.20317866991472533,0.20225990331950372,0.20370367939770911,0.20632872681262807,0.20711624103710374,0.20724749340784968,0.20239115569024965,0.20383493176845507,0.203966184139201,0.20225990331950372,0.1985848369386172,0.1971410608604118,0.19595978952369827,0.19582853715295231,0.19700980848966584,0.1963535466359361,0.19910984642160098,0.19648479900668206,0.1971410608604118,0.19569728478220638,0.19346599447952528,0.196616051377428,0.19412225633325503,0.1932034897380334,0.18782214253744958,0.18572210460551444,0.18860965676192526,0.19005343284013068,0.19031593758162257,0.19412225633325503,0.1954347800407145,0.19451601344549285,0.19595978952369827,0.19924109879234694,0.20186614620726587,0.20225990331950372,0.1983223321971253,0.19451601344549285,0.19175971365982797,0.19084094706460636,0.19254722788430367,0.1904471899523685,0.19175971365982797,0.18887216150341715,0.18545959986402255,0.18847840439117933,0.18834715202043337,0.19280973262579557,0.19399100396250907,0.1963535466359361,0.19897859405085505,0.19910984642160098,0.20160364146577398,0.20173489383651994,0.20737874577859564,0.20737874577859564,0.2059349697003902,0.20514745547591454,0.20632872681262807,0.2081662600030713,0.20383493176845507,0.20527870784666047,0.2008161272412983,0.2005536224998064,0.19622229426519017,0.1949097705577307,0.1960910418944442,0.19399100396250907,0.19333474210877935,0.18992218046938472,0.1897909280986388,0.18860965676192526,0.19215347077206582,0.19136595654759014,0.19333474210877935,0.1929409849965415,0.1949097705577307,0.19753481797264963,0.19779732271414152,0.1963535466359361,0.1976660703433956,0.1976660703433956,0.1951722752992226,0.1960910418944442,0.19569728478220638,0.19425350870400096,0.19215347077206582,0.19307223736728746,0.19477851818698474,0.1983223321971253,0.1985848369386172,0.19700980848966584,0.19700980848966584,0.1980598274556334,0.19910984642160098,0.20147238909502804,0.20147238909502804,0.1985848369386172,0.19648479900668206,0.19674730374817395,0.196616051377428,0.19674730374817395,0.19530352766996853,0.19385975159176314,0.18913466624490904,0.1890034138741631,0.19162846128908204,0.19254722788430367,0.19333474210877935,0.19175971365982797,0.19136595654759014,0.19136595654759014,0.19399100396250907,0.1949097705577307,0.1988473416801091,0.1983223321971253,0.19727231323115774,0.19674730374817395,0.1974035656019037,0.19989736064607666,0.20120988435353612,0.20317866991472533,0.2030474175439794,0.20173489383651994,0.20488495073442264,0.20632872681262807,0.20685373629561185,0.20606622207113617,0.20134113672428208,0.2005536224998064,0.19963485590458477,0.20186614620726587,0.20239115569024965,0.20370367939770911,0.20120988435353612,0.2008161272412983,0.1971410608604118,0.1971410608604118,0.19989736064607666,0.19950360353383884,0.19937235116309288,0.19753481797264963,0.1971410608604118,0.1954347800407145,0.19425350870400096,0.19910984642160098,0.20317866991472533,0.2067224839248659,0.20947878371053077,0.2084287647445632,0.21052880267649834,0.21105381215948213,0.20737874577859564,0.2096100360812767,0.21039755030575238,0.2044911936221848,0.20357242702696318,0.19989736064607666,0.1985848369386172,0.20147238909502804,0.2030474175439794,0.20488495073442264,0.20527870784666047,0.2067224839248659,0.20934753133978481,0.21171007401321187,0.21446637379887673,0.21892895440423893,0.22050398285319028,0.22050398285319028,0.2174851783260335,0.2177476830675254,0.22286652552661732,0.2219477589313957,0.22050398285319028,0.21787893543827136,0.21276009297917944,0.21328510246216323,0.21341635483290916,0.21577889750633622,0.21814144017976325,0.21761643069677947,0.2168289164723038,0.21787893543827136,0.21879770203349297,0.22155400181915785,0.22496656345855248,0.22207901130214164,0.22142274944841192,0.2168289164723038,0.2174851783260335,0.21879770203349297,0.2222102636728876,0.22391654449258488,0.22431030160482274,0.22772286324421734,0.22916663932242276,0.2332354628155471,0.23284170570330925,0.2332354628155471,0.23586051023046603,0.2391418194991147,0.2369105291964336,0.2371730339379255,0.24032309083582823,0.23651677208419578,0.23533550074748225,0.23612301497195792,0.23848555764538498,0.24268563350925526,0.2411106050603039,0.24071684794806605,0.23979808135284444,0.24189811928477958,0.24032309083582823,0.2411106050603039,0.24189811928477958,0.23874806238687687,0.24006058609433634,0.23507299600599035,0.23087292014212007,0.22299777789736328,0.22352278738034706,0.2202414781116984,0.22234151604363353,0.22260402078512542,0.21958521625796865,0.21669766410155783,0.21144756927171998,0.21223508349619566,0.21249758823768755,0.21630390698932,0.21341635483290916,0.2111850645302281,0.20685373629561185,0.2042286888806929,0.20737874577859564,0.20580371732964425,0.20317866991472533,0.19963485590458477,0.19779732271414152,0.19228472314281178,0.19110345180609825,0.18992218046938472,0.18519709512253066,0.18519709512253066,0.1833595619320874,0.18296580481984956,0.18047200977567657,0.17994700029269278,0.18020950503418467,0.17955324318045496,0.1762719339118063,0.1732531293846495,0.17430314835061708,0.17259686753091977,0.1683967916670495,0.16642800610586028,0.16774052981331974,0.1659029966228765,0.16288419209571972,0.16419671580317918,0.1681342869255576,0.16721552033033596,0.16459047291541704,0.16354045394944947,0.16301544446646568,0.16222793024199,0.16327794920795757,0.1631466968372116,0.16577174425213057,0.1636717063201954,0.16183417312975215,0.16380295869094136,0.1653779871398927,0.1627529397249738,0.1636717063201954,0.16406546343243325,0.1599966399393089,0.15920912571483323,0.15697783541215213,0.15540280696320077,0.15080897398709264,0.14765891708918993,0.1442463554497953,0.1408337938104007,0.1332211563071358,0.12206470479373034,0.11222077698778435,0.10093307310363293,0.08898910736575179,0.07835766533533012,0.06995751360758953,0.06011358580164354,0.04974464851271376,0.04265702049243265,0.035831897213643424,0.0346506258769299,0.03530688773065963,0.03504438298916774,0.034125616393946116,0.0346506258769299,0.034125616393946116,0.0326818403157407,0.0326818403157407,0.03163182134977313,0.030975559496043397,0.03228808320350286,0.03176307372051908,0.03176307372051908,0.03163182134977313,0.03202557846201097,0.03176307372051908,0.03241933557424881,0.03320684979872449,0.033863111652454224,0.034125616393946116,0.0326818403157407,0.03320684979872449,0.032550587944994755,0.03281309268648665,0.0326818403157407,0.0326818403157407,0.03163182134977313,0.03136931660828124,0.032156830832756916,0.03241933557424881,0.032944345057232594,0.032550587944994755,0.03333810216947044,0.032944345057232594,0.032550587944994755,0.03228808320350286,0.0326818403157407,0.032550587944994755,0.032944345057232594,0.03320684979872449,0.03202557846201097,0.03123806423753529,0.03136931660828124,0.03163182134977313,0.03123806423753529,0.029794288159329878,0.02966303578858393,0.030188045271567716,0.028350512081124466,0.029925540530075824,0.03123806423753529,0.03123806423753529,0.03058180238380556,0.031500568979027185,0.03176307372051908,0.03241933557424881,0.03373185928170828,0.03360060691096233,0.034125616393946116,0.03228808320350286,0.03228808320350286,0.03399436402320017,0.034125616393946116,0.034519373506183955,0.03425686876469206,0.034913130618421793,0.03320684979872449,0.03333810216947044,0.0326818403157407,0.03307559742797854,0.031894326091265024,0.03058180238380556,0.030188045271567716,0.03005679290082177,0.029794288159329878,0.029794288159329878,0.030450550013059612,0.02966303578858393,0.03058180238380556,0.029531783417837985,0.030450550013059612,0.029925540530075824,0.030713054754551505,0.030188045271567716,0.029794288159329878,0.028744269193362305,0.02821925971037852,0.027956754968886624,0.02769425022739473,0.02821925971037852,0.02743174548590284,0.027562997856648785,0.026906736002919054,0.027562997856648785,0.028350512081124466,0.02966303578858393,0.03005679290082177,0.029531783417837985,0.02966303578858393,0.02940053104709204,0.03058180238380556,0.03123806423753529,0.03176307372051908,0.031106811866789343,0.03084430712529745,0.029138026305600143,0.029006773934854197,0.03005679290082177,0.030319297642313663,0.03084430712529745,0.03005679290082177,0.03005679290082177,0.030188045271567716,0.030713054754551505,0.030713054754551505,0.03202557846201097,0.03228808320350286,0.03084430712529745,0.03058180238380556,0.029925540530075824,0.03058180238380556,0.030319297642313663,0.029006773934854197,0.028481764451870412,0.027825502598140678,0.027825502598140678,0.027300493115156893,0.02821925971037852,0.02861301682261636,0.02940053104709204,0.029531783417837985,0.029138026305600143,0.029531783417837985,0.02966303578858393,0.03005679290082177,0.029006773934854197,0.029531783417837985,0.02940053104709204,0.027956754968886624,0.028088007339632574,0.027300493115156893,0.027037988373665,0.027300493115156893,0.02664423126142716,0.026906736002919054,0.029138026305600143,0.028744269193362305,0.029925540530075824,0.031500568979027185,0.030450550013059612,0.030975559496043397,0.031894326091265024,0.03228808320350286,0.0326818403157407,0.032550587944994755,0.030450550013059612,0.030975559496043397,0.029531783417837985,0.029006773934854197,0.02887552156410825,0.028350512081124466,0.027956754968886624,0.027562997856648785,0.02861301682261636,0.028088007339632574,0.02887552156410825,0.02821925971037852,0.028088007339632574,0.028350512081124466,0.028481764451870412,0.028744269193362305,0.02861301682261636,0.029138026305600143,0.02769425022739473,0.027169240744410947,0.026512978890681212,0.026775483632173105,0.027037988373665,0.02625047414918932,0.026906736002919054,0.02664423126142716,0.026775483632173105,0.025331707553967693,0.026381726519935266,0.02821925971037852,0.029269278676346093,0.028481764451870412,0.028350512081124466,0.029138026305600143,0.029138026305600143,0.02966303578858393,0.029269278676346093,0.030713054754551505,0.030188045271567716,0.029006773934854197,0.029269278676346093,0.030975559496043397,0.031894326091265024,0.03084430712529745,0.030975559496043397,0.029794288159329878,0.030319297642313663,0.03005679290082177,0.030713054754551505,0.030713054754551505,0.029794288159329878,0.029269278676346093,0.029138026305600143,0.029531783417837985,0.02940053104709204,0.030713054754551505,0.030975559496043397,0.03084430712529745,0.029794288159329878,0.02966303578858393,0.02887552156410825,0.028088007339632574,0.02769425022739473,0.026775483632173105,0.026119221778443374,0.02585671703695148,0.024150436217254174,0.02428168858800012,0.02362542673427039,0.024412940958746066,0.025200455183221747,0.02480669807098391,0.024150436217254174,0.02428168858800012,0.026381726519935266,0.025594212295459585,0.02769425022739473,0.02743174548590284,0.02821925971037852,0.02821925971037852,0.027825502598140678,0.029138026305600143,0.030188045271567716,0.030713054754551505,0.029138026305600143,0.02887552156410825,0.028088007339632574,0.02769425022739473,0.027825502598140678,0.028744269193362305,0.029269278676346093,0.029138026305600143,0.028744269193362305,0.027825502598140678,0.02821925971037852,0.02940053104709204,0.029138026305600143,0.029925540530075824,0.029269278676346093,0.02769425022739473,0.026775483632173105,0.026119221778443374,0.02664423126142716,0.027562997856648785,0.027037988373665,0.026906736002919054,0.027169240744410947,0.02585671703695148,0.026906736002919054,0.026906736002919054,0.028350512081124466,0.028481764451870412,0.028088007339632574,0.029006773934854197,0.02940053104709204,0.02887552156410825,0.029138026305600143,0.030450550013059612,0.027956754968886624,0.029794288159329878,0.029006773934854197,0.029006773934854197,0.02887552156410825,0.027825502598140678,0.02887552156410825,0.02821925971037852,0.028088007339632574,0.028481764451870412,0.030319297642313663,0.027956754968886624,0.02821925971037852,0.028350512081124466,0.028088007339632574,0.02861301682261636,0.029006773934854197,0.029794288159329878,0.030450550013059612,0.030319297642313663,0.03058180238380556,0.03136931660828124,0.031500568979027185,0.030188045271567716,0.030319297642313663,0.03136931660828124,0.029269278676346093,0.029269278676346093,0.02887552156410825,0.028088007339632574,0.028088007339632574,0.02887552156410825,0.027825502598140678,0.028088007339632574,0.027956754968886624,0.025987969407697428,0.026381726519935266,0.02664423126142716,0.026512978890681212,0.026775483632173105,0.026775483632173105,0.02572546466620553,0.02585671703695148,0.027169240744410947,0.027562997856648785,0.028481764451870412,0.029006773934854197,0.029006773934854197,0.029531783417837985,0.02861301682261636,0.027825502598140678,0.027562997856648785,0.028744269193362305,0.028744269193362305,0.02966303578858393,0.030450550013059612,0.030450550013059612,0.030713054754551505,0.030319297642313663,0.03123806423753529,0.031500568979027185,0.032156830832756916,0.03163182134977313,0.03136931660828124,0.030975559496043397,0.03058180238380556,0.030450550013059612,0.02940053104709204,0.02887552156410825,0.028481764451870412,0.02940053104709204,0.028744269193362305,0.028744269193362305,0.028350512081124466,0.028088007339632574,0.027562997856648785,0.027825502598140678,0.028350512081124466,0.027956754968886624,0.028744269193362305,0.02861301682261636,0.029794288159329878,0.029269278676346093,0.03123806423753529,0.031106811866789343,0.032156830832756916,0.03241933557424881,0.032550587944994755,0.03360060691096233,0.032550587944994755,0.031894326091265024,0.03163182134977313,0.03228808320350286,0.031894326091265024,0.03136931660828124,0.030975559496043397,0.030975559496043397,0.03163182134977313,0.03136931660828124,0.033469354540216385,0.03360060691096233,0.033863111652454224,0.033469354540216385,0.03228808320350286,0.03176307372051908,0.03176307372051908,0.03163182134977313,0.03176307372051908,0.031106811866789343,0.029269278676346093,0.029794288159329878,0.029138026305600143,0.02940053104709204,0.029925540530075824,0.030188045271567716,0.02940053104709204,0.029006773934854197,0.027825502598140678,0.028481764451870412,0.03005679290082177,0.02940053104709204,0.029531783417837985,0.030188045271567716,0.02940053104709204,0.029925540530075824,0.030188045271567716,0.030450550013059612,0.030319297642313663,0.031500568979027185,0.029794288159329878,0.030319297642313663,0.03136931660828124,0.031106811866789343,0.03228808320350286,0.032156830832756916,0.03176307372051908,0.03176307372051908,0.032156830832756916,0.03123806423753529,0.032156830832756916,0.03084430712529745,0.03005679290082177,0.03123806423753529,0.03005679290082177,0.03058180238380556,0.03058180238380556,0.031894326091265024,0.032550587944994755,0.032944345057232594,0.03281309268648665,0.034519373506183955,0.0346506258769299,0.03530688773065963,0.0366194114381191,0.036488159067373155,0.03688191617961099,0.036094401955135316,0.035831897213643424,0.0346506258769299,0.034913130618421793,0.03478187824767585,0.035831897213643424,0.034125616393946116,0.03425686876469206,0.034125616393946116,0.034913130618421793,0.034125616393946116,0.03373185928170828,0.03478187824767585,0.03373185928170828,0.032550587944994755,0.031500568979027185,0.03123806423753529,0.03005679290082177,0.030450550013059612,0.02966303578858393,0.02966303578858393,0.03005679290082177,0.030188045271567716,0.03058180238380556,0.03228808320350286,0.03176307372051908,0.033863111652454224,0.033863111652454224,0.03281309268648665,0.032550587944994755,0.03202557846201097,0.03202557846201097,0.031500568979027185,0.03163182134977313,0.03123806423753529,0.03123806423753529,0.02887552156410825,0.028481764451870412,0.030188045271567716,0.030450550013059612,0.03058180238380556,0.03123806423753529,0.03084430712529745,0.029531783417837985,0.02861301682261636,0.02769425022739473,0.02861301682261636,0.029138026305600143,0.028088007339632574,0.027956754968886624,0.028088007339632574,0.02887552156410825,0.031106811866789343,0.03176307372051908,0.03202557846201097,0.03333810216947044,0.03478187824767585,0.03478187824767585,0.035175635359913686,0.03701316855035694,0.0385881969993083,0.037538178033340724,0.03438812113543801,0.035175635359913686,0.03543814010140558,0.03701316855035694,0.035175635359913686,0.03530688773065963,0.034913130618421793,0.03360060691096233,0.0326818403157407,0.03176307372051908,0.03307559742797854,0.03320684979872449,0.03438812113543801,0.032550587944994755,0.033863111652454224,0.03373185928170828,0.03399436402320017,0.033863111652454224,0.03307559742797854,0.035175635359913686,0.03556939247215153,0.034913130618421793,0.03360060691096233,0.03360060691096233,0.031894326091265024,0.03281309268648665,0.032550587944994755,0.03333810216947044,0.03333810216947044,0.03202557846201097,0.03202557846201097,0.03307559742797854,0.03360060691096233,0.03438812113543801,0.034125616393946116,0.03320684979872449,0.03425686876469206,0.03123806423753529,0.03202557846201097,0.03176307372051908,0.031106811866789343,0.029794288159329878,0.029006773934854197,0.029006773934854197,0.029794288159329878,0.029925540530075824,0.029269278676346093,0.030713054754551505,0.030450550013059612,0.03123806423753529,0.03084430712529745,0.03228808320350286,0.03241933557424881,0.03163182134977313,0.03202557846201097,0.03202557846201097,0.032550587944994755,0.0326818403157407,0.033469354540216385,0.03438812113543801,0.03556939247215153,0.0346506258769299,0.03530688773065963,0.035175635359913686,0.03543814010140558,0.03701316855035694,0.03543814010140558,0.03596314958438937,0.036094401955135316,0.03438812113543801,0.0346506258769299,0.03727567329184883,0.03793193514557857,0.0385881969993083,0.03727567329184883,0.03766943040408667,0.03832569225781641,0.037538178033340724,0.036488159067373155,0.03688191617961099,0.03543814010140558,0.033863111652454224,0.033469354540216385,0.03333810216947044,0.032944345057232594,0.03084430712529745,0.030450550013059612,0.03228808320350286,0.03202557846201097,0.03136931660828124,0.03202557846201097,0.030450550013059612,0.030188045271567716,0.03084430712529745,0.0326818403157407,0.032944345057232594,0.03333810216947044,0.03228808320350286,0.034125616393946116,0.03123806423753529,0.027956754968886624,0.025594212295459585,0.02191914591457308,0.0)
m <- c(0.014161461256816813,0.016092569610019106,0.017508715735700786,0.019826045759543536,0.02175715411274583,0.021113451328345065,0.020083526873303843,0.019826045759543536,0.020598489100824454,0.021370932442105372,0.021499672998985524,0.02124219188522522,0.02214337578338629,0.02124219188522522,0.02175715411274583,0.022400856897146593,0.02407448413658858,0.023817003022828277,0.022787078567787052,0.02227211634026644,0.021885894669625983,0.022014635226506134,0.0226583380109069,0.023302040795307663,0.024331965250348888,0.023688262465948122,0.02355952190906797,0.02355952190906797,0.024203224693468733,0.02407448413658858,0.02574811137603057,0.026906776387951945,0.02677803583107179,0.0272929980585924,0.02677803583107179,0.027421738615472556,0.02716425750171225,0.02767921972923286,0.027807960286113015,0.02767921972923286,0.026005592489790876,0.02626307360355118,0.025619370819150417,0.02587685193291072,0.02536188970539011,0.02497566803474965,0.02458944636410919,0.024331965250348888,0.023302040795307663,0.023817003022828277,0.025233149148509958,0.02394574357970843,0.024718186920989347,0.02446070580722904,0.02446070580722904,0.02304455968154736,0.022787078567787052,0.02317330023842751,0.0226583380109069,0.022400856897146593,0.022014635226506134,0.02317330023842751,0.022915819124667204,0.022915819124667204,0.024203224693468733,0.02394574357970843,0.02626307360355118,0.02574811137603057,0.027807960286113015,0.027807960286113015,0.029095365854914543,0.029996549753075613,0.029352846968674847,0.029481587525555,0.028966625298034388,0.029867809196195458,0.02806544139987332,0.028709144184274085,0.02858040362739393,0.028966625298034388,0.02716425750171225,0.025619370819150417,0.02549063026227026,0.026005592489790876,0.026520554717311486,0.02806544139987332,0.028322922513633626,0.02806544139987332,0.027421738615472556,0.02767921972923286,0.02858040362739393,0.028966625298034388,0.028966625298034388,0.029996549753075613,0.028709144184274085,0.02858040362739393,0.029352846968674847,0.030511511980596224,0.03179891754939775,0.031412695878757294,0.03295758256131913,0.03334380423195959,0.03450246924388096,0.033472544788839736,0.034244988130120654,0.03450246924388096,0.03514617202828173,0.035661134255802335,0.036304837040203104,0.036304837040203104,0.033472544788839736,0.034244988130120654,0.035661134255802335,0.036691058710843556,0.03578987481268249,0.03540365314204203,0.03437372868700081,0.03360128534571989,0.03270010144755882,0.03373002590260005,0.03488869091452142,0.034244988130120654,0.03192765810627791,0.030897733651236683,0.03192765810627791,0.031155214764996986,0.032442620333798515,0.03257136089067867,0.032828842004438974,0.03218513922003821,0.03295758256131913,0.03218513922003821,0.03463120980076111,0.03656231815396341,0.03656231815396341,0.03694853982460387,0.036304837040203104,0.036691058710843556,0.037334761495244326,0.03862216706404585,0.03900838873468631,0.0406820159741283,0.0406820159741283,0.03965209151908707,0.04029579430348784,0.03990957263284738,0.04081075653100845,0.04042453486036799,0.039523350962206924,0.039523350962206924,0.039523350962206924,0.04003831318972753,0.04042453486036799,0.040553275417248145,0.0406820159741283,0.04171194042916952,0.04106823764476875,0.04184068098604967,0.04248438377045044,0.04261312432733059,0.042741864884210744,0.04209816209980998,0.04184068098604967,0.04119697820164891,0.04029579430348784,0.04184068098604967,0.04184068098604967,0.040939497087888604,0.04042453486036799,0.04132571875852906,0.04171194042916952,0.04158319987228937,0.04016705374660769,0.04003831318972753,0.04222690265669013,0.04132571875852906,0.04184068098604967,0.04248438377045044,0.0431280865548512,0.04299934599797105,0.04222690265669013,0.04351430822549166,0.045445416578693956,0.04608911936309472,0.04570289769245426,0.04570289769245426,0.045960378806214564,0.04647534103373518,0.045960378806214564,0.044158011009892424,0.04480171379429319,0.04402927045301227,0.043385567668611506,0.0428706054410909,0.042355643213570285,0.0428706054410909,0.04299934599797105,0.04248438377045044,0.04364304878237181,0.04390052989613212,0.04402927045301227,0.04428675156677258,0.045445416578693956,0.0475052654887764,0.04686156270437564,0.047634006045656554,0.048663930500697776,0.048406449386937465,0.04789148715941686,0.04917889272821838,0.050208817183259605,0.05033755774013976,0.050080076626379456,0.05033755774013976,0.050208817183259605,0.049436373841978694,0.047247784375016096,0.04814896827317716,0.048020227716297006,0.04917889272821838,0.04956511439885884,0.048020227716297006,0.047634006045656554,0.04647534103373518,0.047247784375016096,0.049693854955739,0.05123874163830083,0.05111000108142068,0.04956511439885884,0.04853518994381762,0.04982259551261915,0.05162496330894129,0.0521399255364619,0.05304110943462297,0.053298590548383276,0.05304110943462297,0.05162496330894129,0.0523974066502222,0.05703206669790771,0.05703206669790771,0.05522969890158557,0.05561592057222603,0.05613088279974664,0.05522969890158557,0.05522969890158557,0.0543285150034245,0.05703206669790771,0.05638836391350695,0.05471473667406496,0.05561592057222603,0.05381355277590389,0.05445725556030465,0.0543285150034245,0.05522969890158557,0.05600214224286649,0.055100958344705415,0.05394229333278404,0.053684812219023735,0.05342733110526343,0.053298590548383276,0.05535843945846572,0.05535843945846572,0.05484347723094511,0.05355607166214358,0.0543285150034245,0.055487180015345874,0.055487180015345874,0.0567745855841474,0.057289547811668014,0.056517104470387096,0.05613088279974664,0.055487180015345874,0.056517104470387096,0.05703206669790771,0.05497221778782526,0.052654887763982514,0.05316984999150312,0.05342733110526343,0.053298590548383276,0.0543285150034245,0.052268666093342055,0.050466298297019915,0.050208817183259605,0.05201118497958175,0.05497221778782526,0.05522969890158557,0.055487180015345874,0.055487180015345874,0.05484347723094511,0.05445725556030465,0.05561592057222603,0.05716080725478786,0.05625962335662679,0.05535843945846572,0.05316984999150312,0.05471473667406496,0.05419977444654435,0.055100958344705415,0.055100958344705415,0.05561592057222603,0.05741828836854817,0.05947813727863061,0.05960687783551077,0.05960687783551077,0.060121840063031375,0.059993099506151226,0.05986435894927107,0.05922065616487031,0.059735618392390916,0.05934939672175046,0.060765542847432144,0.05986435894927107,0.06140924563183291,0.06128050507495275,0.06231042952999397,0.061795467302473366,0.06166672674559321,0.061151764518072596,0.06256791064375428,0.06372657565567566,0.06256791064375428,0.06256791064375428,0.061924207859353514,0.06205294841623367,0.06282539175751459,0.06514272178135734,0.06604390567951841,0.0652714623382375,0.06411279732631611,0.06411279732631611,0.0635978350987955,0.0635978350987955,0.06231042952999397,0.06140924563183291,0.059735618392390916,0.05922065616487031,0.06025058061991153,0.061795467302473366,0.06128050507495275,0.06269665120063443,0.06424153788319627,0.06424153788319627,0.0652714623382375,0.06668760846391918,0.06784627347584055,0.06630138679327871,0.06449901899695658,0.0633403539850352,0.06565768400887795,0.06501398122447719,0.06462775955383672,0.06346909454191535,0.0630828728712749,0.06475650011071687,0.06514272178135734,0.06488524066759703,0.06424153788319627,0.06449901899695658,0.06591516512263826,0.06475650011071687,0.06346909454191535,0.06552894345199779,0.06604390567951841,0.06449901899695658,0.06437027844007642,0.0652714623382375,0.06552894345199779,0.06565768400887795,0.0630828728712749,0.06437027844007642,0.06604390567951841,0.06591516512263826,0.06655886790703902,0.06462775955383672,0.06385531621255582,0.06462775955383672,0.06565768400887795,0.06630138679327871,0.06604390567951841,0.06514272178135734,0.06462775955383672,0.06424153788319627,0.06282539175751459,0.06475650011071687,0.06475650011071687,0.06462775955383672,0.06385531621255582,0.06488524066759703,0.06540020289511764,0.06385531621255582,0.06437027844007642,0.0635978350987955,0.06411279732631611,0.06385531621255582,0.06424153788319627,0.06424153788319627,0.06424153788319627,0.06269665120063443,0.061924207859353514,0.06372657565567566,0.06282539175751459,0.061795467302473366,0.06243917008687413,0.0635978350987955,0.06166672674559321,0.06166672674559321,0.06166672674559321,0.06231042952999397,0.06424153788319627,0.06437027844007642,0.0635978350987955,0.06630138679327871,0.06604390567951841,0.06501398122447719,0.06758879236208024,0.0674600518052001,0.06810375458960086,0.0679750140327207,0.06630138679327871,0.06372657565567566,0.06385531621255582,0.06346909454191535,0.06256791064375428,0.06398405676943596,0.06295413231439474,0.06346909454191535,0.06411279732631611,0.06205294841623367,0.06205294841623367,0.06282539175751459,0.0652714623382375,0.06424153788319627,0.0657864245657581,0.06475650011071687,0.06488524066759703,0.06449901899695658,0.06372657565567566,0.06643012735015887,0.06784627347584055,0.06990612238592299,0.06720257069143978,0.06733131124831994,0.06655886790703902,0.06604390567951841,0.06681634902079932,0.06604390567951841,0.06681634902079932,0.0652714623382375,0.06372657565567566,0.06385531621255582,0.06488524066759703,0.06449901899695658,0.06591516512263826,0.0679750140327207,0.0679750140327207,0.07132226851160467,0.07351085797856727,0.07492700410424895,0.07775929635561231,0.07595692855929018,0.07492700410424895,0.07634315022993063,0.07492700410424895,0.07402582020608789,0.07338211742168711,0.07106478739784437,0.06913367904464207,0.07003486294280314,0.06720257069143978,0.06900493848776192,0.06926241960152223,0.0701636034996833,0.07029234405656345,0.06810375458960086,0.06900493848776192,0.06758879236208024,0.06758879236208024,0.06668760846391918,0.06720257069143978,0.06810375458960086,0.06900493848776192,0.06823249514648101,0.06771753291896039,0.07067856572720391,0.06951990071528254,0.07119352795472451,0.0728671551941665,0.07209471185288559,0.0728671551941665,0.0701636034996833,0.07119352795472451,0.0701636034996833,0.07248093352352605,0.07106478739784437,0.07312463630792682,0.07299589575104666,0.07312463630792682,0.07492700410424895,0.0750557446611291,0.07866048025377338,0.07840299914001309,0.0769868530143314,0.07685811245745125,0.07814551802625277,0.0772443341280917,0.07621440967305049,0.0745407824336085,0.07299589575104666,0.0747982635473688,0.07170849018224514,0.07209471185288559,0.0750557446611291,0.07531322577488941,0.07441204187672834,0.0747982635473688,0.07544196633176957,0.07582818800241002,0.07544196633176957,0.07363959853544742,0.0747982635473688,0.07492700410424895,0.07260967408040621,0.07080730628408406,0.07222345240976574,0.07299589575104666,0.07428330131984819,0.07351085797856727,0.07608566911617033,0.07544196633176957,0.07544196633176957,0.07376833909232758,0.0747982635473688,0.0747982635473688,0.07325337686480697,0.07209471185288559,0.0723521929666459,0.07363959853544742,0.07466952299048865,0.07363959853544742,0.07569944744552987,0.07840299914001309,0.0794329235950543,0.07930418303817414,0.08097781027761614,0.08200773473265736,0.08226521584641766,0.08368136197209934,0.08149277250513674,0.08471128642714057,0.08458254587026041,0.08290891863081842,0.08252269696017797,0.0813640319482566,0.07956166415193446,0.07904670192441385,0.07775929635561231,0.07634315022993063,0.07750181524185201,0.07582818800241002,0.07402582020608789,0.07531322577488941,0.07557070688864971,0.0767293719005711,0.07634315022993063,0.07531322577488941,0.07544196633176957,0.07647189078681078,0.07569944744552987,0.07466952299048865,0.07634315022993063,0.07595692855929018,0.07582818800241002,0.07557070688864971,0.07840299914001309,0.07904670192441385,0.07994788582257491,0.07866048025377338,0.08097781027761614,0.08406758364273981,0.08561247032530164,0.08471128642714057,0.08393884308585965,0.08883098424730546,0.0879298003491444,0.08754357867850393,0.08973216814546653,0.09307942262435051,0.09166327649866882,0.09127705482802836,0.08857350313354516,0.09166327649866882,0.09204949816930928,0.0906333520436276,0.08973216814546653,0.08998964925922684,0.0879298003491444,0.0835526214152192,0.08484002698402072,0.08406758364273981,0.08471128642714057,0.0816215130620169,0.08651365422346272,0.08934594647482608,0.09616919598947417,0.0999026721389986,0.10260622383348181,0.11316294949765435,0.12333345349118642,0.1371086930773628,0.14753667818465516,0.15938080941762922,0.169293832297401,0.1741859734588468,0.1798505579615735,0.18628758580558116,0.198775419822956,0.19967660372111706,0.20057778761927814,0.20083526873303842,0.20070652817615828,0.2012214904036789,0.19723053314039415,0.1995478631642369,0.2014789715174392,0.20379630154128195,0.20044904706239797,0.2039250420981621,0.2034100798706415,0.19774549536791478,0.2014789715174392,0.20469748543944302,0.20649985323576517,0.20701481546328576,0.208044739918327,0.20752977769080638,0.2085597021458476,0.2088171832596079,0.2088171832596079,0.21190695662473158,0.2077872588045667,0.20379630154128195,0.2066285937926453,0.2107482916128102,0.20920340493024836,0.20894592381648805,0.21383806497793387,0.21370932442105373,0.215640432774256,0.21718531945681785,0.2216912389476232,0.22349360674394533,0.2222062011751438,0.21911642781002014,0.21847272502561937,0.22181997950450336,0.2241373095283461,0.22619715843842855,0.2292869318035522,0.23353537018059725,0.23186174294115527,0.23585270020444,0.2419035063778072,0.24718186920989346,0.24898423700621558,0.2531039348263805,0.24615194475485222,0.24460705807229038,0.24383461473100948,0.2421609874915675,0.24563698252733163,0.2462806853117324,0.2419035063778072,0.23932869524020414,0.24228972804844764,0.24151728470716674,0.24679564753925298,0.24795431255117437,0.24396335528788962,0.24679564753925298,0.24473579862917055,0.24885549644933544,0.2494991992337362,0.25104408591629807,0.25284645371262016,0.2497566803474965,0.24756809088053391,0.24782557199429422,0.2516877887006988,0.2502716425750171,0.2541338592814217,0.24769683143741406,0.24988542090437665,0.2494991992337362,0.24563698252733163,0.24460705807229038,0.24499327974293086,0.24679564753925298,0.24679564753925298,0.24241846860532779,0.23881373301268352,0.24177476582092702,0.24113106303652626,0.23881373301268352,0.23726884633012169,0.2363676624319606,0.23572395964755985,0.23186174294115527,0.22812826679163084,0.22967315347419268,0.22799952623475067,0.224909752869627,0.22130501727698274,0.22362234730082547,0.22465227175586672,0.2273558234503499,0.22478101231274686,0.22568219621090793,0.22799952623475067,0.22825700734851098,0.22748456400723008,0.22748456400723008,0.2263258989953087,0.22130501727698274,0.21847272502561937,0.21808650335497892,0.21692783834305754,0.21795776279809875,0.21448176776233463,0.21473924887609494,0.21255065940913234,0.20920340493024836,0.2077872588045667,0.20946088604400867,0.21010458882840943,0.20534118822384378,0.20263763652936057,0.19851793870919568,0.19890416037983613,0.19452698144591093,0.19529942478719187,0.19645808979911322,0.195428165344072,0.19594312757159263,0.19620060868535294,0.19697305202663384,0.19890416037983613,0.1990329009367163,0.19967660372111706,0.19800297648167506,0.1995478631642369,0.19581438701471246,0.1951706842303117,0.19336831643398958,0.19169468919454757,0.1902785430688659,0.18706002914686207,0.1834552935542178,0.17856315239277198,0.17959307684781323,0.1766320440395697,0.17753322793773077,0.1776619684946109,0.1780481901652514,0.17650330348268956,0.17701826571021015,0.18113796353037503,0.18229662854229642,0.18332655299733763,0.1831978124404575,0.18487143967989947,0.18706002914686207,0.18603010469182085,0.18332655299733763,0.1831978124404575,0.18487143967989947,0.1810092229734949,0.18409899633861856,0.18306907188357735,0.18216788798541628,0.1810092229734949,0.17869189294965215,0.18165292575789566,0.18255410965605673,0.18306907188357735,0.18139544464413535,0.18010803907533382,0.17843441183589184,0.17650330348268956,0.17624582236892924,0.17791944960837122,0.17598834125516893,0.17354227067444603,0.17328478956068571,0.17457219512948724,0.17276982733316512,0.17482967624324755,0.17508715735700786,0.17843441183589184,0.17920685517717275,0.1758596006982888,0.17598834125516893,0.1754733790276483,0.1747009356863674,0.17276982733316512,0.17688952515333,0.1747009356863674,0.17264108677628495,0.1708387189799628,0.1690363511836407,0.1690363511836407,0.16916509174052083,0.16916509174052083,0.16839264839923992,0.16671902115979792,0.16388672890843456,0.1664615400460376,0.16723398338731854,0.16890761062676052,0.1700662756386819,0.17161116232124374,0.17315604900380557,0.17161116232124374,0.16968005396804145,0.17238360566252464,0.1719973839918842,0.1690363511836407,0.16877887006988038,0.16955131341116128,0.16800642672859945,0.16800642672859945,0.16478791280659563,0.16723398338731854,0.16813516728547961,0.16697650227355823,0.1671052428304384,0.16942257285428114,0.16916509174052083,0.16852138895612007,0.17019501619556204,0.16993753508180176,0.17161116232124374,0.17096745953684298,0.17289856789004526,0.1708387189799628,0.17019501619556204,0.16697650227355823,0.16517413447723608,0.16414421002219487,0.16388672890843456,0.1602819933157903,0.1586083660763483,0.15770718217818722,0.15384496547178264,0.1515276354479399,0.1495965270947376,0.15281504101674143,0.15281504101674143,0.15217133823234066,0.1520425976754605,0.15242881934610097,0.15744970106442693,0.15719221995066662,0.15873710663322846,0.16041073387267044,0.15938080941762922,0.1586083660763483,0.1591233283038689,0.1569347388369063,0.15461740881306357,0.15435992769930326,0.14843786208281623,0.14637801317273377,0.14393194259201086,0.14393194259201086,0.14599179150209332,0.14457564537641163,0.14393194259201086,0.14586305094521318,0.14676423484337422,0.14805164041217578,0.14856660263969637,0.14946778653785744,0.15165637600482004,0.15165637600482004,0.15049771099289866,0.14895282431033682,0.14869534319657654,0.14869534319657654,0.14869534319657654,0.14753667818465516,0.15294378157362157,0.1537162249149025,0.15384496547178264,0.15577607382498493,0.15603355493874524,0.15719221995066662,0.15744970106442693,0.15873710663322846,0.15770718217818722,0.1569347388369063,0.15255755990298112,0.14856660263969637,0.14521934816081242,0.1422583153525689,0.13929728254432538,0.13646499029296202,0.1247495996168681,0.1113605817013322,0.0999026721389986,0.08857350313354516,0.07569944744552987,0.06836123570336115,0.05883443449422985,0.04892141161445808,0.03978083207596723,0.030382771423716072,0.029867809196195458,0.030125290309955765,0.030382771423716072,0.030382771423716072,0.031026474208116835,0.030640252537476376,0.030768993094356527,0.029739068639315306,0.029481587525555,0.030511511980596224,0.030382771423716072,0.029996549753075613,0.029996549753075613,0.030511511980596224,0.031026474208116835,0.031155214764996986,0.03128395532187714,0.03128395532187714,0.031026474208116835,0.029481587525555,0.030125290309955765,0.028966625298034388,0.028451663070513777,0.027550479172352708,0.028837884741154236,0.02806544139987332,0.027936700842993167,0.027807960286113015,0.028709144184274085,0.029610328082435154,0.028709144184274085,0.030125290309955765,0.029867809196195458,0.031155214764996986,0.029739068639315306,0.029481587525555,0.028709144184274085,0.028966625298034388,0.027421738615472556,0.02716425750171225,0.02626307360355118,0.026005592489790876,0.02549063026227026,0.02536188970539011,0.02458944636410919,0.0248469274778695,0.02626307360355118,0.02767921972923286,0.028322922513633626,0.028194181956753474,0.029224106411794695,0.029481587525555,0.030897733651236683,0.031026474208116835,0.032442620333798515,0.03270010144755882,0.03192765810627791,0.029867809196195458,0.031026474208116835,0.030511511980596224,0.031026474208116835,0.030897733651236683,0.030382771423716072,0.028966625298034388,0.027550479172352708,0.0272929980585924,0.026520554717311486,0.0272929980585924,0.026649295274191638,0.027421738615472556,0.027421738615472556,0.02677803583107179,0.027550479172352708,0.028322922513633626,0.029352846968674847,0.029224106411794695,0.030511511980596224,0.03179891754939775,0.03231387977691836,0.03257136089067867,0.03360128534571989,0.03334380423195959,0.03257136089067867,0.03231387977691836,0.031026474208116835,0.030125290309955765,0.029095365854914543,0.02767921972923286,0.02549063026227026,0.02574811137603057,0.025104408591629802,0.027035516944832097,0.02626307360355118,0.02574811137603057,0.02574811137603057,0.027421738615472556,0.027550479172352708,0.026906776387951945,0.028451663070513777,0.027550479172352708,0.026906776387951945,0.02639181416043133,0.026649295274191638,0.027936700842993167,0.02858040362739393,0.028322922513633626,0.028322922513633626,0.028837884741154236,0.028837884741154236,0.029867809196195458,0.029610328082435154,0.029095365854914543,0.029610328082435154,0.028966625298034388,0.028451663070513777,0.027550479172352708,0.027807960286113015,0.028194181956753474,0.028709144184274085,0.029224106411794695,0.028837884741154236,0.027936700842993167,0.027936700842993167,0.028194181956753474,0.029481587525555,0.030254030866835917,0.030897733651236683,0.030640252537476376,0.029352846968674847,0.027807960286113015,0.02806544139987332,0.02858040362739393,0.029739068639315306,0.02858040362739393,0.02716425750171225,0.02716425750171225,0.02536188970539011,0.02549063026227026,0.02677803583107179,0.0272929980585924,0.027936700842993167,0.028451663070513777,0.027550479172352708,0.027807960286113015,0.028966625298034388,0.028709144184274085,0.030897733651236683,0.031412695878757294,0.030640252537476376,0.029610328082435154,0.029867809196195458,0.029095365854914543,0.029224106411794695,0.030511511980596224,0.029610328082435154,0.029481587525555,0.02858040362739393,0.028451663070513777,0.028709144184274085,0.029739068639315306,0.028966625298034388,0.029610328082435154,0.029224106411794695,0.028837884741154236,0.02858040362739393,0.02858040362739393,0.028322922513633626,0.027936700842993167,0.028709144184274085,0.028194181956753474,0.030125290309955765,0.02806544139987332,0.027550479172352708,0.028451663070513777,0.029095365854914543,0.029867809196195458,0.030768993094356527,0.030768993094356527,0.030511511980596224,0.030768993094356527,0.028966625298034388,0.030768993094356527,0.03295758256131913,0.030897733651236683,0.030511511980596224,0.029224106411794695,0.028451663070513777,0.027421738615472556,0.026520554717311486,0.026520554717311486,0.028194181956753474,0.028322922513633626,0.026649295274191638,0.02767921972923286,0.02716425750171225,0.028322922513633626,0.029095365854914543,0.030125290309955765,0.029610328082435154,0.029095365854914543,0.02767921972923286,0.027035516944832097,0.026649295274191638,0.027421738615472556,0.027421738615472556,0.026649295274191638,0.02626307360355118,0.02677803583107179,0.02677803583107179,0.027550479172352708,0.0272929980585924,0.02767921972923286,0.027035516944832097,0.02587685193291072,0.02497566803474965,0.024718186920989347,0.02497566803474965,0.02446070580722904,0.02574811137603057,0.02626307360355118,0.02626307360355118,0.02677803583107179,0.02858040362739393,0.028837884741154236,0.030382771423716072,0.031155214764996986,0.030640252537476376,0.030382771423716072,0.030768993094356527,0.029739068639315306,0.028837884741154236,0.02767921972923286,0.027807960286113015,0.028451663070513777,0.028966625298034388,0.028451663070513777,0.029224106411794695,0.028966625298034388,0.02767921972923286,0.028322922513633626,0.029610328082435154,0.030254030866835917,0.030511511980596224,0.030125290309955765,0.029610328082435154,0.029481587525555,0.028837884741154236,0.028194181956753474,0.028451663070513777,0.02858040362739393,0.02767921972923286,0.0272929980585924,0.026005592489790876,0.025619370819150417,0.025233149148509958,0.02626307360355118,0.02639181416043133,0.027035516944832097,0.028194181956753474,0.02806544139987332,0.029996549753075613,0.029996549753075613,0.029610328082435154,0.029739068639315306,0.030511511980596224,0.029610328082435154,0.02858040362739393,0.028837884741154236,0.02806544139987332,0.028194181956753474,0.02677803583107179,0.02806544139987332,0.028709144184274085,0.029224106411794695,0.029867809196195458,0.030125290309955765,0.03128395532187714,0.03154143643563745,0.0316701769925176,0.0316701769925176,0.03308632311819928,0.03231387977691836,0.03218513922003821,0.031026474208116835,0.030640252537476376,0.030125290309955765,0.031155214764996986,0.031155214764996986,0.031412695878757294,0.030897733651236683,0.026906776387951945,0.023817003022828277,0.02124219188522522,0.019182342975142774,0.0)
ycorr <- c(0.00010778783508770202,0.00010759872251247804,0.00010703589636461949,0.0001060967033504694,0.00010479015405164682,0.00010312670480788973,0.00010110883351840121,9.907648766095357e-05,9.703213210824633e-05,9.49872276201649e-05,9.294664576745641e-05,9.090741544022695e-05,8.887675465911263e-05,8.684780416502881e-05,8.481959435256509e-05,8.279441920267205e-05,8.076756348137611e-05,7.873879817253325e-05,7.671314851783277e-05,7.468983586383148e-05,7.266276181104344e-05,7.063626232270004e-05,6.860642044973084e-05,6.657134390031703e-05,6.453639023228187e-05,6.249516811662001e-05,6.0442342705609295e-05,5.838189380593363e-05,5.6312660644537976e-05,5.422500420813381e-05,5.2119874397048284e-05,4.999648462321153e-05,4.785009261212608e-05,4.567744743785786e-05,4.347349255026734e-05,4.123419786481382e-05,3.8965781921979995e-05,3.6668412069396314e-05,3.4332582315697055e-05,3.1956896471462606e-05,2.9547741197758107e-05,2.7100983557170826e-05,2.461162120782698e-05,2.208569250912779e-05,1.9521627462975327e-05,1.692009063413398e-05,1.4281591840264628e-05,1.1605116421089464e-05,8.88681628980901e-06,6.141597989768812e-06,3.3724930383222476e-06,5.806517174813376e-07,-2.2241598745112337e-06,-5.040319561959799e-06,-7.86701140464718e-06,-1.0698734929486884e-05,-1.3535485851862094e-05,-1.6380197200057745e-05,-1.9228675522568384e-05,-2.2081347880007455e-05,-2.4944241132817097e-05,-2.7810113331859325e-05,-3.068583834664338e-05,-3.357125348635207e-05,-3.6465585571629764e-05,-3.9369451502547815e-05,-4.228378227474853e-05,-4.5204853727816946e-05,-4.812098056598926e-05,-5.1033676474806284e-05,-5.393739260492015e-05,-5.684065881744376e-05,-5.974461155673104e-05,-6.264741024104365e-05,-6.55472409313787e-05,-6.844038404531857e-05,-7.132437578892138e-05,-7.419269299386817e-05,-7.704758604646867e-05,-7.989219352979636e-05,-8.272895399297323e-05,-8.555228892313499e-05,-8.834865993275181e-05,-9.111837158957442e-05,-9.385993111708109e-05,-9.657590458348444e-05,-9.926099582742093e-05,-0.0001019208093630217,-0.00010455823228745718,-0.00010717371248950408,-0.00010976233582300281,-0.00011231790250045814,-0.0001148457001484935,-0.00011734946865657772,-0.00011982994340638003,-0.00012228280041561042,-0.00012471290045445841,-0.0001271225446193725,-0.00012951346860762364,-0.00013188469648924415,-0.00013424243917200122,-0.0001366002663869248,-0.00013896631299885532,-0.00014133893088646494,-0.00014371901003777053,-0.0001461106011362609,-0.00014851561767522723,-0.00015093309347691548,-0.0001533637530193275,-0.0001557982976079953,-0.0001582396319212236,-0.00016067552323631762,-0.00016309976667334898,-0.00016550719425117085,-0.00016789341522524827,-0.00017025710499842927,-0.00017259871608700284,-0.00017491539128226477,-0.0001772032045047419,-0.000179464266374778,-0.0001816993529990432,-0.00018391299139695858,-0.00018610280328017133,-0.0001882673647778258,-0.00019041345569258285,-0.00019254163435893518,-0.00019465288113036875,-0.00019674705245107903,-0.0001988235292825807,-0.00020088425669292004,-0.00020292334095039645,-0.00020494157839084275,-0.00020693316762806764,-0.00020891055088498482,-0.00021087047611740195,-0.0002128126498396376,-0.0002147382181301283,-0.00021664825122158138,-0.00021853936854131437,-0.00022041168313207283,-0.00022226678115607224,-0.00022410533896392588,-0.00022593607735387798,-0.00022775409256844405,-0.00022955649454679111,-0.00023134565774385283,-0.00023312022822219883,-0.0002348812355344142,-0.0002366343218157689,-0.0002383879593877018,-0.00024014433501114979,-0.00024190140161566421,-0.00024365944194515616,-0.0002454172156407034,-0.0002471826764489903,-0.00024894950006696515,-0.00025071566119590785,-0.00025247766552050495,-0.0002542388082788342,-0.00025599012244552946,-0.0002577338128683817,-0.0002594705600038481,-0.0002611971687558277,-0.0002629136862753192,-0.0002646108359010665,-0.0002662918164081105,-0.00026796221568710734,-0.0002696280829336221,-0.000271287716449701,-0.00027293709804699436,-0.0002745759711230576,-0.00027619564863843617,-0.0002778020206681445,-0.00027940519616841554,-0.00028100777860476335,-0.0002826120370732756,-0.00028421257670951206,-0.000285809552324927,-0.00028740150822410956,-0.0002889981468433961,-0.00029060065275193303,-0.0002922153414168623,-0.00029384294636443473,-0.00029547295039458613,-0.0002971016126310727,-0.0002987296418402748,-0.0003003601496593211,-0.0003019884323902869,-0.00030361681229975197,-0.0003052389883735527,-0.0003068492145253172,-0.000308447271187535,-0.0003100288695939649,-0.00031159387489953366,-0.0003131492111175277,-0.0003146942846540103,-0.0003162258697792795,-0.00031774308871028244,-0.00031924697056435504,-0.0003207363687261856,-0.00032221557016686765,-0.0003236860799463318,-0.0003251490967375018,-0.00032660834674091873,-0.00032806321940832947,-0.0003295107929645025,-0.0003309481266130598,-0.00033238397328242065,-0.00033381847196856644,-0.0003352542734580672,-0.0003366879496578269,-0.0003381231543375175,-0.00033955862310883065,-0.0003409949429785498,-0.0003424301770482193,-0.0003438677862283854,-0.00034531398949218337,-0.00034676828661189807,-0.0003482231850882649,-0.00034968033229729157,-0.0003511399541423583,-0.0003526025391560162,-0.0003540627450312224,-0.000355518274829298,-0.00035696739818982733,-0.0003584094225665531,-0.0003598411451676062,-0.0003612523044137846,-0.0003626456829843816,-0.00036401684227544746,-0.0003653650702303635,-0.00036668742553238096,-0.0003679884725833868,-0.00036927158776602564,-0.00037053798328637224,-0.00037178916264510076,-0.00037302310271083506,-0.00037424211295694653,-0.0003754535897560679,-0.000376665784385767,-0.00037788761986878096,-0.00037911841474518726,-0.0003803597265247538,-0.00038160489339831525,-0.00038285741357635877,-0.0003841177525326898,-0.0003853835853942408,-0.0003866545062200875,-0.00038792691942726384,-0.00038919643740291436,-0.00039045321657296943,-0.000391693392776084,-0.00039291997368567433,-0.0003941358177683461,-0.00039533942829306023,-0.00039652452890093004,-0.00039769299207595204,-0.00039884878995704486,-0.0003999980201835384,-0.00040114421779537606,-0.0004022881110956335,-0.0004034353434874964,-0.00040458667337020987,-0.0004057417778658882,-0.00040690224916847996,-0.0004080743207330291,-0.00040926610465752736,-0.00041047796139797514,-0.00041170512981821423,-0.000412943173029885,-0.0004141959188383277,-0.0004154660965622576,-0.00041674995512368886,-0.00041804341642585587,-0.0004193485009020355,-0.0004206631620657583,-0.00042198116026538287,-0.0004233002008198884,-0.00042462115109861666,-0.00042594742405941836,-0.0004272719148805513,-0.0004285801546168742,-0.0004298599065642847,-0.0004311046660489352,-0.00043230446689818743,-0.000433439941375558,-0.0004344984857595685,-0.0004354703895538923,-0.00043633874138225933,-0.0004370865676756213,-0.00043769509429755126,-0.0004381607903525231,-0.0004384853061308777,-0.000438672125467456,-0.0004387172887728679,-0.00043863152833757517,-0.00043842428961529884,-0.0004381005663497489,-0.0004376672525815516,-0.0004371334575347608,-0.00043651588235828193,-0.0004358349348331536,-0.00043510072251991836,-0.00043431894556233557,-0.00043349753564772965,-0.0004326480377491801,-0.0004317737389323918,-0.0004308793204603953,-0.00042997157002151943,-0.0004290563491555348,-0.000428139781393438,-0.0004272187869102303,-0.00042629376632815475,-0.000425370465021273,-0.00042445507125976167,-0.000423548946406991,-0.0004226535811952769,-0.000421770972810178,-0.00042090305929622546,-0.0004200493032344365,-0.0004192136175746709,-0.0004183957035591139,-0.00041759609939694717,-0.0004168099974897718,-0.00041603580829129635,-0.0004152665094048723,-0.0004144983879528098,-0.00041372928937407635,-0.00041295866024950855,-0.0004121872936688374,-0.00041141390929995067,-0.0004106356981321887,-0.00040985034872363765,-0.00040905746639291766,-0.0004082554943433128,-0.00040744085519109336,-0.0004066163459919403,-0.00040578277249972054,-0.00040493750896164287,-0.0004040786329007036,-0.0004032028745997788,-0.0004023097005434043,-0.00040139698079504006,-0.000400465332248452,-0.0003995114502393685,-0.0003985403602872816,-0.0003975543333568643,-0.0003965553979196861,-0.00039554306231819275,-0.0003945215159926249,-0.0003934931094983444,-0.0003924625709020342,-0.0003914364717807282,-0.0003904190456644571,-0.0003894151296363634,-0.00038843034916670124,-0.00038746419450531335,-0.0003865153636926382,-0.00038558656656391974,-0.00038467692270736334,-0.00038378482760796536,-0.0003829096421271506,-0.00038204615683218166,-0.00038118867706414257,-0.0003803340902803568,-0.0003794762717794583,-0.00037861181483709845,-0.00037773798199371573,-0.00037685642004541844,-0.00037596397191540356,-0.00037506497328613266,-0.000374156743034895,-0.00037324061895874114,-0.00037231802868924977,-0.00037139073706795065,-0.00037046041621736957,-0.00036953057148500344,-0.0003686075320719864,-0.0003676917710468226,-0.000366784789307222,-0.0003658862071158526,-0.0003649962942400076,-0.0003641185034375181,-0.00036325348676126645,-0.000362400299084757,-0.00036155975094125185,-0.000360731234378786,-0.00035991490232223985,-0.000359104518007044,-0.0003583030121604307,-0.00035750734591106093,-0.00035671807069249435,-0.0003559281278958003,-0.00035513662759582935,-0.00035434398777953955,-0.00035355292461952795,-0.00035276237266860215,-0.0003519666026381875,-0.0003511636236761843,-0.00035035234807408584,-0.0003495305221848303,-0.0003486990220853386,-0.00034786185488151994,-0.0003470240031448867,-0.0003461856429341717,-0.00034534302983698696,-0.00034449389000826356,-0.000343639105970578,-0.00034278445828436895,-0.0003419297229541569,-0.0003410759186611278,-0.00034022255003522103,-0.00033936665915828147,-0.00033850353730300383,-0.00033763171067154545,-0.0003367516789619788,-0.0003358684854093809,-0.0003349844214879865,-0.0003341013259389513,-0.0003332182296818712,-0.0003323361171271176,-0.0003314560079270735,-0.00033058227092454555,-0.0003297196353710513,-0.0003288697821934995,-0.00032803451242270604,-0.00032721100273449085,-0.0003263946214532535,-0.0003255834496231131,-0.0003247776231267306,-0.0003239811022374327,-0.00032319334087168206,-0.0003224123988780597,-0.00032163264686016767,-0.00032085093299942774,-0.0003200656546254989,-0.0003192731118367528,-0.00031847655420145067,-0.00031767632724285735,-0.00031687381562101974,-0.00031606565089459585,-0.00031525030791840095,-0.0003144274257423984,-0.00031359661060651964,-0.0003127624600296015,-0.00031192385941356915,-0.00031108341445229386,-0.00031024442315557573,-0.00030940612161911254,-0.00030856712896861583,-0.0003077264775397713,-0.00030688351186594913,-0.00030603896770286956,-0.00030519707357158204,-0.00030435860924119185,-0.0003035242231629735,-0.00030269906013285195,-0.00030188035433664924,-0.00030106803644661725,-0.0003002626283433266,-0.00029946680718477087,-0.0002986829270099739,-0.00029791335945059176,-0.00029715702452912156,-0.0002964095510890929,-0.0002956718010266879,-0.0002949394547775712,-0.00029421131939344827,-0.00029348699233490297,-0.0002927662990818742,-0.0002920492597897157,-0.0002913301787239068,-0.00029060361328224704,-0.00028986777035204243,-0.00028912137523401247,-0.00028836435977949455,-0.0002875965874613918,-0.0002868149986241535,-0.0002860191825257628,-0.00028520626729182705,-0.0002843739936014681,-0.00028352203647529064,-0.0002826562014140458,-0.00028177765245840234,-0.00028088587846603633,-0.00027997967594661153,-0.0002790583738129321,-0.0002781275590369392,-0.0002771899053063166,-0.0002762487125163261,-0.00027530801874010077,-0.0002743717808071766,-0.0002734398335209478,-0.00027251169855858,-0.00027159032669046233,-0.00027067992748808087,-0.0002697823290648724,-0.00026889638331358673,-0.00026801806233279037,-0.00026714519139515547,-0.0002662728613032326,-0.0002654000513145686,-0.00026452525735304056,-0.0002636478791079295,-0.0002627664972099721,-0.0002618791178020508,-0.00026098452008419275,-0.000260085232677423,-0.0002591817929684565,-0.00025827527732651237,-0.000257367571923588,-0.0002564598450729148,-0.0002555510239046987,-0.00025464219401017356,-0.0002537344653491459,-0.00025282995691072263,-0.00025192963046601546,-0.00025102964195877634,-0.0002501306498402536,-0.0002492355942395795,-0.00024834358619390005,-0.00024745584335593066,-0.00024657211948797905,-0.000245691273166011,-0.0002448118168118295,-0.00024393257677794432,-0.0002430511867244903,-0.00024216691866272796,-0.00024128056348277622,-0.00024038648513932933,-0.00023948190814184438,-0.00023856352881579176,-0.00023763329652403428,-0.0002366926296271775,-0.00023574549060465078,-0.0002347910448991837,-0.00023383068037204609,-0.00023286612948961424,-0.00023189797463078838,-0.00023092908464843843,-0.0002299638146634333,-0.00022900779564440869,-0.00022806303062413436,-0.0002271265531040946,-0.00022619497738115654,-0.00022526743451095835,-0.00022434723482825004,-0.00022343128784915858,-0.0002225204175484848,-0.00022161496262385297,-0.00022071417572674652,-0.00021981625874568992,-0.00021891924127156884,-0.00021802516252866452,-0.0002171373548769643,-0.00021625600274210942,-0.00021537519650682643,-0.00021449337136336775,-0.00021361149846564406,-0.0002127259282362464,-0.0002118373403037868,-0.00021094094275051802,-0.0002100301673154221,-0.00020910088252669074,-0.00020814821543828618,-0.00020716875202231628,-0.00020616424818184798,-0.0002051395482475614,-0.00020409051079997123,-0.00020301717582079827,-0.00020191585375703243,-0.00020078905814266995,-0.0001996415684944745,-0.0001984793375568432,-0.00019730495275635103,-0.00019612137606840938,-0.00019492954477742601,-0.00019372892021300744,-0.00019252069592374694,-0.00019130915143384256,-0.000190101315710035,-0.00018889988672271776,-0.00018770116448273074,-0.00018650332799510232,-0.0001853070674857501,-0.00018411113342881562,-0.00018291513012035245,-0.00018171568248791383,-0.00018050868910337873,-0.000179286390943509,-0.00017803191867168445,-0.0001767218783537094,-0.00017534324141897303,-0.00017387841035536837,-0.00017229140813139067,-0.0001707078488228005,-0.00016909192475636313,-0.00016742597453292988,-0.000165699103761321,-0.00016390151574659735,-0.0001620261225764542,-0.0001600846938631446,-0.0001580844344435401,-0.000156034504031149,-0.00015394625475754228,-0.00015185494593157836,-0.00014963157084895123,-0.00014731241942631017,-0.00014491489253755344,-0.0001424535650344854,-0.0001399425682661911,-0.00013739197881486228,-0.00013480969492911886,-0.0001322061821963053,-0.0001295843018632808,-0.00012694972683651934,-0.00012430353952902755,-0.0001216460050943097,-0.00011897316917264132,-0.00011628075607064723,-0.00011356706896991124,-0.00011083018695750772,-0.00010806973165804288,-0.00010528087535559557,-0.00010246500696015053,-9.962254892428109e-05,-9.675343648655301e-05,-9.385485944312706e-05,-9.092817374151695e-05,-8.797901768579892e-05,-8.500780418496289e-05,-8.201262650570958e-05,-7.899308855687475e-05,-7.594826717451851e-05,-7.287610179584038e-05,-6.977036446325056e-05,-6.662926490457935e-05,-6.34520638034832e-05,-6.023818209893226e-05,-5.6982690856496635e-05,-5.3679938759876027e-05,-5.0330314568503144e-05,-4.693182357256534e-05,-4.347995930541286e-05,-3.9971937792204935e-05,-3.640539433893758e-05,-3.2777096634875464e-05,-2.908579316150919e-05,-2.5329784098186503e-05,-2.150790297133142e-05,-1.7622992667596887e-05,-1.3676054607861506e-05,-9.671134408772833e-06,-5.612240305625372e-06,-1.5052618569578813e-06,2.6427050307691054e-06,6.8288784912714825e-06,1.104810244812425e-05,1.529855101532034e-05,1.958004079646116e-05,2.3888753568177797e-05,2.8225090230516016e-05,3.259448300423354e-05,3.70009810688267e-05,4.144869588057859e-05,4.594357562628841e-05,5.048787607084721e-05,5.508115666759496e-05,5.972337510315887e-05,6.441198336409776e-05,6.914736899700696e-05,7.39283306084238e-05,7.875207132718921e-05,8.361044200887943e-05,8.849659200221689e-05,9.340209903996788e-05,9.831602658800748e-05,0.00010323788832878923,0.00010816456082598325,0.00011309324504294092,0.00011802027868174063,0.0001229409618947526,0.00012785137356159898,0.00013274646475502694,0.00013762465062376096,0.00014248639836313088,0.00014733519048034716,0.0001521674837831226,0.00015697841988669976,0.0001617617763287177,0.0001665154536243115,0.00017123915437241224,0.0001759316794704103,0.0001805961228381804,0.00018523086384722898,0.0001898371358492827,0.00019441279447466616,0.00019895749615808625,0.00020347404681412922,0.00020796721742871298,0.00021244393428706125,0.0002169047693756903,0.00022135127722049114,0.00022578476981382359,0.00023020910257551673,0.0002346244352106567,0.0002390304948872178,0.00024343066517974775,0.00024782538235678053,0.00025221696621842253,0.0002566008702122662,0.0002609747061273173,0.00026533717227254485,0.00026968743829258474,0.00027402061106434787,0.00027833162394388364,0.00028262189580289545,0.00028688786272700956,0.00029112507183436196,0.0002953276075675579,0.00029949062826286135,0.0003036113814658501,0.0003076874028410708,0.0003117147852317237,0.0003156912579652182,0.00031962082189003883,0.0003235002250562012,0.00032733063678782025,0.0003311149578248174,0.00033485778364312184,0.00033856305830613667,0.0003422376835491436,0.0003458856448070225,0.0003495106543102453,0.00035311684892737555,0.00035670466798259253,0.0003602741425028348,0.00036382376723252273,0.0003673493840176121,0.0003708440398008857,0.00037429990815465003,0.00037770894501478304,0.00038106499806876795,0.00038436241702250037,0.00038760102821065387,0.0003907764266109647,0.00039388864055412635,0.0003969389812810586,0.0003999356753189165,0.0004028867882378023,0.00040580273445630597,0.0004086971338918879,0.00041157823563214683,0.00041445290978178923,0.0004173262457412292,0.00042020370163346125,0.000423093673816806,0.0004260000450872793,0.000428919274122292,0.0004318457608853824,0.0004347777333889237,0.0004377087478162418,0.0004406333812522312,0.000443551597202542,0.00044645916677837894,0.0004493526356454079,0.0004522223897779422,0.00045505917856050016,0.0004578579301350434,0.0004606224770994741,0.00046335091932804594,0.000466037298935526,0.0004686774396993753,0.00047126449337507527,0.00047379821174952914,0.0004762787638342171,0.0004787105681250244,0.00048109927477103445,0.0004834514968965637,0.0004857699919303364,0.00048805333482612035,0.0004903098860643191,0.0004925497055268735,0.0004947814774865222,0.0004970065485669531,0.00049922533512243,0.0005014389715946415,0.0005036459173048128,0.0005058461043296015,0.0005080382287386783,0.0005102235864628389,0.0005124011304162096,0.00051456362271581,0.0005167069696904856,0.000518831524364177,0.000520940238332151,0.0005230311755721994,0.000525108893363293,0.0005271746297295496,0.0005292254519740817,0.0005312634643847014,0.0005332896390292128,0.0005353114539156999,0.0005373316251014101,0.0005393505867292594,0.0005413664975927315,0.0005433826480355303,0.0005453975161270466,0.0005474105491244497,0.0005494226607662276,0.0005514347997917957,0.0005534424048682648,0.0005554393098690123,0.0005574204840712142,0.0005593894858003638,0.0005613500008285338,0.0005633011890418417,0.000565243405932927,0.0005671786021945083,0.0005691050897936368,0.0005710270729979533,0.0005729493768792452,0.0005748794938627827,0.0005768223961186075,0.0005787791094307925,0.0005807443037119096,0.0005827140531308019,0.000584691104555051,0.0005866722310493502,0.000588656375497995,0.0005906379390619685,0.0005926104437606006,0.0005945662704877603,0.0005965025326008133,0.0005984132066198694,0.0006002946964898092,0.0006021503074141905,0.0006039757111203577,0.0006057673985293913,0.0006075293684754278,0.000609264246597949,0.0006109779491698124,0.000612672824916739,0.0006143534346929733,0.0006160201891893485,0.000617678993094271,0.000619332571923265,0.000620983717700962,0.0006226394703606374,0.0006243010857512232,0.0006259664178171263,0.0006276323322904887,0.0006293003533475235,0.000630968834377757,0.0006326366272674485,0.0006343034631272208,0.0006359657695587734,0.0006376175174725653,0.0006392498588464967,0.0006408596645908209,0.0006424467514320921,0.0006440120777962906,0.0006455553166470193,0.0006470745098094286,0.0006485713953402589,0.0006500455905859905,0.0006514969830737628,0.0006529335479874384,0.000654364646199984,0.0006557951617183657,0.0006572252179128063,0.0006586554913173279,0.0006600864239851797,0.0006615215920408914,0.000662962523590529,0.0006644088820268509,0.0006658648875303317,0.0006673310819182514,0.0006688049475524395,0.0006702854913891249,0.0006717742882632905,0.0006732737702722828,0.0006747845557615634,0.0006763025035729452,0.000677821225140244,0.0006793379634538505,0.0006808464558821938,0.0006823325148009069,0.0006837818266269015,0.0006851767218698832,0.0006864972428811533,0.0006877198617988599,0.0006888188278726827,0.0006897687963241954,0.0006905505914908491,0.0006911412458750254,0.0006915124890703603,0.0006916454472650409,0.0006915275189800398,0.0006911499914466892,0.0006905059048568673,0.0006895969282590949,0.000688430717889016,0.0006870187411370645,0.0006853710316437578,0.0006834993250020031,0.0006814291003486814,0.0006791825651900855,0.0006767816328797661,0.0006742469395545216,0.0006716008892132762,0.0006688608027657442,0.0006660413519877938,0.0006631588912445669,0.0006602275422542192,0.0006572656486365335,0.0006542816829525489,0.0006512800437375188,0.000648264699324389,0.0006452371241660089,0.0006422014230417504,0.00063916047263359,0.0006361173168181384,0.0006330698576252793,0.0006300160171619904,0.0006269505222182789,0.0006238671220392926,0.0006207634738362793,0.0006176380435024104,0.000614490667622319,0.0006113179559148747,0.0006081146223720542,0.0006048736379082437,0.0006015924375033893,0.0005982714030931373,0.0005949074610997138,0.0005915008062688193,0.0005880534430168596,0.0005845637103171017,0.0005810300626032583,0.0005774494809112134,0.0005738194849717242,0.0005701366896702729,0.0005663994497468268,0.0005626042891563359,0.0005587454515504149,0.000554818738017565,0.0005508207493658252,0.0005467489094227863,0.0005426030764494892,0.0005383808709061704,0.0005340861795240763,0.000529727271490525,0.0005253135103051845,0.0005208488478255144,0.000516341992350858,0.0005118029148176711,0.000507236602957959,0.0005026489113130132,0.0004980411049556346,0.0004934210817796795,0.0004887910561470352,0.00048414890094314143,0.0004794875598154273,0.0004748020243051646,0.000470090219481325,0.0004653474174022181,0.0004605696714355996,0.0004557532987988363,0.00045089436451905635,0.0004459892833064625,0.0004410333203022972,0.00043602711174248583,0.0004309739886356481,0.0004258814420948163,0.00042075482883494725,0.0004155991795686654,0.0004104205384818127,0.0004052253704716228,0.00040002702736323923,0.00039483296273256426,0.00038965305443078736,0.0003844963003607411,0.00037936918891142844,0.0003742764122091187,0.00036922153678672746,0.00036420411712774335,0.00035922857305549673,0.00035429864780087876,0.00034941069492353807,0.0003445653757156181,0.00033976212129520664,0.0003350011165057619,0.0003302785725537653,0.0003255916306805289,0.0003209386804774757,0.00031631887867994174,0.0003117331928255798,0.00030717589485163395,0.00030264156692022526,0.00029812842533001767,0.00029363104700512113,0.00028914545614102966,0.00028466914170211774,0.0002802012598141504,0.0002757402620604874,0.00027128559709380313,0.00026683155786180155,0.0002623778854413275,0.00025793119092602936,0.00025349572617202134,0.00024907658783875287,0.0002446769380780279,0.00024030096486225724,0.00023594893583960696,0.00023162242274416429,0.00022732568076901523,0.0002230643709752557,0.00021884616666578466,0.0002146718699982396,0.0002105378278173413,0.00020644390573533404,0.000202387394941766,0.00019836695830664728,0.00019438526778389772,0.00019044410852228375,0.00018654292430829447,0.0001826791116270861,0.0001788464645824688,0.00017504104821492312,0.0001712615734328321,0.00016750512471486555,0.00016377357063779237,0.0001600692230743248,0.00015639001526691941,0.00015273298855747903,0.00014909709401936196,0.00014548238361226319,0.00014189103031954706,0.00013832488597804524,0.0001347867459408303,0.0001312801291226724,0.00012780460876227298,0.0001243556871936564,0.00012093424392251266,0.00011754135096334445,0.00011417491794703903,0.00011083249069519217,0.00010751165106383565,0.00010420835161409869,0.00010092078095134057,9.76450795788183e-05,9.437782108749926e-05,9.11208621273621e-05,8.786821380811872e-05,8.461339676045598e-05,8.135318114994082e-05,7.80868771332373e-05,7.481108483444775e-05,7.152521206200182e-05,6.82273512859107e-05,6.491453765426153e-05,6.158605784734142e-05,5.823863499098789e-05,5.487600116318126e-05,5.150467228284836e-05,4.8130728122963996e-05,4.47578249400733e-05,4.139069455212426e-05,3.80366045734879e-05,3.4697286914378456e-05,3.1380067800922436e-05,2.8091116970808164e-05,2.4833891684200934e-05,2.1612760046561674e-05,1.842525868955425e-05,1.527187469421923e-05,1.2149809961167931e-05,9.057599795699349e-06,5.989882144332302e-06,2.9446466935639376e-06,-8.158375088400479e-08,-3.096017671256811e-06,-6.104538209182273e-06,-9.11559935018693e-06,-1.2132519158355225e-05,-1.5160864973055587e-05,-1.8203310968961242e-05,-2.1262369733536004e-05,-2.4338106094234008e-05,-2.742945366437746e-05,-3.053688459245712e-05,-3.365758616402341e-05,-3.6785141150059374e-05,-3.991025418268354e-05,-4.3024493421963275e-05,-4.612465202081308e-05,-4.9204208191026456e-05,-5.2257319318473225e-05,-5.528177715941779e-05,-5.827975806794793e-05,-6.12527794382163e-05,-6.420337538406592e-05,-6.713304468871601e-05,-7.005230787455208e-05,-7.29694646959166e-05,-7.58886323641357e-05,-7.881420970246501e-05,-8.175346886080511e-05,-8.471084469109868e-05,-8.768579793396563e-05,-9.067416098969539e-05,-9.367371969687045e-05,-9.668325989570964e-05,-9.969943011198326e-05,-0.00010271818346020077,-0.00010573936733556706,-0.00010876206637450378,-0.00011178482982845577,-0.00011480316937159312,-0.0001178183010808701,-0.0001208351308586759,-0.00012385644636620917,-0.00012688546936344763,-0.00012992222547315646,-0.0001329699080107541,-0.00013602602823141574,-0.00013909035201803343,-0.00014216098494649425,-0.00014524076154229134,-0.00014832682510299673,-0.0001514135415985803,-0.00015449398174325143,-0.00015756525961836896,-0.00016062110807352285,-0.0001636561865154059,-0.00016666488827923328,-0.00016964694791978926,-0.00017259843257034772,-0.00017551588612831694,-0.00017839599721969002,-0.00018124103537728713,-0.00018405390100054527,-0.00018683393395897422,-0.00018958310538290006,-0.00019230621572759188,-0.0001950108263564399,-0.00019770246155438492,-0.00020038307029447583,-0.00020305569539570714,-0.0002057279141061147,-0.00020840075286589086,-0.00021107581618595928,-0.00021375576776367345,-0.00021644642399547753,-0.00021914486917811563,-0.00022184343196703172,-0.00022453680944699024,-0.0002272251365485564,-0.00022990584734093546,-0.00023257505828446038,-0.00023522808916166322,-0.00023786394462938992,-0.00024048356125565834,-0.00024308415794250024,-0.0002456655925733817,-0.00024823604812513955,-0.0002508020602151076,-0.000253364034055395,-0.0002559234532209083,-0.00025848167271596683,-0.0002610479595033935,-0.00026362644108082154,-0.0002662194143826645,-0.00026882708446707815,-0.00027145316617065125,-0.0002740985880546353,-0.00027676134585580557,-0.0002794445398580946,-0.0002821537079454283,-0.00028488778714042586,-0.0002876430354652757,-0.0002904123351099346,-0.00029319132450453993,-0.00029597665704216003,-0.0002987632791455904,-0.0003015464360486653,-0.00030431583205288014,-0.0003070635586064321,-0.000309778802640925,-0.00031245285201339664,-0.0003150720452273924,-0.0003176253967451518,-0.0003200962315117608,-0.0003224668458797908,-0.00032458687954135996,-0.00032630762092838723,-0.00032761217559258487,-0.0003284896281605017,-0.0003289309909622028)
xcorr <- c(-600.0,-598.999165971643,-597.9983319432861,-596.9974979149291,-595.9966638865722,-594.9958298582152,-593.9949958298582,-592.9941618015013,-591.9933277731443,-590.9924937447873,-589.9916597164304,-588.9908256880734,-587.9899916597165,-586.9891576313595,-585.9883236030025,-584.9874895746456,-583.9866555462886,-582.9858215179316,-581.9849874895747,-580.9841534612177,-579.9833194328608,-578.9824854045038,-577.9816513761468,-576.9808173477899,-575.9799833194329,-574.9791492910759,-573.978315262719,-572.977481234362,-571.976647206005,-570.9758131776481,-569.9749791492911,-568.974145120934,-567.9733110925772,-566.9724770642201,-565.9716430358633,-564.9708090075062,-563.9699749791492,-562.9691409507923,-561.9683069224353,-560.9674728940784,-559.9666388657214,-558.9658048373644,-557.9649708090075,-556.9641367806505,-555.9633027522935,-554.9624687239366,-553.9616346955796,-552.9608006672227,-551.9599666388657,-550.9591326105087,-549.9582985821518,-548.9574645537948,-547.9566305254378,-546.9557964970809,-545.9549624687239,-544.954128440367,-543.95329441201,-542.952460383653,-541.9516263552961,-540.9507923269391,-539.9499582985821,-538.9491242702252,-537.9482902418682,-536.9474562135113,-535.9466221851543,-534.9457881567973,-533.9449541284404,-532.9441201000834,-531.9432860717264,-530.9424520433695,-529.9416180150125,-528.9407839866556,-527.9399499582986,-526.9391159299416,-525.9382819015847,-524.9374478732277,-523.9366138448707,-522.9357798165138,-521.9349457881568,-520.9341117597999,-519.9332777314429,-518.9324437030859,-517.931609674729,-516.930775646372,-515.929941618015,-514.9291075896581,-513.9282735613011,-512.9274395329442,-511.92660550458714,-510.9257714762302,-509.9249374478732,-508.92410341951626,-507.9232693911593,-506.92243536280233,-505.92160133444537,-504.9207673060884,-503.91993327773145,-502.9190992493745,-501.9182652210175,-500.91743119266056,-499.9165971643036,-498.91576313594663,-497.91492910758967,-496.9140950792327,-495.91326105087575,-494.9124270225188,-493.9115929941618,-492.91075896580486,-491.90992493744784,-490.9090909090909,-489.9082568807339,-488.90742285237695,-487.90658882402,-486.90575479566303,-485.90492076730607,-484.9040867389491,-483.90325271059214,-482.9024186822352,-481.9015846538782,-480.90075062552125,-479.8999165971643,-478.89908256880733,-477.89824854045037,-476.8974145120934,-475.89658048373644,-474.8957464553795,-473.8949124270225,-472.89407839866556,-471.8932443703086,-470.89241034195163,-469.89157631359467,-468.8907422852377,-467.88990825688074,-466.8890742285238,-465.8882402001668,-464.88740617180986,-463.8865721434529,-462.88573811509593,-461.88490408673897,-460.884070058382,-459.88323603002505,-458.8824020016681,-457.8815679733111,-456.88073394495416,-455.8798999165972,-454.87906588824023,-453.8782318598833,-452.8773978315263,-451.87656380316935,-450.8757297748124,-449.8748957464554,-448.87406171809846,-447.87322768974144,-446.8723936613845,-445.8715596330275,-444.87072560467055,-443.8698915763136,-442.86905754795663,-441.86822351959967,-440.8673894912427,-439.86655546288574,-438.8657214345288,-437.8648874061718,-436.86405337781486,-435.8632193494579,-434.86238532110093,-433.86155129274397,-432.860717264387,-431.85988323603004,-430.859049207673,-429.85821517931606,-428.8573811509591,-427.85654712260214,-426.8557130942452,-425.8548790658882,-424.85404503753125,-423.8532110091743,-422.8523769808173,-421.85154295246036,-420.8507089241034,-419.84987489574644,-418.8490408673895,-417.8482068390325,-416.84737281067555,-415.8465387823186,-414.8457047539616,-413.84487072560466,-412.8440366972477,-411.84320266889074,-410.8423686405338,-409.8415346121768,-408.84070058381985,-407.8398665554629,-406.8390325271059,-405.83819849874897,-404.837364470392,-403.83653044203504,-402.8356964136781,-401.8348623853211,-400.83402835696415,-399.8331943286072,-398.83236030025023,-397.83152627189327,-396.8306922435363,-395.82985821517934,-394.8290241868224,-393.8281901584654,-392.82735613010846,-391.8265221017515,-390.82568807339453,-389.82485404503757,-388.8240200166806,-387.82318598832364,-386.8223519599667,-385.8215179316097,-384.82068390325276,-383.81984987489574,-382.8190158465388,-381.8181818181818,-380.81734778982485,-379.8165137614679,-378.8156797331109,-377.81484570475396,-376.814011676397,-375.81317764804004,-374.8123436196831,-373.8115095913261,-372.81067556296915,-371.8098415346122,-370.8090075062552,-369.80817347789826,-368.8073394495413,-367.80650542118434,-366.8056713928273,-365.80483736447036,-364.8040033361134,-363.80316930775643,-362.8023352793995,-361.8015012510425,-360.80066722268555,-359.7998331943286,-358.7989991659716,-357.79816513761466,-356.7973311092577,-355.79649708090074,-354.7956630525438,-353.7948290241868,-352.79399499582985,-351.7931609674729,-350.7923269391159,-349.79149291075896,-348.790658882402,-347.78982485404504,-346.7889908256881,-345.7881567973311,-344.78732276897415,-343.7864887406172,-342.7856547122602,-341.78482068390326,-340.7839866555463,-339.78315262718934,-338.7823185988324,-337.7814845704754,-336.78065054211845,-335.7798165137615,-334.7789824854045,-333.77814845704756,-332.7773144286906,-331.77648040033364,-330.7756463719767,-329.7748123436197,-328.77397831526275,-327.7731442869058,-326.77231025854877,-325.7714762301918,-324.77064220183485,-323.7698081734779,-322.7689741451209,-321.76814011676396,-320.767306088407,-319.76647206005003,-318.7656380316931,-317.7648040033361,-316.76396997497915,-315.7631359466222,-314.7623019182652,-313.76146788990826,-312.7606338615513,-311.75979983319434,-310.7589658048374,-309.7581317764804,-308.75729774812345,-307.7564637197665,-306.7556296914095,-305.75479566305256,-304.7539616346956,-303.75312760633864,-302.7522935779817,-301.7514595496247,-300.75062552126775,-299.7497914929108,-298.7489574645538,-297.74812343619686,-296.7472894078399,-295.7464553794829,-294.7456213511259,-293.74478732276896,-292.743953294412,-291.74311926605503,-290.74228523769807,-289.7414512093411,-288.74061718098415,-287.7397831526272,-286.7389491242702,-285.73811509591326,-284.7372810675563,-283.73644703919933,-282.73561301084237,-281.7347789824854,-280.73394495412845,-279.7331109257715,-278.7322768974145,-277.73144286905756,-276.7306088407006,-275.72977481234363,-274.7289407839867,-273.7281067556297,-272.72727272727275,-271.7264386989158,-270.7256046705588,-269.72477064220186,-268.7239366138449,-267.72310258548794,-266.722268557131,-265.721434528774,-264.72060050041705,-263.7197664720601,-262.71893244370307,-261.7180984153461,-260.71726438698914,-259.7164303586322,-258.7155963302752,-257.71476230191826,-256.7139282735613,-255.71309424520433,-254.71226021684737,-253.7114261884904,-252.71059216013344,-251.70975813177648,-250.70892410341952,-249.70809007506256,-248.7072560467056,-247.70642201834863,-246.70558798999167,-245.7047539616347,-244.70391993327775,-243.70308590492078,-242.70225187656382,-241.70141784820686,-240.7005838198499,-239.69974979149293,-238.69891576313597,-237.698081734779,-236.69724770642205,-235.69641367806508,-234.69557964970812,-233.69474562135116,-232.6939115929942,-231.69307756463718,-230.69224353628022,-229.69140950792325,-228.6905754795663,-227.68974145120933,-226.68890742285237,-225.6880733944954,-224.68723936613844,-223.68640533778148,-222.68557130942452,-221.68473728106756,-220.6839032527106,-219.68306922435363,-218.68223519599667,-217.6814011676397,-216.68056713928274,-215.67973311092578,-214.67889908256882,-213.67806505421186,-212.6772310258549,-211.67639699749793,-210.67556296914097,-209.674728940784,-208.67389491242704,-207.67306088407008,-206.67222685571312,-205.67139282735616,-204.6705587989992,-203.66972477064223,-202.66889074228527,-201.6680567139283,-200.66722268557135,-199.66638865721438,-198.66555462885736,-197.6647206005004,-196.66388657214344,-195.66305254378648,-194.66221851542952,-193.66138448707255,-192.6605504587156,-191.65971643035863,-190.65888240200167,-189.6580483736447,-188.65721434528774,-187.65638031693078,-186.65554628857382,-185.65471226021685,-184.6538782318599,-183.65304420350293,-182.65221017514597,-181.651376146789,-180.65054211843204,-179.64970809007508,-178.64887406171812,-177.64804003336116,-176.6472060050042,-175.64637197664723,-174.64553794829027,-173.6447039199333,-172.64386989157634,-171.64303586321938,-170.64220183486242,-169.64136780650546,-168.6405337781485,-167.63969974979148,-166.6388657214345,-165.63803169307755,-164.6371976647206,-163.63636363636363,-162.63552960800666,-161.6346955796497,-160.63386155129274,-159.63302752293578,-158.63219349457881,-157.63135946622185,-156.6305254378649,-155.62969140950793,-154.62885738115097,-153.628023352794,-152.62718932443704,-151.62635529608008,-150.62552126772312,-149.62468723936615,-148.6238532110092,-147.62301918265223,-146.62218515429527,-145.6213511259383,-144.62051709758134,-143.61968306922438,-142.61884904086742,-141.61801501251045,-140.6171809841535,-139.61634695579653,-138.61551292743957,-137.6146788990826,-136.61384487072564,-135.61301084236868,-134.61217681401166,-133.6113427856547,-132.61050875729774,-131.60967472894077,-130.6088407005838,-129.60800667222685,-128.6071726438699,-127.60633861551293,-126.60550458715596,-125.604670558799,-124.60383653044204,-123.60300250208508,-122.60216847372811,-121.60133444537115,-120.60050041701419,-119.59966638865723,-118.59883236030026,-117.5979983319433,-116.59716430358634,-115.59633027522938,-114.59549624687241,-113.59466221851545,-112.59382819015849,-111.59299416180153,-110.59216013344457,-109.5913261050876,-108.59049207673064,-107.58965804837368,-106.58882402001672,-105.58798999165975,-104.58715596330279,-103.58632193494577,-102.58548790658881,-101.58465387823185,-100.58381984987489,-99.58298582151792,-98.58215179316096,-97.581317764804,-96.58048373644704,-95.57964970809007,-94.57881567973311,-93.57798165137615,-92.57714762301919,-91.57631359466222,-90.57547956630526,-89.5746455379483,-88.57381150959134,-87.57297748123437,-86.57214345287741,-85.57130942452045,-84.57047539616349,-83.56964136780653,-82.56880733944956,-81.5679733110926,-80.56713928273564,-79.56630525437868,-78.56547122602171,-77.56463719766475,-76.56380316930779,-75.56296914095083,-74.56213511259386,-73.5613010842369,-72.56046705587994,-71.55963302752298,-70.55879899916602,-69.55796497080905,-68.55713094245209,-67.55629691409513,-66.55546288573817,-65.5546288573812,-64.55379482902424,-63.55296080066728,-62.55212677231032,-61.551292743953354,-60.55045871559639,-59.54962468723943,-58.54879065888247,-57.547956630525505,-56.54712260216854,-55.54628857381158,-54.545454545454504,-53.54462051709754,-52.54378648874058,-51.54295246038362,-50.542118432026655,-49.54128440366969,-48.54045037531273,-47.53961634695577,-46.538782318598805,-45.53794829024184,-44.53711426188488,-43.53628023352792,-42.535446205170956,-41.534612176813994,-40.53377814845703,-39.53294412010007,-38.53211009174311,-37.531276063386144,-36.53044203502918,-35.52960800667222,-34.52877397831526,-33.527939949958295,-32.52710592160133,-31.52627189324437,-30.525437864887408,-29.524603836530446,-28.523769808173483,-27.52293577981652,-26.52210175145956,-25.521267723102596,-24.520433694745634,-23.51959966638867,-22.51876563803171,-21.517931609674747,-20.517097581317785,-19.516263552960822,-18.51542952460386,-17.514595496246898,-16.513761467889935,-15.512927439532973,-14.51209341117601,-13.511259382819048,-12.510425354462086,-11.509591326105124,-10.508757297748161,-9.507923269391199,-8.507089241034237,-7.506255212677274,-6.505421184320312,-5.50458715596335,-4.503753127606387,-3.502919099249425,-2.5020850708924627,-1.5012510425355003,-0.500417014178538,0.5004170141784243,1.5012510425353867,2.502085070892349,3.5029190992493113,4.503753127606274,5.504587155963236,6.505421184320198,7.506255212677161,8.507089241034237,9.507923269391199,10.508757297748161,11.509591326105124,12.510425354462086,13.511259382819048,14.51209341117601,15.512927439532973,16.513761467889935,17.514595496246898,18.51542952460386,19.516263552960822,20.517097581317785,21.517931609674747,22.51876563803171,23.51959966638867,24.520433694745634,25.521267723102596,26.52210175145956,27.52293577981652,28.523769808173483,29.524603836530446,30.525437864887408,31.52627189324437,32.52710592160133,33.527939949958295,34.52877397831526,35.52960800667222,36.53044203502918,37.531276063386144,38.53211009174311,39.53294412010007,40.53377814845703,41.534612176813994,42.535446205170956,43.53628023352792,44.53711426188488,45.53794829024184,46.538782318598805,47.53961634695577,48.54045037531273,49.54128440366969,50.542118432026655,51.54295246038362,52.54378648874058,53.54462051709754,54.545454545454504,55.54628857381147,56.54712260216843,57.54795663052539,58.54879065888235,59.549624687239316,60.55045871559628,61.55129274395324,62.5521267723102,63.552960800667165,64.55379482902413,65.55462885738109,66.55546288573805,67.55629691409501,68.55713094245198,69.55796497080894,70.5587989991659,71.55963302752286,72.56046705587983,73.5613010842369,74.56213511259386,75.56296914095083,76.56380316930779,77.56463719766475,78.56547122602171,79.56630525437868,80.56713928273564,81.5679733110926,82.56880733944956,83.56964136780653,84.57047539616349,85.57130942452045,86.57214345287741,87.57297748123437,88.57381150959134,89.5746455379483,90.57547956630526,91.57631359466222,92.57714762301919,93.57798165137615,94.57881567973311,95.57964970809007,96.58048373644704,97.581317764804,98.58215179316096,99.58298582151792,100.58381984987489,101.58465387823185,102.58548790658881,103.58632193494577,104.58715596330273,105.5879899916597,106.58882402001666,107.58965804837362,108.59049207673058,109.59132610508755,110.59216013344451,111.59299416180147,112.59382819015843,113.5946622185154,114.59549624687236,115.59633027522932,116.59716430358628,117.59799833194324,118.59883236030021,119.59966638865717,120.60050041701413,121.6013344453711,122.60216847372806,123.60300250208502,124.60383653044198,125.60467055879894,126.6055045871559,127.60633861551287,128.60717264386983,129.6080066722268,130.60884070058376,131.60967472894072,132.61050875729768,133.61134278565464,134.6121768140116,135.61301084236857,136.61384487072564,137.6146788990826,138.61551292743957,139.61634695579653,140.6171809841535,141.61801501251045,142.61884904086742,143.61968306922438,144.62051709758134,145.6213511259383,146.62218515429527,147.62301918265223,148.6238532110092,149.62468723936615,150.62552126772312,151.62635529608008,152.62718932443704,153.628023352794,154.62885738115097,155.62969140950793,156.6305254378649,157.63135946622185,158.63219349457881,159.63302752293578,160.63386155129274,161.6346955796497,162.63552960800666,163.63636363636363,164.6371976647206,165.63803169307755,166.6388657214345,167.63969974979148,168.64053377814844,169.6413678065054,170.64220183486236,171.64303586321932,172.6438698915763,173.64470391993325,174.6455379482902,175.64637197664717,176.64720600500414,177.6480400333611,178.64887406171806,179.64970809007502,180.65054211843199,181.65137614678895,182.6522101751459,183.65304420350287,184.65387823185984,185.6547122602168,186.65554628857376,187.65638031693072,188.65721434528768,189.65804837364465,190.6588824020016,191.65971643035857,192.66055045871553,193.6613844870725,194.66221851542946,195.66305254378642,196.66388657214338,197.66472060050035,198.6655546288573,199.66638865721427,200.66722268557123,201.6680567139283,202.66889074228527,203.66972477064223,204.6705587989992,205.67139282735616,206.67222685571312,207.67306088407008,208.67389491242704,209.674728940784,210.67556296914097,211.67639699749793,212.6772310258549,213.67806505421186,214.67889908256882,215.67973311092578,216.68056713928274,217.6814011676397,218.68223519599667,219.68306922435363,220.6839032527106,221.68473728106756,222.68557130942452,223.68640533778148,224.68723936613844,225.6880733944954,226.68890742285237,227.68974145120933,228.6905754795663,229.69140950792325,230.69224353628022,231.69307756463718,232.69391159299414,233.6947456213511,234.69557964970807,235.69641367806503,236.697247706422,237.69808173477895,238.69891576313591,239.69974979149288,240.70058381984984,241.7014178482068,242.70225187656376,243.70308590492073,244.7039199332777,245.70475396163465,246.7055879899916,247.70642201834858,248.70725604670554,249.7080900750625,250.70892410341946,251.70975813177643,252.7105921601334,253.71142618849035,254.7122602168473,255.71309424520427,256.71392827356124,257.7147623019182,258.71559633027516,259.7164303586321,260.7172643869891,261.71809841534605,262.718932443703,263.71976647206,264.72060050041705,265.721434528774,266.722268557131,267.72310258548794,268.7239366138449,269.72477064220186,270.7256046705588,271.7264386989158,272.72727272727275,273.7281067556297,274.7289407839867,275.72977481234363,276.7306088407006,277.73144286905756,278.7322768974145,279.7331109257715,280.73394495412845,281.7347789824854,282.73561301084237,283.73644703919933,284.7372810675563,285.73811509591326,286.7389491242702,287.7397831526272,288.74061718098415,289.7414512093411,290.74228523769807,291.74311926605503,292.743953294412,293.74478732276896,294.7456213511259,295.7464553794829,296.74728940783984,297.7481234361968,298.74895746455377,299.74979149291073,300.7506255212677,301.75145954962466,302.7522935779816,303.7531276063386,304.75396163469554,305.7547956630525,306.75562969140947,307.75646371976643,308.7572977481234,309.75813177648035,310.7589658048373,311.7597998331943,312.76063386155124,313.7614678899082,314.76230191826517,315.7631359466221,316.7639699749791,317.76480400333605,318.765638031693,319.76647206005,320.76730608840694,321.7681401167639,322.76897414512086,323.7698081734778,324.7706422018348,325.77147623019175,326.7723102585487,327.7731442869057,328.77397831526264,329.7748123436197,330.7756463719767,331.77648040033364,332.7773144286906,333.77814845704756,334.7789824854045,335.7798165137615,336.78065054211845,337.7814845704754,338.7823185988324,339.78315262718934,340.7839866555463,341.78482068390326,342.7856547122602,343.7864887406172,344.78732276897415,345.7881567973311,346.7889908256881,347.78982485404504,348.790658882402,349.79149291075896,350.7923269391159,351.7931609674729,352.79399499582985,353.7948290241868,354.7956630525438,355.79649708090074,356.7973311092577,357.79816513761466,358.7989991659716,359.7998331943286,360.80066722268555,361.8015012510425,362.8023352793995,363.80316930775643,364.8040033361134,365.80483736447036,366.8056713928273,367.8065054211843,368.80733944954125,369.8081734778982,370.80900750625517,371.80984153461213,372.8106755629691,373.81150959132606,374.812343619683,375.81317764804,376.81401167639694,377.8148457047539,378.81567973311087,379.81651376146783,380.8173477898248,381.81818181818176,382.8190158465387,383.8198498748957,384.82068390325264,385.8215179316096,386.82235195996657,387.82318598832353,388.8240200166805,389.82485404503745,390.8256880733944,391.8265221017514,392.82735613010846,393.8281901584654,394.8290241868224,395.82985821517934,396.8306922435363,397.83152627189327,398.83236030025023,399.8331943286072,400.83402835696415,401.8348623853211,402.8356964136781,403.83653044203504,404.837364470392,405.83819849874897,406.8390325271059,407.8398665554629,408.84070058381985,409.8415346121768,410.8423686405338,411.84320266889074,412.8440366972477,413.84487072560466,414.8457047539616,415.8465387823186,416.84737281067555,417.8482068390325,418.8490408673895,419.84987489574644,420.8507089241034,421.85154295246036,422.8523769808173,423.8532110091743,424.85404503753125,425.8548790658883,426.8557130942452,427.85654712260225,428.8573811509591,429.8582151793162,430.859049207673,431.8598832360301,432.86071726438695,433.861551292744,434.8623853211009,435.86321934945795,436.8640533778148,437.8648874061719,438.8657214345287,439.8665554628858,440.86738949124265,441.8682235195997,442.8690575479566,443.86989157631365,444.8707256046705,445.8715596330276,446.8723936613844,447.8732276897415,448.87406171809835,449.8748957464554,450.87572977481227,451.87656380316935,452.8773978315262,453.8782318598833,454.8790658882401,455.8798999165972,456.88073394495405,457.8815679733111,458.88240200166797,459.88323603002505,460.8840700583819,461.88490408673897,462.8857381150958,463.8865721434529,464.88740617180974,465.8882402001668,466.88907422852367,467.88990825688074,468.8907422852376,469.89157631359467,470.8924103419515,471.8932443703086,472.89407839866544,473.8949124270225,474.89574645537937,475.89658048373644,476.8974145120933,477.89824854045037,478.8990825688072,479.8999165971643,480.90075062552114,481.9015846538782,482.90241868223507,483.90325271059214,484.904086738949,485.90492076730607,486.9057547956629,487.90658882402,488.90742285237684,489.9082568807339,490.909090909091,491.90992493744784,492.9107589658049,493.91159299416177,494.91242702251884,495.9132610508757,496.91409507923277,497.9149291075896,498.9157631359467,499.91659716430354,500.9174311926606,501.91826522101746,502.91909924937454,503.9199332777314,504.92076730608846,505.9216013344453,506.9224353628024,507.92326939115924,508.9241034195163,509.92493744787316,510.92577147623024,511.9266055045871,512.9274395329442,513.928273561301,514.9291075896581,515.9299416180149,516.930775646372,517.9316096747289,518.9324437030859,519.9332777314428,520.9341117597999,521.9349457881567,522.9357798165138,523.9366138448706,524.9374478732277,525.9382819015846,526.9391159299416,527.9399499582985,528.9407839866556,529.9416180150124,530.9424520433695,531.9432860717263,532.9441201000834,533.9449541284403,534.9457881567973,535.9466221851542,536.9474562135113,537.9482902418681,538.9491242702252,539.949958298582,540.9507923269391,541.951626355296,542.952460383653,543.9532944120099,544.954128440367,545.9549624687238,546.9557964970809,547.9566305254377,548.9574645537948,549.9582985821517,550.9591326105087,551.9599666388656,552.9608006672227,553.9616346955797,554.9624687239366,555.9633027522937,556.9641367806505,557.9649708090076,558.9658048373644,559.9666388657215,560.9674728940784,561.9683069224354,562.9691409507923,563.9699749791494,564.9708090075062,565.9716430358633,566.9724770642201,567.9733110925772,568.974145120934,569.9749791492911,570.975813177648,571.976647206005,572.9774812343619,573.978315262719,574.9791492910758,575.9799833194329,576.9808173477898,577.9816513761468,578.9824854045037,579.9833194328608,580.9841534612176,581.9849874895747,582.9858215179315,583.9866555462886,584.9874895746455,585.9883236030025,586.9891576313594,587.9899916597165,588.9908256880733,589.9916597164304,590.9924937447872,591.9933277731443,592.9941618015011,593.9949958298582,594.9958298582151,595.9966638865722,596.997497914929,597.9983319432861,598.9991659716429,600.0)
altd  <- c(297)
x <- seq.int((length(p)-1)/2*-1,(length(p)-1)/2)
pdf('T2P_HA_hg38_callpeaks1_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) : 297',bty='n')
dev.off()