search

kaijagahm / vultureUtils

Utility functions for working with vulture data
Other
4 stars 0 forks source link

iGraph edges bug #83

Closed kaijagahm closed 1 year ago

kaijagahm commented 1 year ago 
g <- structure(list(51, FALSE, c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 
12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 
28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 
44, 45, 46, 47, 48, 49, 50, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 
13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 
29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 
45, 46, 47, 48, 49, 50, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 
14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 
30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 
46, 47, 48, 49, 50, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 
16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 
32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 
48, 49, 50, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 
19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 
6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 
23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 
39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 7, 8, 9, 10, 
11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 
27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 
43, 44, 45, 46, 47, 48, 49, 50, 8, 9, 10, 11, 12, 13, 14, 15, 
16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 
32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 
48, 49, 50, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 
22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 
38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 10, 11, 12, 
13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 
29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 
45, 46, 47, 48, 49, 50, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 
21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 
37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 12, 13, 
14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 
30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 
46, 47, 48, 49, 50, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 
24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 
40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 14, 15, 16, 17, 18, 
19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 
15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 
31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 
47, 48, 49, 50, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 
28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 
44, 45, 46, 47, 48, 49, 50, 17, 18, 19, 20, 21, 22, 23, 24, 25, 
26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 
42, 43, 44, 45, 46, 47, 48, 49, 50, 18, 19, 20, 21, 22, 23, 24, 
25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 
41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 19, 20, 21, 22, 23, 24, 
25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 
41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 20, 21, 22, 23, 24, 25, 
26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 
42, 43, 44, 45, 46, 47, 48, 49, 50, 21, 22, 23, 24, 25, 26, 27, 
28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 
44, 45, 46, 47, 48, 49, 50, 22, 23, 24, 25, 26, 27, 28, 29, 30, 
31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 
47, 48, 49, 50, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 
24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 
40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 25, 26, 27, 28, 29, 
30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 
46, 47, 48, 49, 50, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 
37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 27, 28, 
29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 
45, 46, 47, 48, 49, 50, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 
38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 29, 30, 31, 
32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 
48, 49, 50, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 
43, 44, 45, 46, 47, 48, 49, 50, 31, 32, 33, 34, 35, 36, 37, 38, 
39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 32, 33, 34, 35, 
36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 33, 
34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 
50, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 
49, 50, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 
49, 50, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 
50, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 38, 
39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 39, 40, 41, 42, 
43, 44, 45, 46, 47, 48, 49, 50, 40, 41, 42, 43, 44, 45, 46, 47, 
48, 49, 50, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 42, 43, 44, 
45, 46, 47, 48, 49, 50, 43, 44, 45, 46, 47, 48, 49, 50, 44, 45, 
46, 47, 48, 49, 50, 45, 46, 47, 48, 49, 50, 46, 47, 48, 49, 50, 
47, 48, 49, 50, 48, 49, 50, 49, 50, 50), c(0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 
1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 
3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 
3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 
4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 
4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 
4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 
5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 
5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 
6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 
6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 
7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 
7, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 
8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 
8, 8, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 
9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 
9, 9, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 
10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 
10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 11, 11, 
11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 
11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 
11, 11, 11, 11, 11, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 
12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 
12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 13, 13, 13, 13, 13, 
13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 
13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 
14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 
14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 
14, 14, 14, 14, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 
15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 
15, 15, 15, 15, 15, 15, 15, 16, 16, 16, 16, 16, 16, 16, 16, 16, 
16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 
16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 17, 17, 
17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 
17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 18, 18, 18, 18, 18, 18, 
18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 
18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 19, 19, 19, 19, 19, 19, 
19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 
19, 19, 19, 19, 19, 19, 19, 19, 19, 20, 20, 20, 20, 20, 20, 20, 
20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 
20, 20, 20, 20, 20, 20, 20, 21, 21, 21, 21, 21, 21, 21, 21, 21, 
21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 
21, 21, 21, 21, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 
22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 
23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 
23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 24, 24, 24, 24, 24, 
24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 
24, 24, 24, 24, 24, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 
25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 26, 26, 
26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 
26, 26, 26, 26, 26, 26, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 
27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 28, 28, 28, 
28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 
28, 28, 28, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 
29, 29, 29, 29, 29, 29, 29, 29, 30, 30, 30, 30, 30, 30, 30, 30, 
30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 31, 31, 31, 31, 
31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 31, 32, 
32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 
32, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 
33, 33, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34, 
34, 34, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 
35, 36, 36, 36, 36, 36, 36, 36, 36, 36, 36, 36, 36, 36, 36, 37, 
37, 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, 37, 38, 38, 38, 38, 
38, 38, 38, 38, 38, 38, 38, 38, 39, 39, 39, 39, 39, 39, 39, 39, 
39, 39, 39, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 41, 41, 41, 
41, 41, 41, 41, 41, 41, 42, 42, 42, 42, 42, 42, 42, 42, 43, 43, 
43, 43, 43, 43, 43, 44, 44, 44, 44, 44, 44, 45, 45, 45, 45, 45, 
46, 46, 46, 46, 47, 47, 47, 48, 48, 49), c(0, 1, 50, 2, 51, 99, 
3, 52, 100, 147, 4, 53, 101, 148, 194, 5, 54, 102, 149, 195, 
240, 6, 55, 103, 150, 196, 241, 285, 7, 56, 104, 151, 197, 242, 
286, 329, 8, 57, 105, 152, 198, 243, 287, 330, 372, 9, 58, 106, 
153, 199, 244, 288, 331, 373, 414, 10, 59, 107, 154, 200, 245, 
289, 332, 374, 415, 455, 11, 60, 108, 155, 201, 246, 290, 333, 
375, 416, 456, 495, 12, 61, 109, 156, 202, 247, 291, 334, 376, 
417, 457, 496, 534, 13, 62, 110, 157, 203, 248, 292, 335, 377, 
418, 458, 497, 535, 572, 14, 63, 111, 158, 204, 249, 293, 336, 
378, 419, 459, 498, 536, 573, 609, 15, 64, 112, 159, 205, 250, 
294, 337, 379, 420, 460, 499, 537, 574, 610, 645, 16, 65, 113, 
160, 206, 251, 295, 338, 380, 421, 461, 500, 538, 575, 611, 646, 
680, 17, 66, 114, 161, 207, 252, 296, 339, 381, 422, 462, 501, 
539, 576, 612, 647, 681, 714, 18, 67, 115, 162, 208, 253, 297, 
340, 382, 423, 463, 502, 540, 577, 613, 648, 682, 715, 747, 19, 
68, 116, 163, 209, 254, 298, 341, 383, 424, 464, 503, 541, 578, 
614, 649, 683, 716, 748, 779, 20, 69, 117, 164, 210, 255, 299, 
342, 384, 425, 465, 504, 542, 579, 615, 650, 684, 717, 749, 780, 
810, 21, 70, 118, 165, 211, 256, 300, 343, 385, 426, 466, 505, 
543, 580, 616, 651, 685, 718, 750, 781, 811, 840, 22, 71, 119, 
166, 212, 257, 301, 344, 386, 427, 467, 506, 544, 581, 617, 652, 
686, 719, 751, 782, 812, 841, 869, 23, 72, 120, 167, 213, 258, 
302, 345, 387, 428, 468, 507, 545, 582, 618, 653, 687, 720, 752, 
783, 813, 842, 870, 897, 24, 73, 121, 168, 214, 259, 303, 346, 
388, 429, 469, 508, 546, 583, 619, 654, 688, 721, 753, 784, 814, 
843, 871, 898, 924, 25, 74, 122, 169, 215, 260, 304, 347, 389, 
430, 470, 509, 547, 584, 620, 655, 689, 722, 754, 785, 815, 844, 
872, 899, 925, 950, 26, 75, 123, 170, 216, 261, 305, 348, 390, 
431, 471, 510, 548, 585, 621, 656, 690, 723, 755, 786, 816, 845, 
873, 900, 926, 951, 975, 27, 76, 124, 171, 217, 262, 306, 349, 
391, 432, 472, 511, 549, 586, 622, 657, 691, 724, 756, 787, 817, 
846, 874, 901, 927, 952, 976, 999, 28, 77, 125, 172, 218, 263, 
307, 350, 392, 433, 473, 512, 550, 587, 623, 658, 692, 725, 757, 
788, 818, 847, 875, 902, 928, 953, 977, 1000, 1022, 29, 78, 126, 
173, 219, 264, 308, 351, 393, 434, 474, 513, 551, 588, 624, 659, 
693, 726, 758, 789, 819, 848, 876, 903, 929, 954, 978, 1001, 
1023, 1044, 30, 79, 127, 174, 220, 265, 309, 352, 394, 435, 475, 
514, 552, 589, 625, 660, 694, 727, 759, 790, 820, 849, 877, 904, 
930, 955, 979, 1002, 1024, 1045, 1065, 31, 80, 128, 175, 221, 
266, 310, 353, 395, 436, 476, 515, 553, 590, 626, 661, 695, 728, 
760, 791, 821, 850, 878, 905, 931, 956, 980, 1003, 1025, 1046, 
1066, 1085, 32, 81, 129, 176, 222, 267, 311, 354, 396, 437, 477, 
516, 554, 591, 627, 662, 696, 729, 761, 792, 822, 851, 879, 906, 
932, 957, 981, 1004, 1026, 1047, 1067, 1086, 1104, 33, 82, 130, 
177, 223, 268, 312, 355, 397, 438, 478, 517, 555, 592, 628, 663, 
697, 730, 762, 793, 823, 852, 880, 907, 933, 958, 982, 1005, 
1027, 1048, 1068, 1087, 1105, 1122, 34, 83, 131, 178, 224, 269, 
313, 356, 398, 439, 479, 518, 556, 593, 629, 664, 698, 731, 763, 
794, 824, 853, 881, 908, 934, 959, 983, 1006, 1028, 1049, 1069, 
1088, 1106, 1123, 1139, 35, 84, 132, 179, 225, 270, 314, 357, 
399, 440, 480, 519, 557, 594, 630, 665, 699, 732, 764, 795, 825, 
854, 882, 909, 935, 960, 984, 1007, 1029, 1050, 1070, 1089, 1107, 
1124, 1140, 1155, 36, 85, 133, 180, 226, 271, 315, 358, 400, 
441, 481, 520, 558, 595, 631, 666, 700, 733, 765, 796, 826, 855, 
883, 910, 936, 961, 985, 1008, 1030, 1051, 1071, 1090, 1108, 
1125, 1141, 1156, 1170, 37, 86, 134, 181, 227, 272, 316, 359, 
401, 442, 482, 521, 559, 596, 632, 667, 701, 734, 766, 797, 827, 
856, 884, 911, 937, 962, 986, 1009, 1031, 1052, 1072, 1091, 1109, 
1126, 1142, 1157, 1171, 1184, 38, 87, 135, 182, 228, 273, 317, 
360, 402, 443, 483, 522, 560, 597, 633, 668, 702, 735, 767, 798, 
828, 857, 885, 912, 938, 963, 987, 1010, 1032, 1053, 1073, 1092, 
1110, 1127, 1143, 1158, 1172, 1185, 1197, 39, 88, 136, 183, 229, 
274, 318, 361, 403, 444, 484, 523, 561, 598, 634, 669, 703, 736, 
768, 799, 829, 858, 886, 913, 939, 964, 988, 1011, 1033, 1054, 
1074, 1093, 1111, 1128, 1144, 1159, 1173, 1186, 1198, 1209, 40, 
89, 137, 184, 230, 275, 319, 362, 404, 445, 485, 524, 562, 599, 
635, 670, 704, 737, 769, 800, 830, 859, 887, 914, 940, 965, 989, 
1012, 1034, 1055, 1075, 1094, 1112, 1129, 1145, 1160, 1174, 1187, 
1199, 1210, 1220, 41, 90, 138, 185, 231, 276, 320, 363, 405, 
446, 486, 525, 563, 600, 636, 671, 705, 738, 770, 801, 831, 860, 
888, 915, 941, 966, 990, 1013, 1035, 1056, 1076, 1095, 1113, 
1130, 1146, 1161, 1175, 1188, 1200, 1211, 1221, 1230, 42, 91, 
139, 186, 232, 277, 321, 364, 406, 447, 487, 526, 564, 601, 637, 
672, 706, 739, 771, 802, 832, 861, 889, 916, 942, 967, 991, 1014, 
1036, 1057, 1077, 1096, 1114, 1131, 1147, 1162, 1176, 1189, 1201, 
1212, 1222, 1231, 1239, 43, 92, 140, 187, 233, 278, 322, 365, 
407, 448, 488, 527, 565, 602, 638, 673, 707, 740, 772, 803, 833, 
862, 890, 917, 943, 968, 992, 1015, 1037, 1058, 1078, 1097, 1115, 
1132, 1148, 1163, 1177, 1190, 1202, 1213, 1223, 1232, 1240, 1247, 
44, 93, 141, 188, 234, 279, 323, 366, 408, 449, 489, 528, 566, 
603, 639, 674, 708, 741, 773, 804, 834, 863, 891, 918, 944, 969, 
993, 1016, 1038, 1059, 1079, 1098, 1116, 1133, 1149, 1164, 1178, 
1191, 1203, 1214, 1224, 1233, 1241, 1248, 1254, 45, 94, 142, 
189, 235, 280, 324, 367, 409, 450, 490, 529, 567, 604, 640, 675, 
709, 742, 774, 805, 835, 864, 892, 919, 945, 970, 994, 1017, 
1039, 1060, 1080, 1099, 1117, 1134, 1150, 1165, 1179, 1192, 1204, 
1215, 1225, 1234, 1242, 1249, 1255, 1260, 46, 95, 143, 190, 236, 
281, 325, 368, 410, 451, 491, 530, 568, 605, 641, 676, 710, 743, 
775, 806, 836, 865, 893, 920, 946, 971, 995, 1018, 1040, 1061, 
1081, 1100, 1118, 1135, 1151, 1166, 1180, 1193, 1205, 1216, 1226, 
1235, 1243, 1250, 1256, 1261, 1265, 47, 96, 144, 191, 237, 282, 
326, 369, 411, 452, 492, 531, 569, 606, 642, 677, 711, 744, 776, 
807, 837, 866, 894, 921, 947, 972, 996, 1019, 1041, 1062, 1082, 
1101, 1119, 1136, 1152, 1167, 1181, 1194, 1206, 1217, 1227, 1236, 
1244, 1251, 1257, 1262, 1266, 1269, 48, 97, 145, 192, 238, 283, 
327, 370, 412, 453, 493, 532, 570, 607, 643, 678, 712, 745, 777, 
808, 838, 867, 895, 922, 948, 973, 997, 1020, 1042, 1063, 1083, 
1102, 1120, 1137, 1153, 1168, 1182, 1195, 1207, 1218, 1228, 1237, 
1245, 1252, 1258, 1263, 1267, 1270, 1272, 49, 98, 146, 193, 239, 
284, 328, 371, 413, 454, 494, 533, 571, 608, 644, 679, 713, 746, 
778, 809, 839, 868, 896, 923, 949, 974, 998, 1021, 1043, 1064, 
1084, 1103, 1121, 1138, 1154, 1169, 1183, 1196, 1208, 1219, 1229, 
1238, 1246, 1253, 1259, 1264, 1268, 1271, 1273, 1274), c(0, 1, 
2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 
20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 
36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 
52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 
68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 
84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 
100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 
113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 
126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 
139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 
152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 
165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 
178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 
191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 
204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 214, 215, 216, 
217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 
230, 231, 232, 233, 234, 235, 236, 237, 238, 239, 240, 241, 242, 
243, 244, 245, 246, 247, 248, 249, 250, 251, 252, 253, 254, 255, 
256, 257, 258, 259, 260, 261, 262, 263, 264, 265, 266, 267, 268, 
269, 270, 271, 272, 273, 274, 275, 276, 277, 278, 279, 280, 281, 
282, 283, 284, 285, 286, 287, 288, 289, 290, 291, 292, 293, 294, 
295, 296, 297, 298, 299, 300, 301, 302, 303, 304, 305, 306, 307, 
308, 309, 310, 311, 312, 313, 314, 315, 316, 317, 318, 319, 320, 
321, 322, 323, 324, 325, 326, 327, 328, 329, 330, 331, 332, 333, 
334, 335, 336, 337, 338, 339, 340, 341, 342, 343, 344, 345, 346, 
347, 348, 349, 350, 351, 352, 353, 354, 355, 356, 357, 358, 359, 
360, 361, 362, 363, 364, 365, 366, 367, 368, 369, 370, 371, 372, 
373, 374, 375, 376, 377, 378, 379, 380, 381, 382, 383, 384, 385, 
386, 387, 388, 389, 390, 391, 392, 393, 394, 395, 396, 397, 398, 
399, 400, 401, 402, 403, 404, 405, 406, 407, 408, 409, 410, 411, 
412, 413, 414, 415, 416, 417, 418, 419, 420, 421, 422, 423, 424, 
425, 426, 427, 428, 429, 430, 431, 432, 433, 434, 435, 436, 437, 
438, 439, 440, 441, 442, 443, 444, 445, 446, 447, 448, 449, 450, 
451, 452, 453, 454, 455, 456, 457, 458, 459, 460, 461, 462, 463, 
464, 465, 466, 467, 468, 469, 470, 471, 472, 473, 474, 475, 476, 
477, 478, 479, 480, 481, 482, 483, 484, 485, 486, 487, 488, 489, 
490, 491, 492, 493, 494, 495, 496, 497, 498, 499, 500, 501, 502, 
503, 504, 505, 506, 507, 508, 509, 510, 511, 512, 513, 514, 515, 
516, 517, 518, 519, 520, 521, 522, 523, 524, 525, 526, 527, 528, 
529, 530, 531, 532, 533, 534, 535, 536, 537, 538, 539, 540, 541, 
542, 543, 544, 545, 546, 547, 548, 549, 550, 551, 552, 553, 554, 
555, 556, 557, 558, 559, 560, 561, 562, 563, 564, 565, 566, 567, 
568, 569, 570, 571, 572, 573, 574, 575, 576, 577, 578, 579, 580, 
581, 582, 583, 584, 585, 586, 587, 588, 589, 590, 591, 592, 593, 
594, 595, 596, 597, 598, 599, 600, 601, 602, 603, 604, 605, 606, 
607, 608, 609, 610, 611, 612, 613, 614, 615, 616, 617, 618, 619, 
620, 621, 622, 623, 624, 625, 626, 627, 628, 629, 630, 631, 632, 
633, 634, 635, 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 
646, 647, 648, 649, 650, 651, 652, 653, 654, 655, 656, 657, 658, 
659, 660, 661, 662, 663, 664, 665, 666, 667, 668, 669, 670, 671, 
672, 673, 674, 675, 676, 677, 678, 679, 680, 681, 682, 683, 684, 
685, 686, 687, 688, 689, 690, 691, 692, 693, 694, 695, 696, 697, 
698, 699, 700, 701, 702, 703, 704, 705, 706, 707, 708, 709, 710, 
711, 712, 713, 714, 715, 716, 717, 718, 719, 720, 721, 722, 723, 
724, 725, 726, 727, 728, 729, 730, 731, 732, 733, 734, 735, 736, 
737, 738, 739, 740, 741, 742, 743, 744, 745, 746, 747, 748, 749, 
750, 751, 752, 753, 754, 755, 756, 757, 758, 759, 760, 761, 762, 
763, 764, 765, 766, 767, 768, 769, 770, 771, 772, 773, 774, 775, 
776, 777, 778, 779, 780, 781, 782, 783, 784, 785, 786, 787, 788, 
789, 790, 791, 792, 793, 794, 795, 796, 797, 798, 799, 800, 801, 
802, 803, 804, 805, 806, 807, 808, 809, 810, 811, 812, 813, 814, 
815, 816, 817, 818, 819, 820, 821, 822, 823, 824, 825, 826, 827, 
828, 829, 830, 831, 832, 833, 834, 835, 836, 837, 838, 839, 840, 
841, 842, 843, 844, 845, 846, 847, 848, 849, 850, 851, 852, 853, 
854, 855, 856, 857, 858, 859, 860, 861, 862, 863, 864, 865, 866, 
867, 868, 869, 870, 871, 872, 873, 874, 875, 876, 877, 878, 879, 
880, 881, 882, 883, 884, 885, 886, 887, 888, 889, 890, 891, 892, 
893, 894, 895, 896, 897, 898, 899, 900, 901, 902, 903, 904, 905, 
906, 907, 908, 909, 910, 911, 912, 913, 914, 915, 916, 917, 918, 
919, 920, 921, 922, 923, 924, 925, 926, 927, 928, 929, 930, 931, 
932, 933, 934, 935, 936, 937, 938, 939, 940, 941, 942, 943, 944, 
945, 946, 947, 948, 949, 950, 951, 952, 953, 954, 955, 956, 957, 
958, 959, 960, 961, 962, 963, 964, 965, 966, 967, 968, 969, 970, 
971, 972, 973, 974, 975, 976, 977, 978, 979, 980, 981, 982, 983, 
984, 985, 986, 987, 988, 989, 990, 991, 992, 993, 994, 995, 996, 
997, 998, 999, 1000, 1001, 1002, 1003, 1004, 1005, 1006, 1007, 
1008, 1009, 1010, 1011, 1012, 1013, 1014, 1015, 1016, 1017, 1018, 
1019, 1020, 1021, 1022, 1023, 1024, 1025, 1026, 1027, 1028, 1029, 
1030, 1031, 1032, 1033, 1034, 1035, 1036, 1037, 1038, 1039, 1040, 
1041, 1042, 1043, 1044, 1045, 1046, 1047, 1048, 1049, 1050, 1051, 
1052, 1053, 1054, 1055, 1056, 1057, 1058, 1059, 1060, 1061, 1062, 
1063, 1064, 1065, 1066, 1067, 1068, 1069, 1070, 1071, 1072, 1073, 
1074, 1075, 1076, 1077, 1078, 1079, 1080, 1081, 1082, 1083, 1084, 
1085, 1086, 1087, 1088, 1089, 1090, 1091, 1092, 1093, 1094, 1095, 
1096, 1097, 1098, 1099, 1100, 1101, 1102, 1103, 1104, 1105, 1106, 
1107, 1108, 1109, 1110, 1111, 1112, 1113, 1114, 1115, 1116, 1117, 
1118, 1119, 1120, 1121, 1122, 1123, 1124, 1125, 1126, 1127, 1128, 
1129, 1130, 1131, 1132, 1133, 1134, 1135, 1136, 1137, 1138, 1139, 
1140, 1141, 1142, 1143, 1144, 1145, 1146, 1147, 1148, 1149, 1150, 
1151, 1152, 1153, 1154, 1155, 1156, 1157, 1158, 1159, 1160, 1161, 
1162, 1163, 1164, 1165, 1166, 1167, 1168, 1169, 1170, 1171, 1172, 
1173, 1174, 1175, 1176, 1177, 1178, 1179, 1180, 1181, 1182, 1183, 
1184, 1185, 1186, 1187, 1188, 1189, 1190, 1191, 1192, 1193, 1194, 
1195, 1196, 1197, 1198, 1199, 1200, 1201, 1202, 1203, 1204, 1205, 
1206, 1207, 1208, 1209, 1210, 1211, 1212, 1213, 1214, 1215, 1216, 
1217, 1218, 1219, 1220, 1221, 1222, 1223, 1224, 1225, 1226, 1227, 
1228, 1229, 1230, 1231, 1232, 1233, 1234, 1235, 1236, 1237, 1238, 
1239, 1240, 1241, 1242, 1243, 1244, 1245, 1246, 1247, 1248, 1249, 
1250, 1251, 1252, 1253, 1254, 1255, 1256, 1257, 1258, 1259, 1260, 
1261, 1262, 1263, 1264, 1265, 1266, 1267, 1268, 1269, 1270, 1271, 
1272, 1273, 1274), c(0, 0, 1, 3, 6, 10, 15, 21, 28, 36, 45, 55, 
66, 78, 91, 105, 120, 136, 153, 171, 190, 210, 231, 253, 276, 
300, 325, 351, 378, 406, 435, 465, 496, 528, 561, 595, 630, 666, 
703, 741, 780, 820, 861, 903, 946, 990, 1035, 1081, 1128, 1176, 
1225, 1275), c(0, 50, 99, 147, 194, 240, 285, 329, 372, 414, 
455, 495, 534, 572, 609, 645, 680, 714, 747, 779, 810, 840, 869, 
897, 924, 950, 975, 999, 1022, 1044, 1065, 1085, 1104, 1122, 
1139, 1155, 1170, 1184, 1197, 1209, 1220, 1230, 1239, 1247, 1254, 
1260, 1265, 1269, 1272, 1274, 1275, 1275), list(c(1, 0, 1), structure(list(), names = character(0)), 
    list(name = c("A00w", "A03w", "A05w", "A10w", "A15w", "A16w", 
    "A22w", "A29w", "A31w", "A32w", "A35w", "A39w", "A52w", "A55w", 
    "A57w", "A75w", "A78w", "E03", "E05w", "E09w", "E12w", "E13w", 
    "E15w", "E16w", "E17w", "E30w", "E32w", "E33w", "E34w", "E45w", 
    "E46w", "J00w", "J06w", "J12w", "J28w", "J33w", "J34w", "J53w", 
    "T13b", "T14w", "T15w", "T19b", "T25b", "T50b", "T53b", "T61w", 
    "T79w", "T86b", "T90b", "T99b", "Y27b")), list(sri = c(0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0327868852459016, 0, 0, 
    0, 0.0344827586206897, 0, 0, 0, 0, 0.0645161290322581, 0, 
    0, 0, 0, 0, 0.03, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0.150943396226415, 0, 0, 0, 0, 0, 
    0, 0, 0, 0.0540540540540541, 0, 0, 0, 0, 0, 0.319148936170213, 
    0, 0, 0.0315789473684211, 0, 0.0344827586206897, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.107692307692308, 0, 
    0, 0, 0.0754716981132075, 0, 0, 0, 0, 0.0392156862745098, 
    0, 0, 0, 0, 0, 0, 0.0444444444444444, 0, 0, 0.0508474576271186, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0421052631578947, 0, 0, 0.107142857142857, 
    0, 0.032258064516129, 0, 0, 0.0576923076923077, 0, 0, 0, 
    0.0574712643678161, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0615384615384615, 
    0, 0, 0.0555555555555556, 0, 0, 0, 0.0533333333333333, 0, 
    0, 0, 0, 0.0467289719626168, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.019047619047619, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0476190476190476, 
    0.075, 0, 0, 0, 0, 0, 0, 0.0526315789473684, 0, 0, 0.0408163265306122, 
    0, 0.0476190476190476, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0.0206185567010309, 0, 0, 0, 0, 0, 0, 0, 0, 
    0.0224719101123595, 0, 0.037037037037037, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0508474576271186, 0, 0, 0, 
    0.0625, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0512820512820513, 
    0, 0, 0.0701754385964912, 0, 0, 0, 0.0625, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0.363636363636364, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0.0833333333333333, 0, 0, 0, 0.0465116279069767, 
    0, 0, 0, 0, 0, 0, 0, 0.0176991150442478, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0.0227272727272727, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0.0232558139534884, 0, 0, 0, 0, 0.0247933884297521, 0, 
    0, 0, 0.024390243902439, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0.162162162162162, 0, 0, 0, 0.111111111111111, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0.113924050632911, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0.0816326530612245, 0.0851063829787234, 0, 
    0, 0, 0.0625, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.145454545454545, 
    0, 0, 0, 0, 0, 0, 0, 0, 0.0352941176470588, 0, 0, 0, 0.0416666666666667, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0.535714285714286, 0, 0, 0, 0, 0, 0.0731707317073171, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0588235294117647, 0, 0, 0, 0, 
    0, 0, 0, 0.0363636363636364, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0.0530973451327434, 0, 0, 0, 0, 0, 0.0210526315789474, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.024, 0, 
    0, 0, 0, 0, 0, 0, 0, 0.0933333333333333, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0206185567010309, 
    0, 0.122448979591837, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0416666666666667, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.02, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0.127118644067797, 0, 0.0227272727272727, 0, 
    0.0404040404040404, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0.0416666666666667, 0, 0, 0, 0, 0, 0, 0, 0, 
    0.046875, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0.0714285714285714, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.048780487804878, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0625, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0.0566037735849057, 0, 0, 0, 0, 0.0740740740740741, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0285714285714286, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0454545454545455, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0.0416666666666667, 0, 0, 0, 0, 0, 0, 0.0588235294117647, 
    0.0769230769230769, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0.0517241379310345, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0.0476190476190476, 0, 0, 0, 0, 0, 0, 0, 0, 0.0344827586206897, 
    0, 0, 0, 0, 0, 0, 0, 0.05, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0.0206185567010309, 0, 0, 0, 0.028169014084507, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0.0458715596330275, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0508474576271186, 
    0, 0, 0, 0, 0, 0), weight = c(0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0.0327868852459016, 0, 0, 0, 0.0344827586206897, 
    0, 0, 0, 0, 0.0645161290322581, 0, 0, 0, 0, 0, 0.03, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0.150943396226415, 0, 0, 0, 0, 0, 0, 0, 0, 0.0540540540540541, 
    0, 0, 0, 0, 0, 0.319148936170213, 0, 0, 0.0315789473684211, 
    0, 0.0344827586206897, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0.107692307692308, 0, 0, 0, 0.0754716981132075, 
    0, 0, 0, 0, 0.0392156862745098, 0, 0, 0, 0, 0, 0, 0.0444444444444444, 
    0, 0, 0.0508474576271186, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0421052631578947, 
    0, 0, 0.107142857142857, 0, 0.032258064516129, 0, 0, 0.0576923076923077, 
    0, 0, 0, 0.0574712643678161, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0.0615384615384615, 0, 0, 0.0555555555555556, 0, 0, 0, 0.0533333333333333, 
    0, 0, 0, 0, 0.0467289719626168, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.019047619047619, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0476190476190476, 
    0.075, 0, 0, 0, 0, 0, 0, 0.0526315789473684, 0, 0, 0.0408163265306122, 
    0, 0.0476190476190476, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0.0206185567010309, 0, 0, 0, 0, 0, 0, 0, 0, 
    0.0224719101123595, 0, 0.037037037037037, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0508474576271186, 0, 0, 0, 
    0.0625, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0512820512820513, 
    0, 0, 0.0701754385964912, 0, 0, 0, 0.0625, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0.363636363636364, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0.0833333333333333, 0, 0, 0, 0.0465116279069767, 
    0, 0, 0, 0, 0, 0, 0, 0.0176991150442478, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0.0227272727272727, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0.0232558139534884, 0, 0, 0, 0, 0.0247933884297521, 0, 
    0, 0, 0.024390243902439, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0.162162162162162, 0, 0, 0, 0.111111111111111, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0.113924050632911, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0.0816326530612245, 0.0851063829787234, 0, 
    0, 0, 0.0625, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.145454545454545, 
    0, 0, 0, 0, 0, 0, 0, 0, 0.0352941176470588, 0, 0, 0, 0.0416666666666667, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0.535714285714286, 0, 0, 0, 0, 0, 0.0731707317073171, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0588235294117647, 0, 0, 0, 0, 
    0, 0, 0, 0.0363636363636364, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0.0530973451327434, 0, 0, 0, 0, 0, 0.0210526315789474, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.024, 0, 
    0, 0, 0, 0, 0, 0, 0, 0.0933333333333333, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0206185567010309, 
    0, 0.122448979591837, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0416666666666667, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.02, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0.127118644067797, 0, 0.0227272727272727, 0, 
    0.0404040404040404, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0.0416666666666667, 0, 0, 0, 0, 0, 0, 0, 0, 
    0.046875, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0.0714285714285714, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.048780487804878, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0625, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0.0566037735849057, 0, 0, 0, 0, 0.0740740740740741, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0285714285714286, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0454545454545455, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0.0416666666666667, 0, 0, 0, 0, 0, 0, 0.0588235294117647, 
    0.0769230769230769, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0.0517241379310345, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0.0476190476190476, 0, 0, 0, 0, 0, 0, 0, 0, 0.0344827586206897, 
    0, 0, 0, 0, 0, 0, 0, 0.05, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0.0206185567010309, 0, 0, 0, 0.028169014084507, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
    0, 0.0458715596330275, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0.0508474576271186, 
    0, 0, 0, 0, 0, 0))), <environment>), class = "igraph")

