Una introducción a la teoría de probabilidad

# Probabilidades
poblacion <- c(1,2,3,4,5,6,7,8,9)
poblacion
## [1] 1 2 3 4 5 6 7 8 9

Determinar subconjuntos de una población

A <- poblacion <=3
B <- poblacion >= 2 & poblacion <=6 

A
## [1]  TRUE  TRUE  TRUE FALSE FALSE FALSE FALSE FALSE FALSE
B
## [1] FALSE  TRUE  TRUE  TRUE  TRUE  TRUE FALSE FALSE FALSE

Los elementos de los subconjuntos

A <- which(poblacion <=3)
B <- which(poblacion >= 2 & poblacion <=6)


A
## [1] 1 2 3
B
## [1] 2 3 4 5 6

Operaciones con conjuntos y complementos

AUB <- union(A, B)
AIB <- intersect(A, B)
ComplA <- setdiff(poblacion, A) # Los que no están en A,es el complemento
ComplB <- setdiff(poblacion, B) # Los que no están en B,es el complemento

Probabilidades por la frecuencia

PA <- length(A) / length(poblacion) # Frecuencia / n
PB <- length(B) / length(poblacion) # Frecuencia / n

PAUB <- length(AUB) / length(poblacion) 
PAIB <- length(AIB) / length(poblacion) 

PComplA <- length(ComplA)/ length(poblacion) 
PComplB <- length(ComplB)/ length(poblacion)

Probabilidad condicional

PACondDadaB <- PAIB / PB   # P(A│B)
PBCondDadaA <- PAIB / PA   # P(B│A)