Házi feladatok

1. feladat

Dobjon föl 20-szor egy pénzdarabot, és ellenőrizze az előadás alapján, hogy nem hamis-e.

2. feladat

Sorsoljon 1000 kockadobást számítógéppel, majd ellenőrizze: mondhatjuk-e, hogy az adatok hibátlan kockával való dobásból származnak. Csinálja meg ugyanezt 100, 10  és 5 kockadobással. Egyesek néha a 5 dobásnál azt fogják kapni, hogy gyanús a kocka.

3. feladat

Ismert, hogy egy telefonközpontba egy perc alatt beérkező hívások száma Poisson-eloszlású valószínűségi változó, λ=8 paraméterrel, azaz P(X=k)=(((λ^k)(e^(-λ)))/(k!))  (k=0,1,2,...).
A hívások X számát 75 percen keresztül megfigyelve a következő eredményeket kaptuk:

(({{X≤6, 14, 0.313374}, {7≤X≤8, 15, 0}, {9≤X≤10, 18, 0}, {11≤X≤12, 15, 0}, {13≤X, 13, 0}}))

p:=PDF[PoissonDistribution[8.]]

Total[p/@Range[0,6]]

A fentiek alapján számoljuk ki a valószínűségeket, azaz a 3. oszlop elemeit. Először a lépések, majd a program módosításával döntsük el, hogy igaz-e a nullhipotézisünk. (r értéke most 5, tehát r-1 értéke 4.)

4. feladat

Állítsa elő minél többféleképpen az alábbi listát:

{"1999.10.15","1999.11.15","1999.12.15","2000.1.15","2000.2.15","2000.3.15","2000.4.15","2000.5.15"}

Range, MapIndexed,ToString, StringJoin