Update Przewodnik_studenta_lab/02LRAP_przewodnik.ipynb
This commit is contained in:
parent
fc21bb9365
commit
b2367f6196
@ -49,7 +49,7 @@
|
||||
"source": [
|
||||
"**Przykład 1**\n",
|
||||
"\n",
|
||||
"Rzucamy dwukrotnie sześcienną kostką do gry. Ile wynosi prawdopodobieństwo, że suma wyrzuconych oczek jest większa od 7, jeśli wiemy, że w pierwszym rzucie wypadła parzysta liczba oczek?"
|
||||
"Rzucamy dwukrotnie sześcienną kostką do gry. Ile wynosi prawdopodobieństwo, że suma wyrzuconych oczek jest większa od $7$, jeśli wiemy, że w pierwszym rzucie wypadła parzysta liczba oczek?"
|
||||
]
|
||||
},
|
||||
{
|
||||
@ -63,15 +63,15 @@
|
||||
],
|
||||
"source": [
|
||||
"# Definiujemy przestrzeń probabilistyczną odpowiadającą temu doświadczeniu losowemu\n",
|
||||
"kostki2=rolldie(2,makespace=TRUE)\n",
|
||||
"kostki2 = rolldie(2, makespace=TRUE)\n",
|
||||
"# Definiujemy zdarzenia A i B. Skorzystamy z operatora %% (x %% y zwraca resztę z dzielenia x przez y)\n",
|
||||
"A=subset(kostki2,X1 %% 2 == 0)\n",
|
||||
"B=subset(kostki2,X1+X2>7)\n",
|
||||
"A = subset(kostki2, X1 %% 2 == 0)\n",
|
||||
"B = subset(kostki2, X1 + X2 > 7)\n",
|
||||
"# Obliczamy prawdopodobieństwo warunkowe P(A|B)\n",
|
||||
"p=Prob(A,given=B)\n",
|
||||
"p = Prob(A, given=B)\n",
|
||||
"print(p)\n",
|
||||
"# Możemy porównać to prawdopodobieństwo do prawdopodobieństwa zdarzenia A\n",
|
||||
"p2=Prob(A)\n",
|
||||
"p2 = Prob(A)\n",
|
||||
"print(p2)"
|
||||
]
|
||||
},
|
||||
@ -88,7 +88,7 @@
|
||||
"\n",
|
||||
"$$ \\mathbb{P}(A_1\\times A_2) = \\mathbb{P}_1(A_1)\\cdot\\mathbb{P}_2(A_2).$$\n",
|
||||
"\n",
|
||||
"W analogiczny sposób możemy definiować produkt dowolnej, skończonej liczby przestrzeni probabilistycznych. W programie R istnieje kilka sposobów modelowania tego typu przestrzeni.\n",
|
||||
"W analogiczny sposób możemy definiować produkt dowolnej, skończonej liczby przestrzeni probabilistycznych. W języku R istnieje kilka sposobów modelowania tego typu przestrzeni.\n",
|
||||
"\n",
|
||||
"### Niezależne powtórzenia tego samego eksperymentu losowego\n",
|
||||
"\n",
|
||||
@ -103,7 +103,7 @@
|
||||
"Wygeneruj przestrzeń probabilistyczną odpowiadającą trzykrotnemu rzutowi czworościenną kostką przy założeniu, że:\n",
|
||||
"\n",
|
||||
"* kostka jest symetryczna (tzn. każdy wynik jest równo prawdopodobny),\n",
|
||||
"* prawdopodobieństwo wypadnięcia 1 to 1/2, a prawdopodobieństwo wypadnięcia dowolnej innej liczby oczek to 1/6."
|
||||
"* prawdopodobieństwo wypadnięcia $1$ to $1/2$, a prawdopodobieństwo wypadnięcia dowolnej innej liczby oczek to $1/6$."
|
||||
]
|
||||
},
|
||||
{
|
||||
@ -117,12 +117,12 @@
|
||||
],
|
||||
"source": [
|
||||
"# Generujemy przestrzeń probabilistyczną odpowiadającą 3-krotnemu rzutowi symetryczną kostką\n",
|
||||
"x=1:4\n",
|
||||
"kostka_sym=iidspace(x,3)\n",
|
||||
"x = 1:4\n",
|
||||
"kostka_sym = iidspace(x, 3)\n",
|
||||
"print(kostka_sym)\n",
|
||||
"# Zwróćmy uwagę, że równoważnie można było w tym przypadku użyć polecenia rolldie(3,nsides=4,makespace=TRUE)\n",
|
||||
"# Zwróćmy uwagę, że równoważnie można było w tym przypadku użyć polecenia rolldie(3, nsides=4, makespace=TRUE)\n",
|
||||
"# Generujemy przestrzeń probabilistyczną odpowiadającą 3-krotnemu rzutowi ,,oszukaną'' kostką\n",
|
||||
"kostka_osz=iidspace(x,3,probs=c(1/2,1/6,1/6,1/6))\n",
|
||||
"kostka_osz = iidspace(x, 3, probs = c(1/2, 1/6, 1/6, 1/6))\n",
|
||||
"print(kostka_osz)"
|
||||
]
|
||||
},
|
||||
|
Loading…
Reference in New Issue
Block a user