Eșantionare din distribuția Poisson
Ni s-au furnizat mediile anuale ale numărului de agresiuni, jafuri și bătăi dintr-un oraș mic (150, 300 și, respectiv, 50). Știind că cele trei tipuri de infracțiuni pot fi modelate printr-o distribuție Poisson multivariată, trebuie să creezi 10 scenarii diferite pentru numărul de infracțiuni din anul următor.
Acest exercițiu face parte din cursul
Mixture Models în R
Instrucțiuni pentru exercițiu
- Folosind funcția
rpois, creează câte 10 observații pentru fiecare tip de infracțiune, utilizând lambda-ul corespunzător. - Combină numărul simulat de infracțiuni într-o distribuție Poisson multivariată.
- Verifică valorile scenariilor simulate.
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
set.seed(1541)
# Create the vector of lambdas
lambda_1 <- c(150, 300, 50)
# Create the sample of each crime
assault_1 <- ___(n = ___, lambda = ___)
robbery_1 <- ___(n = ___, lambda = ___)
battery_1 <- ___(n = ___, lambda = ___)
# Combine the results
cities_1 <- cbind(assault_1, ___, battery_1)
# Check the sample
cities_1