Слика:Standard deviation diagram.svg

Из пројекта Википедија

Није доступна већа резолуција.

Standard_deviation_diagram.svg (400 × 200 пиксела, величина фајла: 14 KB, МИМЕ тип: image/svg+xml)

Wikimedia Commons Logo Ова слика је са Вики оставе. Погледајте детаље на страници са описом.

[edit] Beskrivning

[edit] Summary

Standard deviation diagram, based an original graph by Jeremy Kemp, in 2005-02-09 [1]. This figure was started in R using:

x <- seq(-4,4,.1)
plot(x,dnorm(x),type="n",xaxs="i",yaxs="i",ylim=c(0,.4),bty="l",xaxt="n")
polysection <- function(a,b,dist=dnorm,col="blue",n=11){
    dx <- seq(a,b,length.out=n)
    polygon(c(a,dx,b),c(0,dist(dx),0),border=NA,col=col)
}
library(RColorBrewer)
cols<-rev(brewer.pal(4,"Blues"))
for(i in 0:3){
    polysection(i,i+1,col=cols[i+1])
    polysection(-i-1,-i,col=cols[i+1])
}
sx <- -3:3
segments(sx,0,sx,dnorm(sx),col="white")
lines(x,dnorm(x))
axis(1,sx,sx)

It was then touched up in Adobe Illustrator.

[edit] Licensing

Creative Commons License
Creative Commons Attribution icon
This file is licensed under Creative Commons Attribution 2.5 License
In short: you are free to distribute and modify the file as long as you attribute its author(s) or licensor(s).

Следеће странице користе ову слику: