En esta parte del curso se desarrollarán los capítulos 2,3,4, 5 y 6 del libro de Probabilidad y Estadística para Ingeniería y Ciencias de Walpole.
El espacio muestral es el conjunto de todos los posibles resultados de un experimento aleatorio. El espacio muestra, se simboliza con la letra \(\small S\).
Ejemplo 1
Se lanza una moneda al aire, entonces: \[ \small S = \{cara, sello\} \] Ejemplo 2
Se lanza una moneda al aire dos veces, entonces, \[ \small S = \{cc, cs,sc,ss\} \]
library(DiagrammeR)
# Diagrama en formato DOT
grViz("
digraph arbol_moneda {
node [shape=circle, style=filled, color=lightblue]
Inicio -> Cara1 [label='Cara']
Inicio -> Sello1 [label='Sello']
Cara1 -> Cara2 [label='Cara']
Cara1 -> Sello2 [label='Sello']
Sello1 -> Cara3 [label='Cara']
Sello1 -> Sello3 [label='Sello']
Inicio [label='Inicio']
Cara1 [label='Cara']
Sello1 [label='Sello']
Cara2 [label='Cara']
Sello2 [label='Sello']
Cara3 [label='Cara']
Sello3 [label='Sello']
}
")
Nota Cuando el número de elementos de \(\small S\) es grande, lo mejor calcular el número de sus elementos.
*Ejemplo 2**
Cuántos elementos tiene el espacio muestral del experimento de conocer todas las respuestas posibles de un cuestionario de 5 preguntas de opción múltiple con cuatro posibilidades?
Solución \(\small n(S)= 4^5\)
Un evento es cualquier subconjunto de un espacio muestral. Los eventos se simbolizan con letras mayúsculas del alfabeto occidental.
Ejemplo 3
Sea \(\small S =\{1,2,3,4,5,6\}\) que representa el espacio muestral del lanzamiento de un dado legal. Se definen los siguientes eventos:
\(\small A=\{1,2,4,5\}\), \(\small B=\{1,3,4,6\}\), \(\small C=\{1,2,5,6\}\), \(\small S\), \(\small \phi\)
Definición 3 Operaciones entre conjuntos
knitr::include_graphics("Conjuntos.jpg")
La unión de dos eventos A y B, que se denota con el símbolo A ∪ B, es el evento que contiene todos los elementos que pertenecen a A o a B, o a ambos.
\(A\cup B = \{x: x\in A \vee x\in B\}\)
knitr::include_graphics("Graf U.png")
knitr::include_graphics("Graf n.png")
knitr::include_graphics("Complemento.png")
#Ejersicio 2.14
Si S = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9} y A = {0, 2, 4, 6, 8}, B = {1, 3, 5, 7, 9}, C = {2, 3, 4, 5} y D = {1, 6, 7}, liste los elementos de los conjuntos que corresponden a los siguientes eventos: a) A ∪ C; b) A ∩ B; c) C’; d) (C’ ∩ D) ∪ B; e) (S ∩ C)’ ; f) A ∩ C ∩ D’
S <- 0:9
A <- c(0, 2, 4, 6, 8)
B <- c(1, 3, 5, 7, 9)
C <- c(2, 3, 4, 5)
D <- c(1, 6, 7)
a <- union(A,C);a
## [1] 0 2 4 6 8 3 5
d <- union(intersect(setdiff(S,C),D),B);d
## [1] 1 6 7 3 5 9
Sirven para determinar el numero de puntos muestrales en un evento o en el espacio. Veremos 3 metodos de conteo: a. Regla del producto. b. La permutacion. c. La combinatoria
Si una operación se puede llevar a cabo en \(n_1\) formas, y si para cada una de éstas se puede realizar una segunda operación en \(n_2\) formas, entonces las dos operaciones se pueden ejecutar juntas de \(n_1 * n_2\) formas.
Un urbanista de una nueva subdivisión ofrece a los posibles compradores de una casa elegir entre Tudor, rústica, colonial y tradicional el estilo de la fachada, y entre una planta, dos pisos y desniveles el plano de construcción. ¿En cuántas formas diferentes puede un comprador ordenar una de estas casas?
Como una
extensión de la regla de la multiplicación se tiene: Si una operación se
puede ejecutar en \(n_1\) formas, y si
para cada una de éstas se puede llevar a cabo una segunda operación en
\(n_2\) formas, y para cada una de las
primeras dos se puede realizar una tercera operación en \(n_3\) formas, y así sucesivamente, entonces
la serie de k operaciones se puede realizar en \(n_1\)*\(n_2\)…\(n_k\) formas
Una permutación es un arreglo de todo o parte de un conjunto de objetos.
\[ {}_nP_k=\frac{n!}{(n-1)!} \]
En un año se otorgará uno de tres premios (a la investigación, la enseñanza y el servicio) a algunos de los estudiantes, de un grupo de 25, de posgrado del departamento de estadística. Si cada estudiante puede recibir un premio como máximo, ¿cuántas selecciones posibles habría? Solución: Como los premios son distinguibles, se trata de un problema de permutación. El número total de puntos muestrales es
perm <- function(n,k){factorial(n)/factorial(n-k)}
perm(25,3)
## [1] 13800
Una Combinación es un arreglo de todoo parte de un conjuto donde el orden no importa
\[ {}_nC_k=\frac{n!}{k(n-k)!} \]
Ejemplo 2.18 Se quere saber de cuantas formas se puede organizar a individuos en grupos de a 3 en un grupo de 20, donde no importa el orden
k <- 3
n <- 20
sol <- choose(20,3) #hace la combinatoria
cat("El numero total es:", sol)
## El numero total es: 1140
reglas de conteo permutacion, multiplicacion, conteo
La probabilidad de un evento A es la suma de los pesos de todos los puntos muestrales en A. Por lo tanto
\[ 0 ≤ P(A) ≤ 1 \]
\[ P((ϕ)=0 \]
\[ P(S)=1 \]
\[ P(A_1 U A_2 U A_3 U ...) = P(A_1) + P(A_2) + P(A_3) + ... \]
Se carga un dado de forma que exista el doble de probabilidades de que salga un número par que uno impar. Si E es el evento de que ocurra un número menor que 4 en un solo lanzamiento del dado, calcule P(E).
S <- 1:6
E <- c(1,2,3)
impar <- 1/9
par <- 2/9
p.E <- 1/9 + 2/9 + 1/9
cat("P(E)=",p.E)
## P(E)= 0.4444444
Si un experimento puede dar como resultado cualquiera de N diferentes resultados que tienen las mismas probabilidades de ocurrir, y si exactamente n de estos resultados corresponden al evento A, entonces la probabilidad del evento A es
\[ P(A)= \frac{n(A)}{n(S)} \]
En una mano de póquer que consta de 5 cartas encuentre la probabilidad de tener 2 ases y 3 jotas.
t <- 52 #Total de cartas
a <- 5 #Maso
s <- choose(t,a)
ases <- 4
jotas <- 4
A <- choose(ases,2)*choose(jotas,3)
p.A <- A/s
cat("La probabilidad de tener 2 ases y 3 jotas es:", p.A)
## La probabilidad de tener 2 ases y 3 jotas es: 9.234463e-06