This document shows you the competitive pressure map for each round for both universes. It shows the influence. For e.g. look at the first one which is very symmetrical. Each one has the influence on other. As rounds progress the relative influence keeps coming down. The origin arc shows the amount of influences being exerted on the others.
## `summarise()` has grouped output by 'player_list1'. You can override using the
## `.groups` argument.universe 1
r0 <- comppressuremap(universeno=1,roundno=0)## team1 team2 team3 team4 team5 team6
## team1 NA 0.1666667 0.1666667 0.1666667 0.1666667 0.1666667
## team2 0.1666667 NA 0.1666667 0.1666667 0.1666667 0.1666667
## team3 0.1666667 0.1666667 NA 0.1666667 0.1666667 0.1666667
## team4 0.1666667 0.1666667 0.1666667 NA 0.1666667 0.1666667
## team5 0.1666667 0.1666667 0.1666667 0.1666667 NA 0.1666667
## team6 0.1666667 0.1666667 0.1666667 0.1666667 0.1666667 NA
## [1] "min=0.166666666666667"
## [1] "team2" "team3" "team4" "team5" "team6" "team1" "team3" "team4" "team5"
## [10] "team6" "team1" "team2" "team4" "team5" "team6" "team1" "team2" "team3"
## [19] "team5" "team6" "team1" "team2" "team3" "team4" "team6" "team1" "team2"
## [28] "team3" "team4" "team5"
## [1] "team1" "team1" "team1" "team1" "team1" "team2" "team2" "team2" "team2"
## [10] "team2" "team3" "team3" "team3" "team3" "team3" "team4" "team4" "team4"
## [19] "team4" "team4" "team5" "team5" "team5" "team5" "team5" "team6" "team6"
## [28] "team6" "team6" "team6"
## [1] "max=0.166666666666667"
## [1] "team2" "team3" "team4" "team5" "team6" "team1" "team3" "team4" "team5"
## [10] "team6" "team1" "team2" "team4" "team5" "team6" "team1" "team2" "team3"
## [19] "team5" "team6" "team1" "team2" "team3" "team4" "team6" "team1" "team2"
## [28] "team3" "team4" "team5"
## [1] "team1" "team1" "team1" "team1" "team1" "team2" "team2" "team2" "team2"
## [10] "team2" "team3" "team3" "team3" "team3" "team3" "team4" "team4" "team4"
## [19] "team4" "team4" "team5" "team5" "team5" "team5" "team5" "team6" "team6"
## [28] "team6" "team6" "team6"chorddiag(r0,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))r1 <- comppressuremap(universeno=1,roundno=1)## team1 team2 team3 team4 team5 team6
## team1 NA 0.2007482 0.1834038 0.1902229 0.1836165 0.18360322
## team2 0.1083122 NA 0.0861508 0.1007922 0.1125025 0.09822861
## team3 0.2205477 0.1920119 NA 0.2346936 0.2201357 0.23722337
## team4 0.1576876 0.1548589 0.1617862 NA 0.1582910 0.15831888
## team5 0.1235329 0.1402838 0.1231593 0.1284673 NA 0.13001021
## team6 0.1778721 0.1763762 0.1911132 0.1850230 0.1872122 NA
## [1] "min=0.0861508037534558"
## [1] "team2"
## [1] "team3"
## [1] "max=0.237223370214078"
## [1] "team3"
## [1] "team6"chorddiag(r1,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))r2 <- comppressuremap(universeno=1,roundno=2)## team1 team2 team3 team4 team5 team6
## team1 NA 0.2054127 0.2071342 0.2024455 0.1961622 0.1861155
## team2 0.1106639 NA 0.1103421 0.1108525 0.1066652 0.1005758
## team3 0.2281628 0.2256087 NA 0.2229160 0.2144474 0.2048749
## team4 0.1250550 0.1271041 0.1250089 NA 0.1214547 0.1137106
## team5 0.1577499 0.1592201 0.1565602 0.1581157 NA 0.1638230
## team6 0.1713045 0.1718309 0.1711914 0.1694316 0.1875027 NA
## [1] "min=0.100575822005762"
## [1] "team2"
## [1] "team6"
## [1] "max=0.228162812934294"
## [1] "team3"
## [1] "team1"chorddiag(r2,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))r3 <- comppressuremap(universeno=1,roundno=3)## team1 team2 team3 team4 team5 team6
## team1 NA 0.1684210 0.1739664 0.1472258 0.1861855 0.21396831
## team2 0.10198175 NA 0.1220760 0.1217303 0.1155523 0.09998618
## team3 0.21767567 0.2522601 NA 0.2403270 0.2390759 0.21193783
## team4 0.08816878 0.1203936 0.1150241 NA 0.1066021 0.08679112
## team5 0.15289192 0.1567080 0.1569025 0.1461752 NA 0.14891286
## team6 0.22813260 0.1760564 0.1805934 0.1545192 0.1933443 NA
## [1] "min=0.0867911213932268"
## [1] "team4"
## [1] "team6"
## [1] "max=0.252260125155468"
## [1] "team3"
## [1] "team2"chorddiag(r3,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))r4 <- comppressuremap(universeno=1,roundno=4)## team1 team2 team3 team4 team5 team6
## team1 NA 0.1626718 0.1701414 0.1510336 0.20880809 0.22061420
## team2 0.12886438 NA 0.1679436 0.1799320 0.13677582 0.12982329
## team3 0.19298808 0.2404714 NA 0.2433309 0.20400198 0.19578046
## team4 0.09281304 0.1395800 0.1318293 NA 0.09828364 0.09490041
## team5 0.15248182 0.1260839 0.1313362 0.1167930 NA 0.15240612
## team6 0.20854262 0.1549150 0.1631587 0.1459803 0.19728453 NA
## [1] "min=0.0928130377179135"
## [1] "team4"
## [1] "team1"
## [1] "max=0.243330904520027"
## [1] "team3"
## [1] "team4"chorddiag(r4,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))r5 <- comppressuremap(universeno=1,roundno=5)## team1 team2 team3 team4 team5 team6
## team1 NA 0.1534284 0.1591074 0.1833526 0.1876710 0.2038766
## team2 0.1431142 NA 0.2014287 0.1569723 0.1512713 0.1419872
## team3 0.1740180 0.2361828 NA 0.1894011 0.1839970 0.1730907
## team4 0.1199420 0.1100856 0.1132826 NA 0.1264796 0.1191376
## team5 0.1549876 0.1339304 0.1389334 0.1596746 NA 0.1543602
## team6 0.2055859 0.1534964 0.1595865 0.1836499 0.1884785 NA
## [1] "min=0.110085570962993"
## [1] "team4"
## [1] "team2"
## [1] "max=0.236182782369615"
## [1] "team3"
## [1] "team2"chorddiag(r5,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))universe 2
r0 <- comppressuremap(universeno=2,roundno=0)## team1 team2 team3 team4 team5 team6
## team1 NA 0.1666667 0.1666667 0.1666667 0.1666667 0.1666667
## team2 0.1666667 NA 0.1666667 0.1666667 0.1666667 0.1666667
## team3 0.1666667 0.1666667 NA 0.1666667 0.1666667 0.1666667
## team4 0.1666667 0.1666667 0.1666667 NA 0.1666667 0.1666667
## team5 0.1666667 0.1666667 0.1666667 0.1666667 NA 0.1666667
## team6 0.1666667 0.1666667 0.1666667 0.1666667 0.1666667 NA
## [1] "min=0.166666666666667"
## [1] "team2" "team3" "team4" "team5" "team6" "team1" "team3" "team4" "team5"
## [10] "team6" "team1" "team2" "team4" "team5" "team6" "team1" "team2" "team3"
## [19] "team5" "team6" "team1" "team2" "team3" "team4" "team6" "team1" "team2"
## [28] "team3" "team4" "team5"
## [1] "team1" "team1" "team1" "team1" "team1" "team2" "team2" "team2" "team2"
## [10] "team2" "team3" "team3" "team3" "team3" "team3" "team4" "team4" "team4"
## [19] "team4" "team4" "team5" "team5" "team5" "team5" "team5" "team6" "team6"
## [28] "team6" "team6" "team6"
## [1] "max=0.166666666666667"
## [1] "team2" "team3" "team4" "team5" "team6" "team1" "team3" "team4" "team5"
## [10] "team6" "team1" "team2" "team4" "team5" "team6" "team1" "team2" "team3"
## [19] "team5" "team6" "team1" "team2" "team3" "team4" "team6" "team1" "team2"
## [28] "team3" "team4" "team5"
## [1] "team1" "team1" "team1" "team1" "team1" "team2" "team2" "team2" "team2"
## [10] "team2" "team3" "team3" "team3" "team3" "team3" "team4" "team4" "team4"
## [19] "team4" "team4" "team5" "team5" "team5" "team5" "team5" "team6" "team6"
## [28] "team6" "team6" "team6"chorddiag(r0,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))r1 <- comppressuremap(universeno=2,roundno=1)## team1 team2 team3 team4 team5 team6
## team1 NA 0.20601387 0.20487222 0.20269030 0.20536720 0.1890674
## team2 0.16265334 NA 0.16084152 0.16103432 0.15131860 0.1681981
## team3 0.14817622 0.14734218 NA 0.14622935 0.14971373 0.1438293
## team4 0.23948657 0.24099061 0.23888413 NA 0.23490462 0.2280273
## team5 0.17429486 0.16265945 0.17567893 0.16873177 NA 0.1368272
## team6 0.06757729 0.07614454 0.07107814 0.06897995 0.05762399 NA
## [1] "min=0.0576239869410846"
## [1] "team6"
## [1] "team5"
## [1] "max=0.240990613396312"
## [1] "team4"
## [1] "team2"chorddiag(r1,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))r2 <- comppressuremap(universeno=2,roundno=2)## team1 team2 team3 team4 team5 team6
## team1 NA 0.2114175 0.20850443 0.21010080 0.19163911 0.2123961
## team2 0.1701004 NA 0.16822982 0.16890412 0.16018319 0.1682069
## team3 0.1102681 0.1105791 NA 0.11088360 0.10994448 0.1072136
## team4 0.2428131 0.2426165 0.24231334 NA 0.23604015 0.2365755
## team5 0.1571803 0.1632926 0.17051120 0.16751565 NA 0.1531496
## team6 0.1037239 0.1020967 0.09900288 0.09996724 0.09118729 NA
## [1] "min=0.0911872856250778"
## [1] "team6"
## [1] "team5"
## [1] "max=0.242813124152149"
## [1] "team4"
## [1] "team1"chorddiag(r2,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))r3 <- comppressuremap(universeno=2,roundno=3)## team1 team2 team3 team4 team5 team6
## team1 NA 0.1871508 0.2001570 0.1930629 0.16389131 0.1939999
## team2 0.1709962 NA 0.1714488 0.1756331 0.16934211 0.1704782
## team3 0.1096978 0.1028412 NA 0.1058576 0.09196078 0.1057204
## team4 0.2235964 0.2226270 0.2236974 NA 0.20766378 0.2204170
## team5 0.1298284 0.1468197 0.1329197 0.1420393 NA 0.1439244
## team6 0.1634693 0.1572204 0.1625422 0.1603665 0.15309293 NA
## [1] "min=0.0919607848857846"
## [1] "team3"
## [1] "team5"
## [1] "max=0.223697393694052"
## [1] "team4"
## [1] "team3"chorddiag(r3,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))r4 <- comppressuremap(universeno=2,roundno=4)## team1 team2 team3 team4 team5 team6
## team1 NA 0.1931957 0.1975331 0.1930374 0.16774413 0.1926193
## team2 0.1725771 NA 0.1731969 0.1720330 0.15727360 0.1712243
## team3 0.1102929 0.1082585 NA 0.1080065 0.09119548 0.1073890
## team4 0.2142082 0.2137079 0.2146528 NA 0.19701683 0.2126282
## team5 0.1335169 0.1401390 0.1300034 0.1413181 NA 0.1426246
## team6 0.1729633 0.1721209 0.1727056 0.1720601 0.16090124 NA
## [1] "min=0.0911954817771486"
## [1] "team3"
## [1] "team5"
## [1] "max=0.214652826407721"
## [1] "team4"
## [1] "team3"chorddiag(r4,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))r5 <- comppressuremap(universeno=2,roundno=5)## team1 team2 team3 team4 team5 team6
## team1 NA 0.1968851 0.1954587 0.1930188 0.1602125 0.1680135
## team2 0.1872888 NA 0.1846221 0.1826362 0.1588174 0.1615538
## team3 0.1234504 0.1225808 NA 0.1213458 0.1046499 0.1098960
## team4 0.2140857 0.2129492 0.2130958 NA 0.1895832 0.1957321
## team5 0.1312381 0.1367611 0.1357265 0.1400153 NA 0.1771228
## team6 0.1431143 0.1446628 0.1482118 0.1503186 0.1841831 NA
## [1] "min=0.104649898358067"
## [1] "team3"
## [1] "team5"
## [1] "max=0.214085721153853"
## [1] "team4"
## [1] "team1"chorddiag(r5,groupnamePadding = 20, groupColors = c("green", "red", "blue","darkorange", "grey", "yellow"))# comppressuremap(universeno=1,roundno=6)
# comppressuremap(universeno=1,roundno=7)
# comppressuremap(universeno=1,roundno=8)
# comppressuremap(universeno=1,roundno=9)