Code:

library(igraph)
E(g)$weight # this graph has edge weights--most of them are 0 because the graph is pretty sparse (not all edges exist because not all individuals interacted).
strength(g) # gives us good values--these values make sense. This takes into account the edge weights.
degree(g) # degree doesn't seem to work for a weighted graph. It tells me that the degree of all individuals is 50 (there are 51 total individuals in the network) because the edges do exist, they just have a weight of 0.

# I want to be able to calculate degree(g) and have it ignore edges with weight 0, since weight 0 means that the individuals did not interact.

# A different problem: plotting doesn't work well either.
plot(g, vertex.size = 15, edge.width = 20*E(g)$weight, vertex.label = NA, vertex.color = "lightblue", main = "co-flight") # we get the error "non-positive edge weight found, ignoring all weights during graph layout".

# To make it plot correctly, we have to change all 0 edge weights to NA, like this:
g_for_plotting <- g
E(g_for_plotting)$weight <- na_if(E(g_for_plotting)$weight, 0)

# Now it will plot correctly:
plot(g_for_plotting, vertex.size = 15, edge.width = 20*E(g_for_plotting)$weight, vertex.label = NA, vertex.color = "lightblue", main = "co-flight") # this is how it's supposed to look!

# But changing the edge weights to NA makes it impossible to calculate strength:
strength(g_for_plotting) # returns NA's for everything
strength(g) # returns the proper values

degree(g_for_plotting) # and meanwhile, setting the edge weights to NA did NOT fix the original problem with degree: it still calculates the degrees as 50 for everyone, even though we can see clearly from the graph that they should not be.
kaijagahm commented 1 year ago

Have to fix by actually removing the edges that are 0 or NA.

kaijagahm commented 1 year ago 
g <- delete.edges(g, E(g)[E(g)$weight <= 0|[is.na](http://is.na/)(E(g)$weight)])