OBJETIVO
Determinar probabilidades para eventos independientes.
Descripción
Realizar y determinar probabilidades a partir de la probabilidad que se tienen en eventos independientes.
Ejercicio 1
Se lanza un dado, y no sale 6, lanzas de nuevo. ¿Cuál es la probabilidad de sacar un 6 en el segundo lanzamiento?
DADO <- c("1","2","3","4","5","6")
n <- length(DADO)
C6 <- c("6")
NC <- length(C6)
P6 <- NC/n
paste("la probabilidad de sacar un 6 en el segundo lanzamiento es de :",(P6 * 100), "%")
## [1] "la probabilidad de sacar un 6 en el segundo lanzamiento es de : 16.6666666666667 %"
OTC <- c("1","2","3","4","5")
N.OTC <- length(OTC)
POTC <- N.OTC / n
paste("La probabilidad de sacar otro numero, que no sea 6 es de :",POTC, "%")
## [1] "La probabilidad de sacar otro numero, que no sea 6 es de : 0.833333333333333 %"
Ejercicio 2
Un alumno contesta las 70 preguntas de la P.S.U. de matemáticas al azar. Si cada pregunta tiene 5 alternativas y sólo una de éstas es correcta, entonces ¿Cuál es la probabilidad de que tenga el puntaje máximo?
Hay una alternativa correcta de un total de cinco en cada pregunta. Por lo tanto, la probabilidad de acertar una esuna de cuatro, es decir, P(x = 1) = 1/5
## p(x=70)= (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5)
## (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5)
## (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5)
## (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5)
## (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5)
## (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5)
## (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5)
## (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5) (1/5)
## P(x = 70) = (1/5) ^70
##[1] "La respuesta es P(x = 70) = (1/5) ^70"
Ejercicio 3
Se lanza una moneda al aire 3 veces ¿Cual es la probabilidad de que salga 3 veces seguidas cara?
cara<-1/2
p.en.tres<-cara*cara*cara
paste("La probabilidad que salga cara en un tiro es: ", round(cara*100,2),"%")
## [1] "La probabilidad que salga cara en un tiro es: 50 %"
paste("la probabilidad que salga Cara en tres tiros seguidos es: ", round(p.en.tres*100,2),"%")
## [1] "la probabilidad que salga Cara en tres tiros seguidos es: 12.5 %"
Interpretación del caso
En este caso número 12 se realizaron 3 ejemplos del tema de probabilidad de eventos independientes. Los ejercicios no suelen ser muy complejos, esto con el objetivo de que pueda ser entendible de mejor manera y que incluso personas que no están muy metidas en la probabilidad lo pudieran entender. En una cuestión personal, quedo claro lo que se tratada de explicar con los ejercicios sobre el tema principal (que ya se mencionó anteriormente) que es la probabilidad de eventos independientes.