Determinar probabilidades para eventos independitentes.
Realizar y determinar probabilidades a partir de la probabilidad que se tienen en eventos independientes.
En una urna hay 4 fichas verdes y 6 azules, ¿Cuál es la probabilidad de que al sacar 2 fichas las 2 sean verdes?
p.fichas.verdes <- 0.40
p.fichas.azules <- 0.60
paste("La probabilidad de que las 2 fichas sean verdes es del: ", round(p.fichas.verdes * p.fichas.azules * 100,2),"%")
## [1] "La probabilidad de que las 2 fichas sean verdes es del: 24 %"
Una bolsa de canicas tiene 20 canicas rojas, 20 blancas y 10 verdes, si sacamos 3 canicas ¿Cuál es la probabilidad de que saquemos exactamente tres canicas rojas?
Canicas = 50
Probprimeraroja = 20/50
Probsegundaroja = 19/50
Probterceraroja = 18/50
Probabilidad3rojas = Probprimeraroja*Probsegundaroja*Probterceraroja
paste("La probabilidad de sacar 3 canicas rojas es del: ", Probabilidad3rojas*100,"%")
## [1] "La probabilidad de sacar 3 canicas rojas es del: 5.472 %"
Hay una probabilidad del 10% de que júpiter se alinie con marte, y una probabilidad del 50% de que su tirada de una moneda saldrá águilas, entonces ¿qué es la probabilidad de que Júpiter se alineará con Marte y su tirada de la moneda saldrá águila (suponiendo que Júpiter no tenga ningún efecto en el resultado de su tirada)?
Jupiter = 0.10
Marte = 0.50
Prob.Mon = Jupiter * Marte
paste("La probabilidad de que júpiter se alineará con marte y su tirada de la moneda saldrá águila es del: ", Prob.Mon,"%")
## [1] "La probabilidad de que júpiter se alineará con marte y su tirada de la moneda saldrá águila es del: 0.05 %"
En el caso número 12 se nos ha pedido buscar 3 casos de probabilidad para eventos independientes, encontré 3 problemas y en el primero se busca la probabilidad de sacar 2 fichas verdes la cual me dió el resultado de un 12%, en el segundo problema se busca la probabilidad de sacar 3 canicas rojas de una bolsa con 50 canicas de diferentes colores, la probabilidad obtenida fué del 5.472% y finalizando con el tercer caso se pide la probabilidad de que júpiter se alinie con marte mientras se tire una moneda obteniendo águila y la probabilidad resultante fué del 0.05%.