Dear all,
two set of points (seti and setj) that crashed the intersectn function.
seti <- structure(c(0.358272604860056, -1.20484799657496, 1.29498325419776, 1.68462574525228, 0.267374703154746, 0.0253534823757413, 0.444581979415118, 0.466238506171745, 1.23158702433283, 3.15634835946662, 0.75838298428293, 0.687781929513476, -0.904073579851362, -1.70734908735508, 0.286297204371058, -0.0491423959774112, 0.644111314548592, 0.843185896124834, 0.932497674386085, 0.414091323082757, -0.320831434021923, 0.725602727788623, -0.175403130605532, -0.548667415079363, 2.25526259738952, 1.70139525733449, 1.64080118846112, 0.0270390897711762, -0.65691629563122, -0.182382368803141, 0.195619695612384, 0.765261027588283, 0.855983581172035, 0.943319016154535, 1.37316976699112, 0.3838875921458, -1.64536588273897, -1.54357732705367, 0.81912831760118, 0.864665001581989, 5.00494102318079, -0.00122143167880179, 0.31246812890208, -0.116941239436589, 1.16561128533832, -0.520240389471783, -0.700602479928758, 0.601042026387928, 0.0945038611561625, 1.25832168622729, 2.37420983028853, 1.32718051604816, 1.57033997455353, 0.535179216295045, 2.13973937768414, -1.06033104834016, 0.106643209171689, -0.56741529796082, 0.571237333061748, 0.534055354676556, 0.327551962623116, 0.0243034983210812, 0.695035374920681, 0.885102205392498, 0.477036860299695, -0.116963526081052, 0.0488363605376432, 1.67364122725686, 0.759227174616987, 0.855332260662582, 0.579007486134618, 0.289942306691326, 0.118636049598542, 0.515129755634194, 0.952823124262757, 0.366143860546479, 0.0788448450395415, 1.62784110780096, 1.94380937427165, 1.46510115265915, -0.403345989179986, -0.152281265941716, -1.13165159598073, 0.668562735895464, -1.10272870218522, -3.52432543945342, 0.0753029258797732, 0.0119655651022515, -0.110999007552025, 0.074154514727245, 2.11473786949572, -0.539726384059189, 0.588204251361066, 0.167984770894866, -1.00964604843849, 0.272075113173542, 0.555872442001726, -0.0384417531852668, -1.52663312039498, -1.58322541450131, -0.605286005389482, 3.12082101737434, 1.69944663814255, -1.28606195916159, -0.520099437420922, -2.29582679572681, -0.395844800196698, -0.715382909810451, 2.16049680054357, 1.25711142976395, -0.193622318008471, -0.162704310062189, -0.296061963170061, 0.239926034090013, 0.342994872861004, 0.198079478062588, 0.865170484167622, -0.399494778143766, -0.965881512655237, -0.970680950028835, 1.08100380813461, 0.210049782110786, -0.864944566136088, -0.288906624176471, 2.99497065188104, -0.399536132426651, 0.0876228130815711, -0.633121061344099, -0.0557392226201585, -0.446098745000371, -0.892672722275711, -0.562522623331824, -0.747286423701914, -1.11607188661642, 0.629594432360898, 0.997231060888534, 0.0819699850465393, -1.24159443111284, 0.289399976624292, -1.28836232423125, 0.761672858164413, 1.47529642423181, -1.70149897784672, -1.53617601769864, 0.190756418644545, -0.831088588711718, -0.618249158228455, -1.25635510103742, 0.134468139651196, 0.665726789566798, 1.76362649496691, 0.083832472444175, -0.932008956992783, 0.152544600779074, -0.415973222985532, -0.146352047060523, -0.697333683637234, -1.36268842983293, -0.880136811861489, 0.385591007250671, 0.871342079621277, -0.47856324004891, 0.087212128837941, -0.57518851233131, 0.107381917921079, 1.49325196688771, -0.133057756830572, -0.51497261781287, 0.410446120585204, -8.05280794333236, -0.155138580110497, -0.0182976138290733, 0.30924188955698, -1.14862983963887, -0.345477817683903, -1.10455386319915, -2.26439807047638, -6.62386103393725, 0.123229108537584, 0.737871909405577, -0.896586352287983, -1.25388657388777, 0.851645104827465, -0.105122917977835, 0.512851446407223, 2.13035406634419, 1.64759437060146, -0.134747976977599, -1.72923329658709, -0.437656804001136, 0.981757579814104, 0.0366600221530648, -1.3455960869297, -3.44084634882656, -3.45770557465564, 0.856135743687549, 0.62088185641719, 0.644388773986157, -0.0494108792351281, 0.799250641720743, 1.05070895435017, 0.581513160096399, 1.29691945663991, 0.38138808993837, -0.593424922001206, -0.191751932340453, -1.9657453724823, -1.47539080780684, -5.58912780569294, 0.558068763333632, 0.49375232760385, 0.847849487410779, 1.3392725471067, 1.31462186042328, 0.898332018057788, 1.06164689889648, 0.405227542072533, -0.146457109104645, 1.2433360788338, -0.0147273660826915, -0.859916995583392, -0.0594738828269227, -1.94397184170948, -1.4486813014787, -0.297426515592182, -0.460636076764516, -0.0822671636073955, 0.0511287115571281, 0.472842009143131, -0.404318202985313, 0.367455473094483, 0.362041853744161, 0.328641633670342, -0.252540914156587, -0.259780837342663, -1.27336208334175, -0.497061451414424, 0.297641295080788, 0.146766446038432, 0.721419041316281, -0.45085233021601, 0.155526473279261, 0.191986879132848, 0.0318005821104792, -0.108020003769011, -1.7252986154211, -0.953037108123469, -1.69593374965947, -0.901473209272673, -0.571549286984464, -0.483525392206581, -0.492440972237434, 0.427344765192214, 8.83190026265947, 0.370931751709923, 1.27263201540509, 0.723330102987748, 1.68848366880681, 0.709549116220173, 0.794076148447284, 1.69825357894899, 0.0641288315786146, 0.142745333237612, 0.311418880881956, 0.113988189528279, 0.689762962857379, 0.503819292501282, -0.886505600893274, -0.161830588222903, 1.06998982449888, 0.36576934315043, -0.582561326549912, 2.71063529328302, 1.36599488578331, 0.408066754377194, 0.180532788948155, -0.14492928433536, 2.46283819344402, 1.03214292596749, 0.180361246081542, -0.0963599471614522, -0.341610626855961, -0.37851612416752, -0.843471747346966, -0.309701366715187, -0.774967420794512, -0.335989120441702, -0.670800615024179, 0.431878984018924, -0.290512762715649, 3.21038072554745, 2.53685687474027, 2.89482579144518, 0.990714210126454, 0.994755961929098, 1.27648383552731, 1.09093308657261, 1.90929092408626, 1.48190791868422, -1.1024145716157, 0.00353677124662614, -0.32885344891519, -0.925610911973686, 1.58316484269382, 2.40297589683478, 1.09163424968888, 4.42127189557637, 0.659704659090661, 0.461487932464338, 0.315958417657262, 0.247764057184193, -1.1822827534929, -0.804620973583799, -0.979231539787127, -0.552748151527273, -1.1450421650233, -0.67109798478689, -0.245085657093046, -0.252357283394644, 2.8481359326713, 0.809494309936268, -0.529706720567991, -0.621658350231149, -0.532842859421647, -0.862793145153932, 1.0053900922323, 1.39828689657999, -0.716021711481005, 0.522280237186233, 1.94210496927092, 1.88671908720816, 1.77402689973947, 0.402981445026845, 1.22575376164961, -0.0569126389457965, -0.928262810898515), .Dim = c(84L, 4L), .Dimnames = list( NULL, c("PC1", "PC2", "PC3", "PC4"))) setj <- structure(c(2.82200108251569, 1.35919560909985, 0.151682833516596, 0.444581979415118, 1.23158702433283, 1.61776191520154, 3.15634835946662, 0.687781929513476, 0.334530106394761, 0.0986071805998422, 5.89345446938327, -0.904073579851362, -0.241859920621936, -0.764808683171908, 0.286297204371058, 1.2777976182106, -1.27505179517151, -0.102933954987627, 0.38870349471695, -0.0486712943161579, -0.320831434021923, 0.725602727788623, 0.402601938714911, 0.243238330802982, -0.548667415079363, -0.860543631112881, 2.25526259738952, 0.185894672737079, 0.593210217613533, -0.0405118622977247, 1.20388652796361, 0.353290755648112, 0.15181083496542, 1.0695312160702, 0.895769674982329, 1.23960579356796, 1.26794958990807, 1.70861593654136, 1.34183572652178, 1.0882852799683, 1.53264479202947, -1.31530711548402, 0.171789583353073, 0.0660859223941853, -0.221059833268035, 0.81912831760118, 0.864665001581989, -1.10087292033274, -1.46961400346754, 1.6377583211111, 5.66371421738663, 5.00494102318079, -0.00122143167880179, 0.31246812890208, 1.16561128533832, 0.126701266380934, -0.520240389471783, -0.555576701343734, -0.319554440278763, -0.700602479928758, 0.48701212934822, 0.257197029002669, -0.596767560728617, 0.601042026387928, 1.26221479363639, 0.888031130601723, -0.129713184404334, 2.37420983028853, 1.32718051604816, 1.80012946283055, 1.53274358228525, 1.57033997455353, -1.99818090611529, 1.48556436876932, 0.531494626094085, 2.13973937768414, -0.942544794064536, -1.66786907088901, 2.5753147449154, 0.571237333061748, 0.473494952215379, 1.59064567329537, 0.320510190040896, 0.180909589450399, 0.743893723710091, -0.131891158668803, 0.660840517182868, 0.500108635683552, 0.687418781556543, 0.380829964520496, -0.116963526081052, 0.520161258511411, 0.850104378747012, -0.33077652792232, 1.08579840820022, 0.319341771814442, -0.0595381223456543, -0.604687751439975, 0.186454729154851, 0.348344546345593, 1.72427445715258, 0.248432655514351, 0.515129755634194, 0.952823124262757, 0.676295296066641, 1.46510115265915, 0.564057339362061, -0.403345989179986, 9.1934949678319, 2.01700064974679, 0.921086450400769, 0.392157463405524, 0.0770152078144975, 2.11473786949572, 0.588204251361066, 2.40916142071922, 0.167984770894866, 0.272075113173542, -1.53584072003236, -1.55297064680075, 0.448285536640726, 0.555872442001726, -1.72540031590694, -2.19309542929476, -1.52663312039498, -1.20824479942059, -2.433327713299, -2.00530587932138, -0.533513779744364, 0.172345938616453, -0.520099437420922, -2.29582679572681, -1.20243525528554, -0.678090344226059, -0.715382909810451, -1.12713298808856, 2.16049680054357, 1.71160752855554, -0.622974145623228, 0.98308492780991, 1.94835286550069, 0.149528552589293, 0.104156429548161, 0.507704727710552, -1.24032673859453, -0.675825867451333, 0.485605227351796, -0.17447561943507, -0.660563922712825, 0.842538198657264, -0.306588216311278, -0.0575696643566713, -0.951807530061683, -0.650138601770902, -0.173178804332879, -0.864944566136088, -0.288906624176471, -2.53387248115194, -0.697827486150308, -0.278436797717285, -1.22039311472963, 2.99497065188104, -0.399536132426651, 0.0876228130815711, -0.0557392226201585, -0.88924044086792, -0.446098745000371, -0.633695223767932, 0.0470490530473751, -0.892672722275711, -0.460615220189869, -0.736336493537762, -0.843892966009409, -0.562522623331824, -1.02362598209792, -0.551601260044739, 0.599539906590114, 0.629594432360898, 0.997231060888534, 0.485771803753205, 0.465287304040667, 0.0819699850465393, -0.481323490469697, -1.13831848701614, -1.12844850579502, 0.289399976624292, -0.169603735787626, -0.35823367736356, 0.0851396130379308, -1.70149897784672, -1.16802156856246, -0.536272360525566, -0.926637558987245, -0.6952470256221, 0.506160737095016, -0.134323196466558, -0.802386094175286, -0.926915587257415, -1.20466629067429, -0.27660210784601, 0.665726789566798, 2.32133366019172, -1.53160552935134, -0.0112852948959791, 0.647043927823146, 0.146007978731007, -0.0813627769020614, 0.168459614593366, -0.667469551299468, 0.155643684623134, -0.354389579720782, -1.2628746532883, -1.36268842983293, -0.880136811861489, 0.474456449878343, -0.57518851233131, -1.51112599795831, 0.107381917921079, 4.66364376034552, -0.384266247406289, 0.846418029251948, -0.22009092358684, -0.997440207147985, -0.345477817683903, -2.26439807047638, -0.234506222512697, -6.62386103393725, 0.737871909405577, -0.778621877752637, 0.166305510315177, -5.59972422043153, -0.896586352287983, -0.837128030821426, -1.585465072187, 0.851645104827465, -1.57543205970367, -2.62688736400891, 0.0591215339994518, -0.024300999166472, 2.02866605867842, -1.72923329658709, -0.437656804001136, 0.479322129923222, 0.100843175865097, 0.0366600221530648, -0.436004698474075, -1.3455960869297, 0.148221366026183, 0.716966649787764, 0.709181425940949, 0.655038905013752, 1.29313116432267, 1.23105776336634, 1.23001269273498, 0.656220197803928, 0.999354061686446, 1.23085164642881, 1.22383640366401, 1.03698972088398, 0.742455734446162, 1.45531939121849, 0.454223822629539, 0.157236583019253, -0.321466144643529, 0.284225536207856, -1.9657453724823, -1.47539080780684, -1.7773213083232, -2.04219023699656, 0.125546070883124, -6.26293033574947, -5.58912780569294, 0.558068763333632, 0.49375232760385, 1.3392725471067, 1.11130249415624, 1.31462186042328, 1.47134408703615, 1.0349801329787, 0.898332018057788, 1.34573393746072, 1.16865411023886, 0.377599308702714, 1.06164689889648, 0.213406209437208, 0.396278635577784, 0.0939829261680339, 1.2433360788338, -0.0147273660826915, -0.258496998206768, -0.375514079601975, -0.859916995583392, -0.933607480932669, -0.0594615469519774, 0.136337999331739, -1.94397184170948, -0.896758861460939, -1.02383958152424, 0.371762021723303, -0.0822671636073955, 0.493318706573885, 0.404478120115991, 0.0903583995460028, 0.625943168112428, 0.315765966022222, -0.427392233426861, 0.0439779924120345, 0.214587660795556, 0.620127856146004, 0.308965955968798, -0.252540914156587, -0.443539439208621, 0.411482696746033, 1.58080791547358, 0.265311705322956, -0.0122047622298842, 0.311258968120469, -0.225584646217309, 0.226672112753017, 0.631336149439883, 1.17481786697446, -4.54951331720738, 0.155526473279261, 0.191986879132848, -1.90879753298857, -1.69593374965947, 0.0517164811402898, -0.901473209272673, -5.64304520553749, -1.18990827347873, 0.555374339856875, 0.639314953308649, 1.2061775875032, 0.709549116220173, 1.69825357894899, -1.48644318239666, 0.0641288315786146, 0.311418880881956, 2.16765382172273, -0.379056783545116, 6.18537317221478, 0.113988189528279, 1.08647917462704, 0.88738427969982, 0.503819292501282, 3.11496486767917, 1.0398391049488, -0.399057178797581, -0.603815253238222, 0.169905537296221, 2.71063529328302, 1.36599488578331, 0.206187497307935, -0.661818165985605, 0.180532788948155, 0.398130288771763, -0.14492928433536, -0.854763279373952, -0.941429220320565, -0.744253363580887, -0.606386323624282, -0.365849632546015, 0.127169978334056, -0.699898030394812, -1.14236866347815, -1.15743970607497, -0.265968068332297, -0.767263591550119, -0.990266009736163, -0.771623104310933, -0.699252162661518, 0.987164356141447, -0.442784898298253, -0.466255426356159, -1.06331222422191, 3.21038072554745, 2.53685687474027, 1.82191358860395, 2.46995657780243, -1.08316840066793, 2.13517453833715, 2.89482579144518, 0.990714210126454, 0.994755961929098, 1.09093308657261, 0.686305385410004, 1.90929092408626, 0.735166914427706, 1.24278216282647, 1.48190791868422, 0.681426483136772, 0.528544691130735, 0.239250822775976, -1.1024145716157, -1.67642295805977, -0.103123469076745, -0.340611370270726, -0.925610911973686, 1.58316484269382, 1.64466830852712, 1.57429751091667, 2.40297589683478, 0.964172086790592, 0.451319193891215, 0.813877864509577, 4.42127189557637, 0.473679005820603, 0.495031596240481, 1.77707550244555, 0.247764057184193, -1.51554496850915, -1.03529116592834, -1.06539760209548, -0.913002683554151, -0.552919271759119, -0.785563303530853, -1.0022735975053, -0.822285129655764, -0.841274727256044, -0.699482890460832, -0.245085657093046, -0.334638139430823, -1.12096055262357, 1.88955017801555, -0.633220478744723, -0.356873425230179, -0.365111388875891, -0.465715496510229, -1.29460446985604, -0.511318347340189, -0.668521147250858, 3.82329082589864, 1.0053900922323, 1.39828689657999, 2.72813716119812, 1.77402689973947, 1.07108451445419, 0.402981445026845, 0.766481474313542, -0.590497791200817), .Dim = c(110L, 4L), .Dimnames = list(NULL, c("PC1", "PC2", "PC3", "PC4")))
Dear all,
two set of points (seti and setj) that crashed the intersectn function.
seti <- structure(c(0.358272604860056, -1.20484799657496, 1.29498325419776, 1.68462574525228, 0.267374703154746, 0.0253534823757413, 0.444581979415118, 0.466238506171745, 1.23158702433283, 3.15634835946662, 0.75838298428293, 0.687781929513476, -0.904073579851362, -1.70734908735508, 0.286297204371058, -0.0491423959774112, 0.644111314548592, 0.843185896124834, 0.932497674386085, 0.414091323082757, -0.320831434021923, 0.725602727788623, -0.175403130605532, -0.548667415079363, 2.25526259738952, 1.70139525733449, 1.64080118846112, 0.0270390897711762, -0.65691629563122, -0.182382368803141, 0.195619695612384, 0.765261027588283, 0.855983581172035, 0.943319016154535, 1.37316976699112, 0.3838875921458, -1.64536588273897, -1.54357732705367, 0.81912831760118, 0.864665001581989, 5.00494102318079, -0.00122143167880179, 0.31246812890208, -0.116941239436589, 1.16561128533832, -0.520240389471783, -0.700602479928758, 0.601042026387928, 0.0945038611561625, 1.25832168622729, 2.37420983028853, 1.32718051604816, 1.57033997455353, 0.535179216295045, 2.13973937768414, -1.06033104834016, 0.106643209171689, -0.56741529796082, 0.571237333061748, 0.534055354676556, 0.327551962623116, 0.0243034983210812, 0.695035374920681, 0.885102205392498, 0.477036860299695, -0.116963526081052, 0.0488363605376432, 1.67364122725686, 0.759227174616987, 0.855332260662582, 0.579007486134618, 0.289942306691326, 0.118636049598542, 0.515129755634194, 0.952823124262757, 0.366143860546479, 0.0788448450395415, 1.62784110780096, 1.94380937427165, 1.46510115265915, -0.403345989179986, -0.152281265941716, -1.13165159598073, 0.668562735895464, -1.10272870218522, -3.52432543945342, 0.0753029258797732, 0.0119655651022515, -0.110999007552025, 0.074154514727245, 2.11473786949572, -0.539726384059189, 0.588204251361066, 0.167984770894866, -1.00964604843849, 0.272075113173542, 0.555872442001726, -0.0384417531852668, -1.52663312039498, -1.58322541450131, -0.605286005389482, 3.12082101737434, 1.69944663814255, -1.28606195916159, -0.520099437420922, -2.29582679572681, -0.395844800196698, -0.715382909810451, 2.16049680054357, 1.25711142976395, -0.193622318008471, -0.162704310062189, -0.296061963170061, 0.239926034090013, 0.342994872861004, 0.198079478062588, 0.865170484167622, -0.399494778143766, -0.965881512655237, -0.970680950028835, 1.08100380813461, 0.210049782110786, -0.864944566136088, -0.288906624176471, 2.99497065188104, -0.399536132426651, 0.0876228130815711, -0.633121061344099, -0.0557392226201585, -0.446098745000371, -0.892672722275711, -0.562522623331824, -0.747286423701914, -1.11607188661642, 0.629594432360898, 0.997231060888534, 0.0819699850465393, -1.24159443111284, 0.289399976624292, -1.28836232423125, 0.761672858164413, 1.47529642423181, -1.70149897784672, -1.53617601769864, 0.190756418644545, -0.831088588711718, -0.618249158228455, -1.25635510103742, 0.134468139651196, 0.665726789566798, 1.76362649496691, 0.083832472444175, -0.932008956992783, 0.152544600779074, -0.415973222985532, -0.146352047060523, -0.697333683637234, -1.36268842983293, -0.880136811861489, 0.385591007250671, 0.871342079621277, -0.47856324004891, 0.087212128837941, -0.57518851233131, 0.107381917921079, 1.49325196688771, -0.133057756830572, -0.51497261781287, 0.410446120585204, -8.05280794333236, -0.155138580110497, -0.0182976138290733, 0.30924188955698, -1.14862983963887, -0.345477817683903, -1.10455386319915, -2.26439807047638, -6.62386103393725, 0.123229108537584, 0.737871909405577, -0.896586352287983, -1.25388657388777, 0.851645104827465, -0.105122917977835, 0.512851446407223, 2.13035406634419, 1.64759437060146, -0.134747976977599, -1.72923329658709, -0.437656804001136, 0.981757579814104, 0.0366600221530648, -1.3455960869297, -3.44084634882656, -3.45770557465564, 0.856135743687549, 0.62088185641719, 0.644388773986157, -0.0494108792351281, 0.799250641720743, 1.05070895435017, 0.581513160096399, 1.29691945663991, 0.38138808993837, -0.593424922001206, -0.191751932340453, -1.9657453724823, -1.47539080780684, -5.58912780569294, 0.558068763333632, 0.49375232760385, 0.847849487410779, 1.3392725471067, 1.31462186042328, 0.898332018057788, 1.06164689889648, 0.405227542072533, -0.146457109104645, 1.2433360788338, -0.0147273660826915, -0.859916995583392, -0.0594738828269227, -1.94397184170948, -1.4486813014787, -0.297426515592182, -0.460636076764516, -0.0822671636073955, 0.0511287115571281, 0.472842009143131, -0.404318202985313, 0.367455473094483, 0.362041853744161, 0.328641633670342, -0.252540914156587, -0.259780837342663, -1.27336208334175, -0.497061451414424, 0.297641295080788, 0.146766446038432, 0.721419041316281, -0.45085233021601, 0.155526473279261, 0.191986879132848, 0.0318005821104792, -0.108020003769011, -1.7252986154211, -0.953037108123469, -1.69593374965947, -0.901473209272673, -0.571549286984464, -0.483525392206581, -0.492440972237434, 0.427344765192214, 8.83190026265947, 0.370931751709923, 1.27263201540509, 0.723330102987748, 1.68848366880681, 0.709549116220173, 0.794076148447284, 1.69825357894899, 0.0641288315786146, 0.142745333237612, 0.311418880881956, 0.113988189528279, 0.689762962857379, 0.503819292501282, -0.886505600893274, -0.161830588222903, 1.06998982449888, 0.36576934315043, -0.582561326549912, 2.71063529328302, 1.36599488578331, 0.408066754377194, 0.180532788948155, -0.14492928433536, 2.46283819344402, 1.03214292596749, 0.180361246081542, -0.0963599471614522, -0.341610626855961, -0.37851612416752, -0.843471747346966, -0.309701366715187, -0.774967420794512, -0.335989120441702, -0.670800615024179, 0.431878984018924, -0.290512762715649, 3.21038072554745, 2.53685687474027, 2.89482579144518, 0.990714210126454, 0.994755961929098, 1.27648383552731, 1.09093308657261, 1.90929092408626, 1.48190791868422, -1.1024145716157, 0.00353677124662614, -0.32885344891519, -0.925610911973686, 1.58316484269382, 2.40297589683478, 1.09163424968888, 4.42127189557637, 0.659704659090661, 0.461487932464338, 0.315958417657262, 0.247764057184193, -1.1822827534929, -0.804620973583799, -0.979231539787127, -0.552748151527273, -1.1450421650233, -0.67109798478689, -0.245085657093046, -0.252357283394644, 2.8481359326713, 0.809494309936268, -0.529706720567991, -0.621658350231149, -0.532842859421647, -0.862793145153932, 1.0053900922323, 1.39828689657999, -0.716021711481005, 0.522280237186233, 1.94210496927092, 1.88671908720816, 1.77402689973947, 0.402981445026845, 1.22575376164961, -0.0569126389457965, -0.928262810898515), .Dim = c(84L, 4L), .Dimnames = list( NULL, c("PC1", "PC2", "PC3", "PC4"))) setj <- structure(c(2.82200108251569, 1.35919560909985, 0.151682833516596, 0.444581979415118, 1.23158702433283, 1.61776191520154, 3.15634835946662, 0.687781929513476, 0.334530106394761, 0.0986071805998422, 5.89345446938327, -0.904073579851362, -0.241859920621936, -0.764808683171908, 0.286297204371058, 1.2777976182106, -1.27505179517151, -0.102933954987627, 0.38870349471695, -0.0486712943161579, -0.320831434021923, 0.725602727788623, 0.402601938714911, 0.243238330802982, -0.548667415079363, -0.860543631112881, 2.25526259738952, 0.185894672737079, 0.593210217613533, -0.0405118622977247, 1.20388652796361, 0.353290755648112, 0.15181083496542, 1.0695312160702, 0.895769674982329, 1.23960579356796, 1.26794958990807, 1.70861593654136, 1.34183572652178, 1.0882852799683, 1.53264479202947, -1.31530711548402, 0.171789583353073, 0.0660859223941853, -0.221059833268035, 0.81912831760118, 0.864665001581989, -1.10087292033274, -1.46961400346754, 1.6377583211111, 5.66371421738663, 5.00494102318079, -0.00122143167880179, 0.31246812890208, 1.16561128533832, 0.126701266380934, -0.520240389471783, -0.555576701343734, -0.319554440278763, -0.700602479928758, 0.48701212934822, 0.257197029002669, -0.596767560728617, 0.601042026387928, 1.26221479363639, 0.888031130601723, -0.129713184404334, 2.37420983028853, 1.32718051604816, 1.80012946283055, 1.53274358228525, 1.57033997455353, -1.99818090611529, 1.48556436876932, 0.531494626094085, 2.13973937768414, -0.942544794064536, -1.66786907088901, 2.5753147449154, 0.571237333061748, 0.473494952215379, 1.59064567329537, 0.320510190040896, 0.180909589450399, 0.743893723710091, -0.131891158668803, 0.660840517182868, 0.500108635683552, 0.687418781556543, 0.380829964520496, -0.116963526081052, 0.520161258511411, 0.850104378747012, -0.33077652792232, 1.08579840820022, 0.319341771814442, -0.0595381223456543, -0.604687751439975, 0.186454729154851, 0.348344546345593, 1.72427445715258, 0.248432655514351, 0.515129755634194, 0.952823124262757, 0.676295296066641, 1.46510115265915, 0.564057339362061, -0.403345989179986, 9.1934949678319, 2.01700064974679, 0.921086450400769, 0.392157463405524, 0.0770152078144975, 2.11473786949572, 0.588204251361066, 2.40916142071922, 0.167984770894866, 0.272075113173542, -1.53584072003236, -1.55297064680075, 0.448285536640726, 0.555872442001726, -1.72540031590694, -2.19309542929476, -1.52663312039498, -1.20824479942059, -2.433327713299, -2.00530587932138, -0.533513779744364, 0.172345938616453, -0.520099437420922, -2.29582679572681, -1.20243525528554, -0.678090344226059, -0.715382909810451, -1.12713298808856, 2.16049680054357, 1.71160752855554, -0.622974145623228, 0.98308492780991, 1.94835286550069, 0.149528552589293, 0.104156429548161, 0.507704727710552, -1.24032673859453, -0.675825867451333, 0.485605227351796, -0.17447561943507, -0.660563922712825, 0.842538198657264, -0.306588216311278, -0.0575696643566713, -0.951807530061683, -0.650138601770902, -0.173178804332879, -0.864944566136088, -0.288906624176471, -2.53387248115194, -0.697827486150308, -0.278436797717285, -1.22039311472963, 2.99497065188104, -0.399536132426651, 0.0876228130815711, -0.0557392226201585, -0.88924044086792, -0.446098745000371, -0.633695223767932, 0.0470490530473751, -0.892672722275711, -0.460615220189869, -0.736336493537762, -0.843892966009409, -0.562522623331824, -1.02362598209792, -0.551601260044739, 0.599539906590114, 0.629594432360898, 0.997231060888534, 0.485771803753205, 0.465287304040667, 0.0819699850465393, -0.481323490469697, -1.13831848701614, -1.12844850579502, 0.289399976624292, -0.169603735787626, -0.35823367736356, 0.0851396130379308, -1.70149897784672, -1.16802156856246, -0.536272360525566, -0.926637558987245, -0.6952470256221, 0.506160737095016, -0.134323196466558, -0.802386094175286, -0.926915587257415, -1.20466629067429, -0.27660210784601, 0.665726789566798, 2.32133366019172, -1.53160552935134, -0.0112852948959791, 0.647043927823146, 0.146007978731007, -0.0813627769020614, 0.168459614593366, -0.667469551299468, 0.155643684623134, -0.354389579720782, -1.2628746532883, -1.36268842983293, -0.880136811861489, 0.474456449878343, -0.57518851233131, -1.51112599795831, 0.107381917921079, 4.66364376034552, -0.384266247406289, 0.846418029251948, -0.22009092358684, -0.997440207147985, -0.345477817683903, -2.26439807047638, -0.234506222512697, -6.62386103393725, 0.737871909405577, -0.778621877752637, 0.166305510315177, -5.59972422043153, -0.896586352287983, -0.837128030821426, -1.585465072187, 0.851645104827465, -1.57543205970367, -2.62688736400891, 0.0591215339994518, -0.024300999166472, 2.02866605867842, -1.72923329658709, -0.437656804001136, 0.479322129923222, 0.100843175865097, 0.0366600221530648, -0.436004698474075, -1.3455960869297, 0.148221366026183, 0.716966649787764, 0.709181425940949, 0.655038905013752, 1.29313116432267, 1.23105776336634, 1.23001269273498, 0.656220197803928, 0.999354061686446, 1.23085164642881, 1.22383640366401, 1.03698972088398, 0.742455734446162, 1.45531939121849, 0.454223822629539, 0.157236583019253, -0.321466144643529, 0.284225536207856, -1.9657453724823, -1.47539080780684, -1.7773213083232, -2.04219023699656, 0.125546070883124, -6.26293033574947, -5.58912780569294, 0.558068763333632, 0.49375232760385, 1.3392725471067, 1.11130249415624, 1.31462186042328, 1.47134408703615, 1.0349801329787, 0.898332018057788, 1.34573393746072, 1.16865411023886, 0.377599308702714, 1.06164689889648, 0.213406209437208, 0.396278635577784, 0.0939829261680339, 1.2433360788338, -0.0147273660826915, -0.258496998206768, -0.375514079601975, -0.859916995583392, -0.933607480932669, -0.0594615469519774, 0.136337999331739, -1.94397184170948, -0.896758861460939, -1.02383958152424, 0.371762021723303, -0.0822671636073955, 0.493318706573885, 0.404478120115991, 0.0903583995460028, 0.625943168112428, 0.315765966022222, -0.427392233426861, 0.0439779924120345, 0.214587660795556, 0.620127856146004, 0.308965955968798, -0.252540914156587, -0.443539439208621, 0.411482696746033, 1.58080791547358, 0.265311705322956, -0.0122047622298842, 0.311258968120469, -0.225584646217309, 0.226672112753017, 0.631336149439883, 1.17481786697446, -4.54951331720738, 0.155526473279261, 0.191986879132848, -1.90879753298857, -1.69593374965947, 0.0517164811402898, -0.901473209272673, -5.64304520553749, -1.18990827347873, 0.555374339856875, 0.639314953308649, 1.2061775875032, 0.709549116220173, 1.69825357894899, -1.48644318239666, 0.0641288315786146, 0.311418880881956, 2.16765382172273, -0.379056783545116, 6.18537317221478, 0.113988189528279, 1.08647917462704, 0.88738427969982, 0.503819292501282, 3.11496486767917, 1.0398391049488, -0.399057178797581, -0.603815253238222, 0.169905537296221, 2.71063529328302, 1.36599488578331, 0.206187497307935, -0.661818165985605, 0.180532788948155, 0.398130288771763, -0.14492928433536, -0.854763279373952, -0.941429220320565, -0.744253363580887, -0.606386323624282, -0.365849632546015, 0.127169978334056, -0.699898030394812, -1.14236866347815, -1.15743970607497, -0.265968068332297, -0.767263591550119, -0.990266009736163, -0.771623104310933, -0.699252162661518, 0.987164356141447, -0.442784898298253, -0.466255426356159, -1.06331222422191, 3.21038072554745, 2.53685687474027, 1.82191358860395, 2.46995657780243, -1.08316840066793, 2.13517453833715, 2.89482579144518, 0.990714210126454, 0.994755961929098, 1.09093308657261, 0.686305385410004, 1.90929092408626, 0.735166914427706, 1.24278216282647, 1.48190791868422, 0.681426483136772, 0.528544691130735, 0.239250822775976, -1.1024145716157, -1.67642295805977, -0.103123469076745, -0.340611370270726, -0.925610911973686, 1.58316484269382, 1.64466830852712, 1.57429751091667, 2.40297589683478, 0.964172086790592, 0.451319193891215, 0.813877864509577, 4.42127189557637, 0.473679005820603, 0.495031596240481, 1.77707550244555, 0.247764057184193, -1.51554496850915, -1.03529116592834, -1.06539760209548, -0.913002683554151, -0.552919271759119, -0.785563303530853, -1.0022735975053, -0.822285129655764, -0.841274727256044, -0.699482890460832, -0.245085657093046, -0.334638139430823, -1.12096055262357, 1.88955017801555, -0.633220478744723, -0.356873425230179, -0.365111388875891, -0.465715496510229, -1.29460446985604, -0.511318347340189, -0.668521147250858, 3.82329082589864, 1.0053900922323, 1.39828689657999, 2.72813716119812, 1.77402689973947, 1.07108451445419, 0.402981445026845, 0.766481474313542, -0.590497791200817), .Dim = c(110L, 4L), .Dimnames = list(NULL, c("PC1", "PC2", "PC3", "PC4")))