xcjajx/Rachunek_prawdopodobienstwa
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects 1 Releases Wiki Activity

Update Przewodnik_studenta_lab/01LRAP_przewodnik.ipynb

Browse Source
This commit is contained in:
xcjajx 2024-10-17 15:25:17 +02:00
parent a472a8516f
commit 3b8c97216e
1 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
Przewodnik_studenta_lab/01LRAP_przewodnik.ipynb
View File

@ -347,15 +347,15 @@
"metadata": {},
"outputs": [],
"source": [
"# Wyykorzystamy zdefiniowaną wcześniej przestrzeń kostki3\n",
"# Wykorzystamy zdefiniowaną wcześniej przestrzeń kostki3\n",
"# Zwróćmy uwagę, że zdarzenie A oznacza, że w pierwszym i drugim rzucie były szóstki LUB w pierwszym i trzecim rzucie były szóstki LUB w drugim i trzecim rzucie były szóstki\n",
"# Możemy wyznaczyć prawdopodobieństwo A bezpośrednio przez użycie polecenia prob i odpowiedniej formuły logicznej\n",
"pA = Prob(kostki3, (X1==6&X2==6)|(X1==6&X3==6)|(X2==6&X3==6))\n",
"pA = Prob(kostki3, (X1==6 & X2==6) | (X1==6 & X3==6) | (X2==6 & X3==6))\n",
"print(pA)\n",
"# Alternatywnie, możemy wyznaczyć najpierw trzy pomocnicze zdarzenia i na końcu wyznaczyć ich sumę\n",
"A1 = subset(kostki3, X1==6&X2==6)\n",
"A2 = subset(kostki3, X1==6&X3==6)\n",
"A3 = subset(kostki3, X2==6&X3==6)\n",
"A1 = subset(kostki3, X1==6 & X2==6)\n",
"A2 = subset(kostki3, X1==6 & X3==6)\n",
"A3 = subset(kostki3, X2==6 & X3==6)\n",
"A = union(A1, union(A2, A3))\n",
"pA = Prob(A)\n",
"print(pA)\n",
@ -375,7 +375,7 @@
"\n",
"Do symulowania wyników doświadczenia losowego służy funkcja `sim(X, ntrials)`, gdzie `X` jest przestrzenią probabilistyczną, a `ntrials` liczbą powtórzeń eksperymentu losowego.\n",
"\n",
"Z drugiej strony, jeśli wielokrotnie powtórzymy pewne doświadczenie losowe, to możemy na podstawie wyników spróbować wyznaczyć przestrzeń probabilistyczną. W języku R można to osiągnąć używając polecenia `empirical(X)`, gdzie `x` zawiera wyniki doświadczenia losowego. Polecenie to szacuje prawdopodobieństwa zdarzeń elementarnych jako ich relatywną częstość występowania."
"Z drugiej strony, jeśli wielokrotnie powtórzymy pewne doświadczenie losowe, to możemy na podstawie wyników spróbować wyznaczyć przestrzeń probabilistyczną. W języku R można to osiągnąć używając polecenia `empirical(X)`, gdzie `X` zawiera wyniki doświadczenia losowego. Polecenie to szacuje prawdopodobieństwa zdarzeń elementarnych jako ich relatywną częstość występowania."
]
},
{
@ -385,7 +385,7 @@
"source": [
"**Przykład 8**\n",
"\n",
"Ania i Bartek grają w grę ,,Losowe szlaki''. Prawdopodobieństwo wygranej Ani wynosi $0.3$, wygranej Bartka to $0.5$, a remisu $0.2$. Wykonaj symulacją $100$ powtórzeń tego eksperymentu losowego. Następnie porównaj rozkład wylosowanych wartości z ich rzeczywistym rozkładem."
"Ania i Bartek grają w grę ,,Losowe szlaki''. Prawdopodobieństwo wygranej Ani wynosi $0{,}3$, wygranej Bartka to $0{,}5$, a remisu $0{,}2$. Wykonaj symulacją $100$ powtórzeń tego eksperymentu losowego. Następnie porównaj rozkład wylosowanych wartości z ich rzeczywistym rozkładem."
]
},
{
@ -406,8 +406,8 @@
"\n",
"# Możemy też porównać otrzymany rozkład z rozkładem pierwotnym na wykresie\n",
"w = rbind(gra$probs, gra_bis$probs)\n",
"barplot(w,names.arg=gra$x,beside=TRUE,col=c('lightblue','darkred'),xlab='Wyniki gry',ylab='Prawdopodobieństwo', main='Porównanie rozkładu rzeczywistego i wynikającego z symulacji')\n",
"legend(7,0.5,c('Rozkład rzeczywisty','Symulacja'),col=c('lightblue','darkred'),pch=15)"
"barplot(w, names.arg=gra$x, beside=TRUE, col=c('lightblue','darkred'), xlab='Wyniki gry', ylab='Prawdopodobieństwo', main='Porównanie rozkładu rzeczywistego i wynikającego z symulacji')\n",
"legend(7, 0.5, c('Rozkład rzeczywisty', 'Symulacja'), col=c('lightblue', 'darkred'), pch=15)"
]
},
{