Objetivo

Determinar probabilidades para eventos independientes

Descripcion

Realizar y determinar las probabilidades a partir de la probabilidad que tienen en eventos independientes

Paso 1 Cargar librerias

library(knitr)
library(gtools)

Bibliografias

*Ejercicio 1 ( https://www.varsitytutors.com/hotmath/hotmath_help/spanish/topics/independent-dependent-events )

Ejercicio 1 Cual es la proabilidad de que la primera canica sea azul y la segunda canica sea verde

Una caja contiene 4 canicas rojas, 3 canicas verdes y 2 canicas azules. Una canica es eliminada de la caja y luego reemplaza. otra canica se saca de la caja. Cual es la probabilidad de que la primera canica sea azul y la segunda sea verde

Rojo <- 0.4 
Verde <- 0.3
Azul <- 0.2
Total <- 0.9

Prob.Azul <- Azul / Total * Verde / Total


paste("a probabilidad de que la primera canica sea azul y la segunda canica sea verde : ", Prob.Azul,"%")
## [1] "a probabilidad de que la primera canica sea azul y la segunda canica sea verde :  0.0740740740740741 %"

Ejercicio 2

https://content.nroc.org/Algebra.HTML5/U12L2T2/TopicText/es/text.html

Beth tiene 10 pares de calcetines: 2 Negros, 2 cafes, 3 blancos, 1 azul, y 1 verde, 1 rojo. Hoy quiere usar el par blanco, pero tiene prisa para llegar al trabajo, por lo que agarra al azar. Si no es blanco, lo devolvera al cajon. Si continua agarrando pares aleatoriamente Cual es la probabilidad de sacar un par blanco en su tercer intento

Negro <- 2
Cafe <-2 
Blanco1 <- 3
Rojo <- 1
Azul1 <- 1
Verde1 <- 1
Dif.colo <- 7
Total1 <- 10

Prob.Blan <- Dif.colo / Total1 * Dif.colo / Total1 * Blanco1 / Total1

paste("la probabilidad de sacar un par blanco en su tercer intento : ", Prob.Blan,"%")
## [1] "la probabilidad de sacar un par blanco en su tercer intento :  0.147 %"

Ejercicio 3

https://www.zweigmedia.com/MundoReal/tutorialsf15e/frames7_5C.html

Si hay una probabilidad del 10% de que jupiter se alineara con marte, y una probabilidad del 50% de que su tirada de una moneda saldra aguila, entonces Que es la probabilidad de que jupiter se alineara con marte y su tirada de la moneda saldra aguila (Suponiendo que jupiter no tenga ningun efecto en el resultado )

Jupiter <- .10
Marte <- .50 

Prob.Mon <- Jupiter * Marte

paste("lla probabilidad de que J昼㹡piter se alinear攼㸱 con Marte y su tirada de la moneda saldr攼㸱 攼㸱guilas : ", Prob.Mon,"%")
## [1] "lla probabilidad de que J<fa>piter se alinear<e1> con Marte y su tirada de la moneda saldr<e1> <e1>guilas :  0.05 %"

Interpretacion del caso

Se saco la probabilidad de las independientes de 3 ejercicios * La probabilidad independiente se saca si el 2 evento no es afectado por el evento 1 Si A y B son eventos independientes, la probabilidad de que ambos eventos ocurran es el producto de las probabilidades de los eventos individuales.

Se hicieron las multiplicaciones correspondientes gracias a una formula proporcionada por el profesor para eventos independientes No se si este bien pero estuve investigando y mas o menos es asi