M214 писал(а):
Получилось найти выражение для вероятности существования пути между двумя произвольными элементами. При больших
зависимость имеет вид:
. Здесь
.
Только вот непонятно, насколько точная у вас формула.
Кстати,
вот тут решали похожую задачи: какова вероятность того, что в случайном графе на
вершинах существует путь между первой и второй (т.е. фиксированными) вершинами.
Приведу набросок своего решения через производящие функции.
Пусть
- это число графов на
помеченных вершинах с
ребрами таких, что существует путь между первой и второй вершинами. Тогда искомая вероятность равна:
где
- как и прежде вероятность отсутсвия ребра, а
- вероятность присутствия,
Производящая функция для
также выражается через производящую функцию (и ее экспоненту) для
A062734:
где
При этом нетрудно видеть, что
и соответственно:
Поэтому производящую функцию для
можно также записать в виде:
Подставив
, получаем производящую функцию для
:
При желании отсюда можно вывести и явную формулу для
и
, но поля этого форума слишком малы, чтобы её вместить.
Напоследок немного численных экспериментов в PARI/GP. Сначала вычислим числа
для
:
Код:
? G(x, y) = sum(n=0,12,(1+y)^(n*(n-1)/2)*x^n/n!) + O(x^13);
? D=(1+y)*G(x*(1+y)^2,y) - G(x*(1+y),y)^2/G(x,y);
? for(n=2,10,print("n=",n,": ",Vecrev((n-2)!*polcoeff(D,n-2,x))))
n=2: [0, 1]
n=3: [0, 1, 3, 1]
n=4: [0, 1, 7, 18, 15, 6, 1]
n=5: [0, 1, 12, 63, 174, 240, 208, 120, 45, 10, 1]
n=6: [0, 1, 18, 151, 754, 2349, 4532, 6187, 6345, 4985, 3001, 1365, 455, 105, 15, 1]
n=7: [0, 1, 25, 300, 2255, 11525, 40754, 100780, 189285, 283460, 346611, 349976, 293020, 203280, 116250, 54262, 20349, 5985, 1330, 210, 21, 1]
n=8: [0, 1, 33, 531, 5490, 40215, 216335, 863175, 2597280, 6226055, 12351771, 20731599, 29817560, 37029795, 39882795, 37333453, 30381045, 21462210, 13120450, 6906480, 3108063, 1184038, 376740, 98280, 20475, 3276, 378, 28, 1]
n=9: [0, 1, 42, 868, 11690, 114051, 844522, 4834452, 21569448, 76329820, 222719252, 552136620, 1185497866, 2231663126, 3713209830, 5491411334, 7246282897, 8554268583, 9048806578, 8583664390, 7301652981, 5565534187, 3795543706, 2310593040, 1251636750, 600798744, 254186100, 94143224, 30260338, 8347680, 1947792, 376992, 58905, 7140, 630, 36, 1]
n=10: [0, 1, 52, 1338, 22624, 280735, 2695560, 20539764, 125570206, 620727923, 2522409392, 8672961962, 25842496190, 67837707693, 158639895240, 333071700680, 631409428415, 1085392293686, 1697397237158, 2420961972296, 3155147125949, 3762471289854, 4109104186228, 4112087853696, 3771150842689, 3168668895210, 2437853751270, 1715696202360, 1103008082763, 646609727594, 344863530000, 166870580976, 73006091235, 28760007465, 10150594650, 3190187214, 886163133, 215553195, 45379620, 8145060, 1221759, 148995, 14190, 990, 45, 1]
Аналогично вычислим коэффициенты
:
Код:
? B=G(x/p^2,(1-p)/p)/p-G(x/p,(1-p)/p)^2/G(x,(1-p)/p);
? for(n=2,10,print("n=",n,": ",(n-2)!*p^((n-1)*n/2)*polcoeff(B,n-2,x)))
n=2: -p + 1
n=3: p^3 - 2*p^2 + 1
n=4: -2*p^6 + 5*p^5 - 2*p^4 - 2*p^3 + 1
n=5: 6*p^10 - 18*p^9 + 12*p^8 + 7*p^7 - 6*p^6 - 2*p^4 + 1
n=6: -24*p^15 + 84*p^14 - 78*p^13 - 20*p^12 + 44*p^11 + 3*p^9 - 8*p^8 - 2*p^5 + 1
n=7: 120*p^21 - 480*p^20 + 570*p^19 - 340*p^17 + 80*p^16 + 70*p^14 - 20*p^12 + 11*p^11 - 10*p^10 - 2*p^6 + 1
n=8: -720*p^28 + 3240*p^27 - 4680*p^26 + 1050*p^25 + 2700*p^24 - 1380*p^23 - 110*p^22 - 420*p^21 + 150*p^20 + 190*p^19 - 72*p^18 + 102*p^17 - 20*p^16 - 30*p^15 + 13*p^13 - 12*p^12 - 2*p^7 + 1
n=9: 5040*p^36 - 25200*p^35 + 42840*p^34 - 18480*p^33 - 21840*p^32 + 19530*p^31 - 420*p^30 + 2030*p^29 - 2940*p^28 - 1680*p^27 + 1456*p^26 - 1050*p^25 + 462*p^24 + 322*p^23 - 98*p^21 + 70*p^20 - 42*p^18 + 15*p^15 - 14*p^14 - 2*p^8 + 1
n=10: -40320*p^45 + 221760*p^44 - 433440*p^43 + 272160*p^42 + 172200*p^41 - 263760*p^40 + 43680*p^39 + 36260*p^37 + 10640*p^36 - 24304*p^35 + 11424*p^34 - 6314*p^33 - 2464*p^32 + 1736*p^31 + 840*p^30 - 812*p^29 + 392*p^28 + 504*p^27 - 70*p^25 - 240*p^24 + 184*p^23 - 56*p^21 + 17*p^17 - 16*p^16 - 2*p^9 + 1
Ну и то же самое в терминах
:
Код:
? for(n=2,10,print("n=",n,": ",subst((n-2)!*p^((n-1)*n/2)*polcoeff(B,n-2,x),p,1-q)))
n=2: q
n=3: -q^3 + q^2 + q
n=4: -2*q^6 + 7*q^5 - 7*q^4 + 2*q^2 + q
n=5: 6*q^10 - 42*q^9 + 120*q^8 - 175*q^7 + 127*q^6 - 27*q^5 - 15*q^4 + 3*q^3 + 3*q^2 + q
n=6: 24*q^15 - 276*q^14 + 1422*q^13 - 4310*q^12 + 8464*q^11 - 11132*q^10 + 9699*q^9 - 5195*q^8 + 1276*q^7 + 160*q^6 - 126*q^5 - 18*q^4 + 8*q^3 + 4*q^2 + q
n=7: -120*q^21 + 2040*q^20 - 16170*q^19 + 79230*q^18 - 268130*q^17 + 662910*q^16 - 1234120*q^15 + 1755230*q^14 - 1911020*q^13 + 1575190*q^12 - 953711*q^11 + 395681*q^10 - 92305*q^9 + 815*q^8 + 5130*q^7 - 370*q^6 - 290*q^5 - 10*q^4 + 15*q^3 + 5*q^2 + q
n=8: -720*q^28 + 16920*q^27 - 189360*q^26 + 1342110*q^25 - 6757050*q^24 + 25689180*q^23 - 76525250*q^22 + 182891480*q^21 - 356096160*q^20 + 570187510*q^19 - 754395832*q^18 + 825120654*q^17 - 743077262*q^16 + 545786030*q^15 - 321299790*q^14 + 146965873*q^13 - 49192405*q^12 + 10407516*q^11 - 638244*q^10 - 299055*q^9 + 57495*q^8 + 8860*q^7 - 2050*q^6 - 495*q^5 + 15*q^4 + 24*q^3 + 6*q^2 + q
n=9: 5040*q^36 - 156240*q^35 + 2336040*q^34 - 22429680*q^33 + 155348760*q^32 - 826485450*q^31 + 3511838610*q^30 - 12233705120*q^29 + 35586221860*q^28 - 87589854590*q^27 + 184179975406*q^26 - 333137967386*q^25 + 520735389412*q^24 - 705369559860*q^23 + 828819159168*q^22 - 844164553036*q^21 + 743329835766*q^20 - 563148007128*q^19 + 364260463798*q^18 - 198825736046*q^17 + 89954803288*q^16 - 32774738417*q^15 + 9132396253*q^14 - 1735030283*q^13 + 143448711*q^12 + 24110303*q^11 - 7216279*q^10 - 96285*q^9 + 204365*q^8 + 5075*q^7 - 5467*q^6 - 693*q^5 + 63*q^4 + 35*q^3 + 7*q^2 + q
n=10: 40320*q^45 - 1592640*q^44 + 30592800*q^43 - 380721600*q^42 + 3450282360*q^41 - 24265137960*q^40 + 137811421440*q^39 - 649424892480*q^38 + 2589199733260*q^37 - 8861175241100*q^36 + 26321650988584*q^35 - 68447362735976*q^34 + 156866153721438*q^33 - 318488516926062*q^32 + 575158670045848*q^31 - 926622972439136*q^30 + 1334566654900948*q^29 - 1720443520219844*q^28 + 1986098244607624*q^27 - 2052454714331952*q^26 + 1896481636947058*q^25 - 1563560636660290*q^24 + 1146555516696776*q^23 - 744464579528448*q^22 + 425385941669304*q^21 - 212097241724312*q^20 + 91194696015080*q^19 - 33240686472224*q^18 + 10005169644865*q^17 - 2377426654433*q^16 + 406161752032*q^15 - 36764788920*q^14 - 2361494184*q^13 + 1120601048*q^12 - 60235840*q^11 - 20066648*q^10 + 1793218*q^9 + 441070*q^8 - 19320*q^7 - 11088*q^6 - 812*q^5 + 140*q^4 + 48*q^3 + 8*q^2 + q