library(knitr)
ProbCara1= 1/2
ProbCara2= 1/3
ProbCaras= (ProbCara1 - ProbCara2)
paste("La probabilidad de que salga cara es de :", ProbCaras*100,"%")
## [1] "La probabilidad de que salga cara es de : 16.6666666666667 %"
include_graphics("C:/Users/Myriam/Downloads/monedas.gif")
\(A:{1,3,5};B:{4,5,6};A−B:{1,3};A∩B:{5}\)
\(P(A−B)=P(A)−P(A∩B)=(3/6)−(1/6)=(1/3)\)
probabImpar= 3/6
probabMayTres= 1/6
probImparMenor= (probabImpar - probabMayTres)
paste("La probabildad de que, al lanzar un dado, salga un número impar y que sea menor que 3 es de: ", probImparMenor*100, "%")
## [1] "La probabildad de que, al lanzar un dado, salga un número impar y que sea menor que 3 es de: 33.3333333333333 %"
\(P(A∪B)=P(A)+P(B)−P(A∩B)\)
include_graphics("C:/Users/Myriam/Downloads/probabilidad.gif")
\(P(5/Impar)=P(5eImpar)P(Impar)=P(5)P(1,3,5)=(1/6)/(3/6)=1/3\)
include_graphics("C:/Users/Myriam/Downloads/diagramaarbol2.jpg")
ProbInicial= 1/8
ProbCaras= 2/8
ProbFinal= (ProbInicial / ProbCaras)
paste("La probabilidad de obtener 2 caras sabiendo que las 2 primeras monedas son caras es del: ", ProbFinal*100,"%")
## [1] "La probabilidad de obtener 2 caras sabiendo que las 2 primeras monedas son caras es del: 50 %"
\(P(B/A)=P(A∩B)P(A)=(1/8) / (2/8)=1/2\)