Standardnormalverteilung
Aus MM*Stat
Grundbegriffe
Standardnormalverteilung
Sei eine standardisierte Zufallsvariable mit
Die Zufallsvariable gibt die Werte der Zufallsvariablen als Abweichungen von ihrem Erwartungswert in Einheiten der Standardabweichung an.
Wenn normalverteilt ist, dann ist auch normalverteilt. Die Normalverteilung von wird dann als Standardnormalverteilung bezeichnet.
Dichtefunktion der Standardnormalverteilung:
Verteilungsfunktion der Standardnormalverteilung:
Erwartungswert und Varianz der Standardnormalverteilung:
Für die Standardnormalverteilung ist die Verteilungsfunktion tabelliert.
Die Dichtefunktion bzw. Verteilungsfunktion geben die nachfolgenden Grafiken wieder.
<R output="display">
pdf(rpdf,width=7,height=7) curve(from=-4, to=4, dnorm(x, mean=0, sd=1), ylab="f(z)", main="Dichtefunktion der N(0;1)", xlab="z", col="red", ylim=c(0.00,0.4), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") </R> |
<R output="display">
pdf(rpdf,width=7,height=7) curve(from=-4, to=4, pnorm(x, mean=0, sd=1), main="Verteilungsfunktion der N(0;1)", ylab="F(z)", xlab="z", col="red", ylim=c(0.00,1.0), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") </R> |
Zusatzinformationen
Standardisierte Normalverteilung und Standardnormalverteilung
Eine Tabellierung der Verteilungsfunktion der Normalverteilung für alle praktisch relevanten Werte von und ist nicht möglich.
Man kann jede gegebene Normalverteilung in eine spezielle Normalverteilung transformieren und diese dann tabellieren.
Es bietet sich an, als spezielle Verteilung diejenige Normalverteilung zu wählen, die den Erwartungswert , und die Standardabweichung besitzt, also die Standardnormalverteilung.
Beziehung zwischen Verteilung und standardisierter Normalverteilung:
Aus
bzw.
folgt:
Die Bedeutung der standardisierten Normalverteilung liegt darin, dass es zu jeder normalverteilten Zufallsvariablen eine linear transformierte Zufallsvariable gibt, die der Standardnormalverteilung folgt.
Bei Verwendung der Tabelle der Dichtefunktion und der Verteilungsfunktion der Standardnormalverteilung ist zu beachten, dass zumeist nur die positiven Werte von tabelliert sind.
Die Tabellierung der Standardnormalverteilung für negative -Werte ist aufgrund der Symmetrie der Normalverteilung nicht erforderlich, da
gilt.
Beispiele
Standardisierte Normalverteilung
Gegeben sei eine Zufallsvariable , die -verteilt ist.
Gesucht ist die Wahrscheinlichkeit P(X ≤ x) mit x = 125
Mit einer Wahrscheinlichkeit von 99,38% nimmt die Zufallsvariable Werte von höchstens 125 an.
<R output="display">
pdf(rpdf,width=7,height=7) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") axis( side=1, at=c(60, 125), tick=FALSE) par(new=TRUE) xx <-c(60:125, 125:60) yy <-c(c(dnorm(c(60:125), mean=100, sd=10)),c(rep(0,66))) polygon(xx, yy, col="grey", border=NA) par(new=TRUE) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") abline(v=125, col="black", lwd=2) </R> |
Gesucht ist die Wahrscheinlichkeit P(X ≥ x) mit x = 115,6
Mit einer Wahrscheinlichkeit von 5,94% nimmt die Zufallsvariable Werte von mindestens 115,6 an.
<R output="display">
pdf(rpdf,width=7,height=7) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") axis( side=1, at=c(60, 115.6), labels=c("60", "115,6"), tick=FALSE) par(new=TRUE) xx <-c(115.6:140.6, 140.6:115.6) yy <-c(c(dnorm(c(115.6:140.6), mean=100, sd=10)),c(rep(0,26))) polygon(xx, yy, col="grey", border=NA) par(new=TRUE) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l")
</R> |
Gesucht ist die Wahrscheinlichkeit P(X ≤ x) mit x = 80
Mit einer Wahrscheinlichkeit von 2,275% nimmt die Zufallsvariable Werte von höchstens 80 an.
<R output="display">
pdf(rpdf,width=7,height=7) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") axis( side=1, at=c(60, 80), labels=c("60", "80"), tick=FALSE) par(new=TRUE) xx <-c(60:80, 80:60) yy <-c(c(dnorm(c(60:80), mean=100, sd=10)),c(rep(0,21))) polygon(xx, yy, col="grey", border=NA) par(new=TRUE) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l")
</R> |
Gesucht ist die Wahrscheinlichkeit P(X ≥ x) mit x = 94,8
Mit einer Wahrscheinlichkeit von 69,85% nimmt die Zufallsvariable Werte von mindestens 94,8 an.
<R output="display">
pdf(rpdf,width=7,height=7) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") axis( side=1, at=c(60, 94.8), labels=c("60", "94,8"), tick=FALSE) par(new=TRUE) xx <-c(94.8:140.8, 140.8:94.8) yy <-c(c(dnorm(c(94.8:140.8), mean=100, sd=10)),c(rep(0,47))) polygon(xx, yy, col="grey", border=NA) par(new=TRUE) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l")
</R> |
Gesucht ist die Wahrscheinlichkeit P(x_u ≤ X ≤ x_o) mit x_u = 88,8 und x_o = 132
Mit einer Wahrscheinlichkeit von 86,8% nimmt die Zufallsvariable Werte im Intervall an.
<R output="display">
pdf(rpdf,width=7,height=7) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") axis( side=1, at=c(60, 88.8, 132), labels=c("60", "88,8", "132"), tick=FALSE) par(new=TRUE) xx <-c(88.8:131.8, 131.8:88.8) yy <-c(c(dnorm(c(88.8:131.8), mean=100, sd=10)),c(rep(0,44))) polygon(xx, yy, col="grey", border=NA) par(new=TRUE) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l")
</R> |
Gesucht ist die Wahrscheinlichkeit P(x_u ≤ X ≤ x_o) mit x_u = 80,4 und x_o = 119,6
Mit einer Wahrscheinlichkeit von 95% nimmt die Zufallsvariable Werte im Intervall an.
<R output="display">
pdf(rpdf,width=7,height=7) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") axis( side=1, at=c(60, 80.4, 119.6), labels=c("60", "80,4", "119,6"), tick=FALSE) par(new=TRUE) xx <-c(80.4:119.6, 119.6:80.4) yy <-c(c(dnorm(c(80.4:119.6), mean=100, sd=10)),c(rep(0,40))) polygon(xx, yy, col="grey", border=NA) par(new=TRUE) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l")
</R> |
Gesucht ist der Wert x der Zufallsvariablen X, so dass 76,11% der Realisationen von X höchstens gleich x sind
Für die Wahrscheinlichkeit von 0,7611 findet man aus der Tabelle der Verteilungsfunktion der Standardnormalverteilung den Wert .
Damit ist und somit .
Mit einer Wahrscheinlichkeit von 76,11% nimmt die Zufallsvariable Werte von höchstens 107,1 an.
<R output="display">
pdf(rpdf,width=7,height=7) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") axis( side=1, at=c(60, 107.1), labels=c("60", "107,1"), tick=FALSE) par(new=TRUE) xx <-c(60.1:107.1, 107.1:60.1) yy <-c(c(dnorm(c(60.1:107.1), mean=100, sd=10)),c(rep(0,48))) polygon(xx, yy, col="grey", border=NA) par(new=TRUE) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") abline(v=107.1, col="black", lwd=2) </R> |
Gesucht ist der Wert x der Zufallsvariablen X, so dass 3,6% der Realisationen von X mindestens gleich x sind
Wegen findet man für die Wahrscheinlichkeit von 0,964 aus der Tabelle der Verteilungsfunktion der Standardnormalverteilung den Wert .
Damit ist und somit .
Mit einer Wahrscheinlichkeit von 3,6% nimmt die Zufallsvariable Werte von mindestens 118 an.
<R output="display">
pdf(rpdf,width=7,height=7) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") axis( side=1, at=c(60, 118), labels=c("60", "118"), tick=FALSE) par(new=TRUE) xx <-c(118:140, 140:118) yy <-c(c(dnorm(c(118:140), mean=100, sd=10)),c(rep(0,23))) polygon(xx, yy, col="grey", border=NA) par(new=TRUE) curve(from=60, to=140, dnorm(x, mean=100, sd=10), xaxt="n", ylab="f(x)", xlab="x", col="blue", ylim=c(0.0,0.04), lty=1, lwd=4, font.lab=2, "xaxs"="i" ,"yaxs"="i", bty="l") abline(v=118, col="black", lwd=2) </R> |