Преф и поезд

[Yadryara]

Amw в сообщении #1620183 писал(а):

Вы мне что хотите доказать?

Вроде ничего не хочу.

Amw в сообщении #1620183 писал(а):

Я Вам говорю, что результат надежно сошелся к 21%.

Какой смысл Вы вкладываете в слово "надежно"?

Amw в сообщении #1620183 писал(а):

В 20-ти картах было 4 дамы...

И это всё уточнение? Если вы раздавали в каждом опыте по 20 одних и тех же карт, то каковы были другие 16 карт?

[Amw]

Yadryara в сообщении #1620191 писал(а):

Какой смысл Вы вкладываете в слово "надежно"?

Товарищ согласился со мной, что 21%... Нам было достаточно.

Yadryara в сообщении #1620191 писал(а):

Если вы раздавали в каждом опыте по 20 одних и тех же карт, то каковы были другие 16 карт?

Не 16, а 12 - в преферансе 32 карты.
Сейчас точно вспомнил, мы догадались (возможно не сразу), одну раздачу считать за шесть опытов... Допустим взяли 20 карт, всех номиналов по три - Т,К,Д,В,10,9 и две семерки.
Семерки ещё можно было использовать для определения вероятности выпадения второго короля...

[Yadryara]

Amw в сообщении #1620208 писал(а):

Нам было достаточно.

А вы с товарищем тогда были в курсе про Правило трёх сигм?

Amw в сообщении #1620208 писал(а):

Не 16, а 12 - в преферансе 32 карты.

Нет, именно о 16-ти я спрашивал, потому что $20-4=16$

И вот ответ именно на этот мой вопрос:

Amw в сообщении #1620208 писал(а):

Допустим взяли 20 карт, всех номиналов по три - Т,К,Д,В,10,9 и две семерки.

А это точно та же самая задача? Мы моделировали вот эту:

Евгений Машеров в сообщении #1620066 писал(а):

То есть имеется 20 карт, из них 3 масти А и 17 масти Б, распределённых на две группы по 10? Какова вероятность, что в одной из групп все три карты масти А?

[Amw]

Yadryara в сообщении #1620218 писал(а):

А это точно та же самая задача?

Точно та же самая, просто масти карт заменили на номиналы потому, что номиналов больше...

[Yadryara]

Переписал прогу под новый вариант. Действительно количество успехов возрастает 6-кратно.

Так что даже для эквивалента миллиарда раздач есть стата. Потому что было достаточно $166666667$ раздач.

Вверху количество успехов для старой проги, внизу — для новой.

10 млн. раздач:

$2105275$
$2105357$

100 млн. раздач:

$21045606$
$21061298$

1 млрд. раздач:

$210534226$

(PARI)

t0=getwalltime();
print();
kol=[1,1,1,2,2,2,3,3,3,4,4,4,5,5,5,6,6,6,7,7];
nom=vector(10);\\d=vector(7);
k=0;
start=1;
stop=166666667;

{for(i=start,stop,
k0=0;k3=0;d=vector(7);
for(j=1,10,kannom = random(20)+1;
for(x=1,j-1,
if (kannom == nom[x],j=j-1;next(2)));

nom[j] = kannom;d[kol[nom[j]]]++);

kold=k;

for(y=1,6,
if (d[y] == 0 || d[y] == 3,k++));

if (k-kold>5,
print(k,"  ",nom,"  ",d[1],"  ",d[2],"  ",d[3],"  ",d[4],"  ",d[5],"  ",d[6]);
print()));

tob=getwalltime()-t0;
print();
print(k,"  ");printf("TIME = %0.2f seconds",tob/1000);}
quit;