Érdekes fizikai jelenségek
Elküldve: 2013.01.14. 13:20
@Gézoo (61614): Gratulálok, sikerült közelítőleg kiszámítanod az 1-(1-1/1000)^1000 ≈ 0.632 ≈ 1-1/e értéket. Csak tudnám, hogy mi köze van ennek a feladathoz.
A Szkeptikus Társaság vitafóruma mindenki számára
https://forum.szkeptikus.hu/
Tehát szerinted ha 1 és 3 között generálunk véletlenszámokat, az átlagnak 1,5-nek kell lennie?Még nagyon sok generálás eloszlása is az egyenletes 1,5 átlag helyett 2,1 átlagú.
Elhiszem, hogy tudsz olyan programot írni, ami kiírja, hogy 50-50%. Az más kérdés, hogy semmi köze nincs a szóban forgó feladathoz.Ugyanazt az eredményt adják, bármelyik lehetőséget választjuk.
Erdekes, hogy nekem jo kozelitessel ez jon ki egyszeru MS Excel 2003-as valtozatat hasznalva.Ha generálunk 999-szer egy az 1-2-3 számok valamelyikéből álló számot RND-vel, akkor sohasem kapunk 333-333-333 darabot az egyes számokból, hanem 60-70 %-ban valamelyik számból kapjuk a többséget.
Biztos?ha sok százezer 1-3 közötti véletlen számot generálunk, akkor akármi is lehet az átlaguk
Nem lehet akarmi az atlaguk. (pl. egynel kisebb es haromnal nagyobb soha nem lesz )Nem. Szerintem ha sok százezer 1-3 közötti véletlen számot generálunk, akkor akármi is lehet az átlaguk.
Egy ilyen eloszlas nagyon is korrelalt lenne. Annak az eselye hogy pont ugyanannyi jon ki 1-esbol mint kettesbol, egyre kevesebb lesz ha a kiserletszamot noveled.Viszont éppen ezért nem használhatók az egyenletes eloszlást megkövetelő tesztekben.
Ugyanis az egyenletes eloszlás követelménye: l db 1, m db 2, n db 3, azaz végesen nagy kísérlet esetén l=m=n egyenlőséghez közelítenie kell a részeknek. (Lehetőleg teljesüljön az egyenlőség.)
Rossz a programod, en mar korabban megtettem excelben, irtam az eredmenyeket, megegyeznek az elmeletileg vart eredmennyel.Na akkor most generálj 3 db számot 1-2-3 közül, egymás után ezerszer.
(Itt a program, lentebb csak futtatnod kell,) és nézd meg, hogy hány alkalommal van jelen mindhárom számjegy az egyenletes eloszlás követelményeként.
Ilyenkor a musorvezeto szol a jatekosnak, hogy "figyelj, most csak az 1-est es a 3-ast valaszthatod, a kettest nem!" ?k1 k2 a elrendezés
elsőre választható 1,3
k1 CS
a
vég=1000 ' ennyiszer végezzük el a 9 db generálást, (számok db)
számok=9 ' 1-9 ig generálandó véletlenszám
határ=0 ' csak azokat tekintjük generáltnak, amit legalább egyszer
' generáltunk
For j=1 To vég
szám2[j]=0 ' töröljük az összesítő tömböt
For i=1 to számok ' itt töröljük a számjegyek előfordulását
tömb=0 ' regisztráló tömböt
EndFor
For i=1 to számok
ii=math.Floor(Math.GetRandomNumber(számok)) ' a véletlenszám generálása
tömb[ii]=tömb[ii]+1 ' a generált szám fiókjába +1-et teszünk
EndFor
' ebben a részben megszámláljuk a generált egymástól eltérő számokat
szám=0
For i=1 To számok
If tömb>határ Then
szám=szám+1
EndIf
EndFor
' eredmények kiírásai:
TextWindow.Write(szám)
szám2[j]=szám
EndFor
File.DeleteFile("c:\véletlen.txt")
átlag=0
For j=1 To vég
kiírandó=szám2[j]+","
átlag=átlag+szám2[j]
File.AppendContents("c:\véletlen.txt",kiírandó)
EndFor
átlag=átlag/vég
kiírandó=" átlag: "+átlag+"
File.AppendContents("c:\véletlen.txt",kiírandó)
Program.End()
"6,5,5,6,6,5,7,5,5,6,7,6,7,4,7,7,7,6,6,5,7,7,6,5,6,6,5,5,7,5,6,7,8,4,5,6,7,5,6,7,8,5,5,6,6,4,4,6,6,8,6,7,7,6,6,7,6,7,5,7,
4,5,6,5,6,6,6,5,7,5,7,7,5,6,6,7,6,6,6,7,6,6,7,5,4,5,7,6,6,6,7,6,7,7,6,6,7,7,6,6,7,5,7,8,6,4,5,4,6,7,7,5,8,8,6,6,7,7,5,6,
5,5,5,7,6,7,5,5,7,6,5,6,7,8,6,6,8,6,5,6,6,6,6,5,5,6,6,4,7,5,5,5,7,6,6,5,7,7,5,7,6,5,6,5,5,7,6,6,7,6,6,5,6,6,7,7,6,6,6,6,
7,8,6,8,8,4,5,6,8,6,7,5,6,5,6,6,5,6,7,7,6,6,7,5,4,6,7,5,5,6,7,5,5,7,5,7,7,5,5,7,6,6,6,6,6,5,6,7,5,4,6,7,8,5,4,6,5,6,7,5,
5,4,5,6,6,6,6,5,7,7,6,6,6,5,6,5,7,6,7,7,6,5,6,7,6,5,5,6,4,5,6,6,5,6,6,8,6,6,6,5,6,6,6,6,5,7,5,7,6,7,5,6,5,5,5,6,7,4,6,6,
6,7,6,6,5,6,4,7,6,7,6,4,5,5,5,5,5,5,6,6,5,6,7,6,5,5,6,4,6,4,7,7,6,4,6,7,6,7,5,4,6,5,7,5,6,6,5,6,6,6,6,7,4,5,5,7,4,7,7,4,
5,6,7,4,7,6,8,8,5,5,7,5,7,5,5,6,5,5,6,5,5,3,7,5,5,6,6,6,5,5,7,7,5,5,5,6,7,6,5,6,7,5,6,6,7,6,7,6,6,5,7,8,6,6,4,7,7,6,5,7,
6,6,5,6,6,5,5,5,7,7,6,6,8,7,5,6,6,6,4,6,7,5,8,6,7,5,7,7,6,6,4,6,6,6,5,6,4,6,5,5,7,6,6,6,6,6,5,4,5,7,6,6,5,6,7,8,6,7,7,7,
6,6,6,5,7,6,5,6,5,5,7,6,6,6,6,6,7,6,7,6,6,5,6,6,4,7,6,6,5,6,5,7,7,7,5,6,6,4,6,5,6,6,6,5,6,5,4,6,6,6,5,6,6,4,6,6,6,6,7,6,
5,6,4,7,6,6,6,7,6,7,6,6,6,7,7,8,5,7,7,5,7,6,6,7,6,9,5,6,6,6,6,6,6,5,5,5,6,7,7,5,6,7,8,5,5,5,6,7,4,8,5,5,3,7,6,7,7,5,6,6,
6,5,6,6,5,7,7,7,8,6,6,5,6,5,6,6,7,7,5,7,7,4,6,4,7,6,6,5,7,5,4,7,5,6,7,6,7,6,6,5,5,6,7,7,6,7,5,6,6,6,7,5,5,6,4,7,7,5,5,5,
6,6,5,6,5,6,6,5,5,7,5,6,7,5,6,5,5,5,7,5,6,6,6,8,4,4,7,6,6,6,7,6,6,4,4,5,6,6,6,6,5,7,6,7,6,6,5,6,6,6,7,5,6,5,6,6,6,5,7,6,
5,6,7,6,6,6,6,5,5,6,6,7,4,7,6,6,6,6,6,6,6,6,5,5,6,4,5,7,6,7,5,6,4,4,6,4,7,6,7,6,6,8,6,6,6,5,6,6,6,6,5,5,8,6,5,5,7,5,7,4,
6,6,5,5,5,6,7,5,5,5,4,6,7,6,5,5,6,8,6,4,7,6,6,4,5,7,6,4,6,6,5,7,7,6,6,5,6,7,4,7,5,5,6,7,7,8,5,5,5,6,6,6,5,5,5,8,6,5,6,6,
5,5,5,5,5,4,6,6,5,7,5,5,6,7,4,5,7,7,6,5,6,5,7,6,5,6,7,5,6,7,6,5,6,5,4,7,6,6,8,6,6,7,5,5,5,5,6,6,6,6,7,5,6,6,6,7,6,7,5,5,
5,5,7,6,6,4,7,4,7,7,5,6,6,5,5,7,4,6,6,5,5,8,6,6,4,4,6,6,7,6,7,6,7,7,5,6,5,7,5,7,5,5,7,7,4,7,6,5,7,5,5,5,5,7,6,5,6,6,5,5,
3,6,5,6,7,6,6,6,7,6,5,6,4,6,7,6,6,5,7,5,5,7,5,6,7,6,6,5,7,6,4,6,6,5,6,6,5,6,6,7,
átlag: 5,874"
felsorolásod hamis, ugyanis nem az volt a kérdés, hogy a k1 vagy a k2 kecskét jelöli-e meg a játékos, ezért miután:k1 k2 a
k1 a k2
k2 a k1
k2 k1 a
a k1 k2
a k2 k1
Mert senki nem akadalyozza meg a jatekost, hogy elsore a 2-est valassza, ugyebar.k1 k2 a elrendezés
elsőre választható 1,3
DE, sajnos a játékos akadályozza meg önmagát amikor az 1 -est vagy éppen a 3-ast választja elsőre, olyankor nem tudja a 2-est kiválasztani elsőre, egyik esetben sem.Mert senki nem akadalyozza meg a jatekost, hogy elsore a 2-est valassza, ugyebar.
Az elobbi ploton azt is megmuttatam, hogy a generalt eloszlas precizen egyenletes.Kellene készíteni egy precíz egyenletes eloszlást képző RND függvényt, az egymást követő hívásaira nézve szintén egyenletes eloszlással, és azzal talán lehetne szimulálni a választások sokaságát.
Mar Andras fentebb ramutatott, hogy ez a kiserlet pont azt az eredmenyt kell adja (ha az eloszlas egyenletes)Oké, megmutatnád a program 1-100 tartományban generált véletlen számainak az eloszlását?
Tudod, úgy, hogy generálsz 100 db véletlen számot 1-100 között,
és egy tömb[generált számú] eleméhez adsz egyet.
Majd megszámláltatod a tömb[]>0 elemek számát az 1-100 indexek esetén.