Simulation lotri nan Excel

Lotri a se pa yon lachas pou chans,

se yon lachas pou pèdan.

Avèk regilarite privilégié (e pi souvan dènyèman), moun ekri m 'mande èd nan divès kalkil ki gen rapò ak lotri. Yon moun vle aplike algorithm sekrè yo pou chwazi nimewo genyen nan Excel, yon moun vle jwenn modèl nan nimewo yo ki te tonbe soti nan tiraj sot pase yo, yon moun vle trape òganizatè yo nan lotri a nan yon jwèt malonèt.

В этой статье мне хотелось бы ответить на часть этих вопросов. Благо, excel дave решения таких

Travay 1. Pwobabilite pou genyen

Ann pran klasik Stoloto 6 sou 45 lotri kòm egzanp. Dapre règ yo, sèlman moun ki dvine tout 10 nimewo soti nan 6 resevwa yon pri super (45 milyon rubles oswa plis si balans lan nan fon an akimile nan trase anvan yo). Si ou devine 5, ou pral resevwa 150 mil rubles, si 4 - 1500 rubles. , si 3 nimewo soti nan 6, Lè sa a, 150 rubles, si 2 nimewo - ou pral retounen 50 rubles depanse sou tikè a. Devine sèlman youn oswa okenn - jwenn andorfin sèlman nan pwosesis jwèt la.

Pwobabilite matematik pou genyen yo ka fasilman kalkile lè l sèvi avèk fonksyon estanda a NUMBERCOMB (Konbine), ki disponib nan Microsoft Excel pou yon ka konsa. Fonksyon sa a kalkile kantite konbinezon N nimewo ki soti nan M. Donk, pou lotri "6 sou 45" nou an, li ta:

=ЧИСЛКОМБ(45;6)

… ki egal a 8, kantite total tout konbinezon posib nan lotri sa a.

Si ou vle kalkile pwobabilite pou genyen yon pasyèl genyen (2-5 nimewo soti nan 6), Lè sa a, ou pral premye gen kalkile kantite opsyon sa yo, ki egal a pwodwi a nan kantite konbinezon nan nimewo devine soti nan. 6 pa kantite nonb ki pa devine nan rès (45-6) = 39 nimewo. Lè sa a, nou divize kantite total tout konbinezon posib (8) pa kantite viktwa yo resevwa pou chak opsyon - epi nou jwenn pwobabilite genyen pou chak ka:

By wout la, pwobabilite, pou egzanp, pou yo mouri nan yon aksidan avyon nan peyi nou an estime nan apeprè 1 nan yon milyon. Ak pwobabilite pou genyen nan yon kazino nan roulèt, parayj tout bagay sou yon nimewo se 1 a 37.

Si tout sa ki anwo yo pa t anpeche w epi w toujou pare pou w jwe pi lwen, kontinye.

Travay 2. Frekans chak nimewo yo parèt

Pou kòmanse, ann detèmine ak ki frekans sèten nimewo tonbe soti. Nan yon lotri ideyal, yo bay yon entèval tan ase gwo pou analiz, tout boul yo ta dwe gen menm pwobabilite pou yo nan echantiyon genyen an. An reyalite, karakteristik konsepsyon tanbou lotri a ak fòm pwa boul yo ka defòme foto sa a, e pou kèk boul, pwobabilite pou yo tonbe ka byen pi wo/pi ba pase pou lòt moun. Ann teste ipotèz sa a an pratik.

Ann pran, pou egzanp, done sou tout 2020 soti nan 21 tiraj lotri ki te fèt nan 6-45 soti nan sit entènèt la nan òganizatè yo Stoloto, ki fèt nan fòm lan nan tankou yon tab "entelijan", pratik pou analiz, ak non an. tabAchiv sikilasyon. Розыгрыши проходят два раза в день (в 11 утра и в 11 вечера), т.е. в этой таблице у нас полторы тысячи тиражей-строк — вполне достаточная для начала выборка выборка:

Pou kalkile frekans chak nimewo yo parèt, sèvi ak fonksyon an COUNTIF (COUNTIF) epi ajoute yon fonksyon nan li Tèks (Tèks)pou ajoute premye zewo ak asterisk anvan ak apre nan nimewo ki gen yon sèl chif, konsa COUNTIF chèche sikonstans yon nonb nenpòt kote nan konbinezon an nan kolòn B. Epitou, pou pi klè, nou pral bati yon tablo pa rezilta yo epi klase frekans yo. nan lòd desandan:

