Multivariatavvikelsedetektering
100 personer som bor i samma område har lämnat in en skadeansökan eftersom deras hus skadades av hagel under söndagskvällens storm. Datamängden hailinsurance innehåller 100 observationer och 2 variabler. Den första kolumnen innehåller de utbetalningar som försäkringsbolaget gjort till varje kund, medan den andra kolumnen visar det senaste husvärdet.
I den här övningen ska du börja med att använda klassiska skattare på datamängden. Därefter jämför du resultaten med de från robusta skattare.
Den här övningen är en del av kursen
Bedrägeridetektering i R
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# Create a scatterplot
plot(hailinsurance, xlab = "price house", ylab = "claim")
# Compute the sample mean and sample covariance matrix
clcenter <- colMeans(___)
clcov <- cov(___)
# Add 97.5% tolerance ellipsoid
rad <- sqrt(qchisq(___, ___))
ellipse(center = clcenter, shape = clcov, radius = rad,col = "blue", lty = 2)