Ich habe diesen Code von statmethods [dot] net ausgeliehen. Das Ergebnis ist eine farbige Fläche unter einer Normalverteilung.Ein Bild als Farbe eines Polygons setzen
mean=100; sd=15
lb=80; ub=120
x <- seq(-4,4,length=100)*sd + mean
hx <- dnorm(x,mean,sd)
plot(x, hx, type="n", xlab="IQ Values", ylab="Density",
main="Normal Distribution", axes=FALSE)
i <- x >= lb & x <= ub
lines(x, hx)
polygon(c(lb,x[i],ub), c(0,hx[i],0), col="red")
area <- pnorm(ub, mean, sd) - pnorm(lb, mean, sd)
result <- paste("P(",lb,"< IQ <",ub,") =",
signif(area, digits=3))
mtext(result,2)
Ich frage mich, ob es möglich ist, ein Bild als die Farbe des roten Polygon zu wählen?
Vielen Dank!
Awesome! Danke vielmals! –