Differences

This shows you the differences between two versions of the page.

--- r:social_network_analysis_tutorial [2019/11/27 11:04] – [T1.] hkimscil
+++ r:social_network_analysis_tutorial [2023/11/23 08:44] – [Edges] hkimscil
@@ Line 750: / Line 750: @@
 {{:r:pasted:20191127-080437.png}}
+cf. layout_with_fr: The Fruchterman-Reingold layout algorithm see [[https://www.rdocumentation.org/packages/igraph/versions/1.3.5/topics/layout_with_fr]] page
 <code>
 par(mfrow=c(1,2))
@@ Line 810: / Line 810: @@
 g.c.bet <- betweenness(g, directed = F, weights = NA, normalized = T)
 tmp <- data.frame(g.c.deg, g.c.clo, g.c.bet)
+tmp[order(-g.c.clo, -g.c.bet),]
 </code>
@@ Line 844: / Line 845: @@
 RED LEADER        7 0.36842105 0.032142857
 RED TEN           2 0.32307692 0.000000000
+GOLD FIVE         0 0.04545455 0.000000000
+>
+> tmp[order(-g.c.clo, -g.c.bet),]
+            g.c.deg    g.c.clo     g.c.bet
+LUKE             15 0.44680851 0.297278912
+LEIA             12 0.42000000 0.217120181
+C-3PO            10 0.40384615 0.057596372
+HAN               8 0.38888889 0.176190476
+CHEWBACCA         8 0.38888889 0.035487528
+OBI-WAN           7 0.38181818 0.014852608
+R2-D2             7 0.38181818 0.011904762
+BIGGS             7 0.36842105 0.032142857
+RED LEADER        7 0.36842105 0.032142857
+BERU              4 0.35000000 0.005442177
+DODONNA           5 0.34426230 0.011111111
+GOLD LEADER       5 0.33870968 0.003174603
+WEDGE             5 0.33870968 0.003174603
+DARTH VADER       5 0.32812500 0.011904762
+OWEN              3 0.32812500 0.000000000
+CAMIE             2 0.32307692 0.000000000
+RED TEN           2 0.32307692 0.000000000
+MOTTI             3 0.31343284 0.000000000
+TARKIN            3 0.31343284 0.000000000
+GREEDO            1 0.28767123 0.000000000
+JABBA             1 0.28767123 0.000000000
 GOLD FIVE         0 0.04545455 0.000000000
 >