An mwayèn, nenpòt boul ta dwe tonbe 1459 trase * 6 boul / 45 nimewo = 194,53 fwa (sa a se egzakteman sa yo rele nan estatistik yo). математическим ожиданием), но хорошо видно, что некоторые числа (27, 32, 11 ... Соответственно, можно попробовать использовать эту информацию для стратегии выигрыша. л о ставить на тары, что

Travay 3. Ki nimewo yo pa trase depi lontan?

Yon lòt estrateji baze sou lide ke ak yon kantite ase gwo trase, pi bonè oswa pita chak nimewo nan tout ki disponib soti nan 1 a 45 ta dwe tonbe soti. Se konsa, si kèk nimewo pa te parèt nan mitan ganyan yo pou yon tan long ("boul frèt"), Lè sa a, li lojik eseye parye sou yo nan lavni. 

.. PLIS Ekspoze (MATCH). Li pral chèche depi anwo jouk anba (sa vle di soti nan nouvo nan ansyen kouri) pou chèche chak nimewo epi bay nimewo seri a nan kouri nan (konte depi nan fen ane a nan kòmansman an) kote nimewo sa a te tonbe dènye:

Задача 4. Генератор случайных чисел

Yon lòt estrateji jwèt ki baze sou elimine faktè sikolojik la lè w ap devine nimewo. Lè yon jwè chwazi nimewo pa fè parye li, li enkonsyaman fè sa pa totalman rasyonèl. Dapre estatistik, pou egzanp, nimewo ki soti nan 1 a 31 yo chwazi 70% pi souvan pase rès la (dat pi renmen), 13 se chwazi mwens souvan (modi douzèn), nimewo ki gen "chans" sèt yo pi souvan chwazi, elatriye. Men nap jwe kont yon machin (tanbou lotri) pou tout nimewo yo se menm, donk li gen sans pou nou chwazi yo ak menm enpasyalite matematik pou nou egalize chans nou. Pou fè sa, nou bezwen kreye yon dèlko nan nimewo o aza ak - pi enpòtan - ki pa repete nan Excel:

Pou fè sa:

1. Ann kreye yon tab "entelijan" yo te rele tableGenerator, kote premye kolòn nan pral nimewo nou yo soti nan 1 a 45.
2. Nan dezyèm kolòn nan, antre pwa a pou chak nimewo (n ap bezwen li yon ti kras pita). Si tout nimewo yo gen menm valè pou nou epi nou vle chwazi yo ak pwobabilite egal, Lè sa a, pwa a ka mete egal a 1 toupatou.
3. Nan twazyèm kolòn nan nou itilize fonksyon an SLCHIS (RAND), которая в Excel генерирует случайное дробное число от 0 до 1, добавив к нему вес из предисло от. Таким образом каждый раз при пересчёте листа (нажатии на клавишу F9) yon nouvo seri 45 nimewo o aza pral pwodwi, pran an kont pwa a pou chak nan yo.
4. Ann ajoute yon katriyèm kolòn, kote w ap itilize fonksyon an RAN (RANK) вычислим ранг (позицию в топе) для каждого из чисел.

Koulye a, li rete fè yon seleksyon nan sis premye nimewo yo pa ran 6 lè l sèvi avèk fonksyon an PLIS Ekspoze (MATCH):

При нажатии на клавишу F9 fòmil yo sou fèy Excel la pral rekalkile epi chak fwa nou pral jwenn yon seri nouvo 6 nimewo nan selil vèt. Anplis, nimewo yo ki te mete yon pi gwo pwa nan kolòn B yo pral resevwa yon ran pwopòsyonèl pi wo epi, kidonk, parèt pi souvan nan rezilta echantiyon o aza nou an. Si pwa a pou tout nimewo yo mete nan menm bagay la tou, Lè sa a, tout nan yo pral chwazi ak menm pwobabilite a. Nan fason sa a nou jwenn yon dèlko nimewo o aza ki jis ak san patipri nan 6 sou 45, men ak kapasite nan fè ajisteman nan o aza nan distribisyon an si sa nesesè.

Si nou deside jwe nan chak tiraj pa ak youn, men, pou egzanp, ak de tikè nan yon fwa, nan chak nan ki nou pral chwazi nimewo ki pa repete, Lè sa a, nou ka tou senpleman ajoute liy adisyonèl anba nan seri vèt la, ajoute 6, 12, 18, elatriye nan ran an. d. respektivman:

Travay 5. Similatè lotri nan Excel

Kòm yon apoteoz nan sijè sa a tout antye, se pou yo kreye yon similatè lotri konplè nan Excel, kote ou ka eseye nenpòt estrateji epi konpare rezilta yo (nan teyori optimize, yon bagay ki sanble yo rele tou metòd Monte Carlo, men li pral pi senp. pou nou).

Pou fè tout bagay pi pre reyalite ke posib, imajine pou yon ti moman ke li se 1ye janvye 2022 epi nou gen tiraj ane sa a devan nou, nan ki nou planifye yo jwe. Mwen te antre reyèl nimewo yo tonbe nan tablo a tablTiraži2022, separe nimewo yo trase anplis youn ak lòt nan kolòn separe pou konvenyans nan kalkil ki vin apre yo:

Sou yon fèy separe Jwèt kreye yon vid pou modèl nan fòm lan nan yon tab "entelijan" ak non an tabIgra fòm sa a:

Isit la:

• Nan selil jòn ki anwo yo, n ap fikse pou makro a kantite tiraj an 2022 kote nou vle patisipe (1-82) ak kantite tikè nou jwe nan chak tiraj.
• Done pou 11 premye kolòn yo (AJ) pral kopye pa makro ki soti nan fèy trase 2022 la.
• Done pou pwochen sis kolòn yo (KP) macro a pral pran nan fèy la Dèlko, kote nou te aplike yon dèlko nimewo o aza (gade pwoblèm 4 pi wo a).
• Nan kolòn Q, nou konte kantite alimèt ki genyen ant nimewo yo tonbe ak sa yo ki te pwodwi lè l sèvi avèk fonksyon an SUMPRODUCT (SÒM PWODWI).
• В столбце R вычисляем финансовый результат (если не выиграли, то минус 50 рублей зансовый результат, то минус 50 рублей зансовый результат)
• Nan dènye kolòn S la, nou konsidere rezilta an jeneral nan jwèt la tout antye kòm yon total kimilatif yo nan lòd yo wè dinamik yo nan pwosesis la.

E pou revwar sa striktir antye, nou bezwen en pti macro. Sou tab la pwomotè (Devlopè) chwazi yon ekip Vizyèl Debaz oswa itilize rakoursi klavye Alt+F11. Lè sa a, ajoute yon nouvo modil vid atravè meni an Mete – Modil epi antre kòd sa a la:

Sub Lotri() Dim iGames kòm nonb antye relatif, iTickets kòm nonb antye relatif, i As Long, t kòm nonb antye relatif, b Kòm nonb antye relatif 'объявляем переменные для ссылки на листы Set wsGame = Worksheets ("Worksheets")("Игранера") wsArchive = Worksheets("Тиражи 2022") iGames = wsGame.Range("C1") 'количество тиражей iTickets = wsGame.Range("C2") 'количество билетов в каждом тираже i = 5 'первая строка в таблице таблИгра wsGame.Rows ("6:1048576").Delete 'очищаем старые данные For t = 1 To iGames For b = 1 To iTickets 'копируем выигравшие номера с листа Тиражи 2022 и вставляем на лист Игра wsArchive.Cells(t + 1, 1).Resize (1, 10).Copy Destination:=wsGame.Cells(i, 1) 'копируем и вставляем специальной вставкой значений сгенерированные номера с листа Генератор wsNumbers.Range("G4:L4").Copy wsGame.Cells(i, 11) .PasteSpecial Paste:=xlPasteValues ​​i = i + 1 Next b Next t End Sub  

Li rete pou antre nan paramèt inisyal yo vle nan selil jòn yo epi kouri macro nan Devlopè - Macro (Devlopè — Macro) oswa rakoursi klavye Alt+F8.

Pou plis klè, ou kapab tou bati yon dyagram pou dènye kolòn nan ak yon total kimilatif, ki reflete chanjman nan balans lajan an pandan jwèt la:

Konparezon diferan estrateji

Koulye a, lè l sèvi avèk similatè kreye a, ou ka teste nenpòt estrateji jwèt sou trase reyèl nan 2022 epi wè rezilta yo ke li ta pote. Si ou jwe 1 tikè nan chak tiraj, Lè sa a, foto an jeneral nan "prin" sanble yon bagay tankou sa a:

Isit la:

• Dèlko se yon jwèt kote nan chak tiraj nou chwazi nimewo o aza kreye pa dèlko nou an (ak menm pwa a).
• Favorites se yon jwèt kote nan chak tiraj nou itilize menm nimewo yo - sa yo ki pi souvan tonbe soti nan tiraj sou de ane ki sot pase yo (27, 32, 11, 14, 34, 40).
• Ki soti andeyò – menm bagay la tou, men nou itilize nimewo ki pi ra yo (12, 18, 26, 10, 21, 6).
• Fwad – nan tout tiraj nou itilize nimewo ki pa tonbe soti depi lontan (35, 5, 39, 11, 6, 29).

Kòm ou ka wè, pa gen okenn gwo diferans, men dèlko nimewo o aza a konpòte yon ti kras pi byen pase lòt "estrateji yo".

Можно также попробовать играть большим количеством билетов в каждом тираже, чтераже, чтерьбы кобовать личество вариантов (иногда для этого несколько игроков объединяются в группу).

Jwe nan chak tiraj ak yon tikè ak nimewo owaza pwodwi (ak menm pwa a):

Jwe 10 tikè nan chak tiraj ak nimewo ki te pwodwi owaza (ak menm pwa a):

Jwe 100 tikè nan chak tiraj ak nimewo o aza (ak menm pwa a):

Kòmantè yo, jan yo di, se initil - yon drenaj depo se inevitab nan tout ka 🙂