Stichprobe aus der Poisson-Verteilung
Wir haben die durchschnittliche jährliche Anzahl von Überfällen, Raubüberfällen und Körperverletzungen in einer kleinen Stadt erhalten (150, 300 bzw. 50). Da sich die drei Kriminalitätsarten als multivariate Poisson-Verteilung modellieren lassen, sollst du 10 verschiedene Szenarien für die Anzahl der Straftaten im nächsten Jahr erstellen.
Diese Übung ist Teil des Kurses
Mischungsmodelle in R
Anleitung zur Übung
- Erzeuge mit der Funktion
rpois10 Beobachtungen für jede Kriminalitätsart unter Verwendung des jeweiligen Lambda. - Fasse die simulierte Anzahl der Straftaten zu einer multivariaten Poisson-Verteilung zusammen.
- Prüfe die Werte deiner simulierten Szenarien.
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
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