> library(igraph)
> deg.seq <- rep(1:61, 2)
> sample_degseq(deg.seq)
IGRAPH 45e3c32 U--- 122 1891 -- Degree sequence random graph
+ attr: name (g/c), method (g/c)
+ edges from 45e3c32:
[1] 80--121 9-- 82 54--114 57-- 96 52-- 60 16-- 55 38--105 29-- 80
[9] 69--115 6-- 28 92--111 29-- 49 47-- 67 90--106 49--121 43--114
[17] 40-- 46 47--115 120--122 55--100 98--104 43--109 28-- 98 25--115
[25] 38-- 43 48-- 52 27-- 92 26--107 53--107 60--110 97--110 91--106
[33] 18-- 98 117--119 28-- 51 58--104 61--110 43--105 39-- 51 31-- 95
[41] 84-- 87 94--112 32-- 58 41-- 98 19--113 40-- 47 41-- 50 116--121
[49] 51-- 95 58--118 97--111 100--119 40-- 92 18--114 22--101 46-- 77
[57] 12-- 88 54--109 49-- 58 42-- 61 47-- 53 45--116 31--122 52--102
+ ... omitted several edges
在这种情况下,如果状态等于404,我想转发。但这是行不通的。我该怎么办?