User Tools

Site Tools


normal_distribution

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision
Previous revision
normal_distribution [2017/03/24 08:43] hkimscilnormal_distribution [2024/03/13 08:28] (current) hkimscil
Line 11: Line 11:
 {{http://math.arizona.edu/~rsims/ma464/standardnormaltable.pdf|표준정규분포 table}} {{http://math.arizona.edu/~rsims/ma464/standardnormaltable.pdf|표준정규분포 table}}
 https://www.mathsisfun.com/data/standard-normal-distribution-table.html https://www.mathsisfun.com/data/standard-normal-distribution-table.html
 +
 +<code>set.seed(3000)
 +xseq<-seq(-4,4,.01)
 +densities<-dnorm(xseq, 0,1)
 +cumulative<-pnorm(xseq, 0, 1)
 +randomdeviates<-rnorm(1000,0,1)
 + 
 +par(mfrow=c(2,2), mar=c(3,4,4,2))
 +
 +plot(xseq, densities, col="darkgreen",
 +   xlab="", ylab="Density", type="l", lwd=2, cex=2, 
 +   main="PDF of Standard Normal", cex.axis=.8)
 +
 +plot(xseq, cumulative, col="darkorange", 
 +   xlab="", ylab="Cumulative Probability",type="l",lwd=2, cex=2, 
 +   main="CDF of Standard Normal", cex.axis=.8)
 +
 +hist(randomdeviates, main="Random draws from Std Normal", 
 +   cex.axis=.8, xlim=c(-4,4))
 +
 +xseq<-seq(-4,4,.01)
 +y<-2*xseq + rnorm(length(xseq),0,5.5)
 +hist(y, prob=TRUE, ylim=c(0,.06), breaks=20)
 +curve(dnorm(x, mean(y), sd(y)), add=TRUE, col="darkblue", lwd=2)
 +
 +par(mfrow=c(1,1))
 +</code>
 +{{:pasted:20240313-082705.png}}
normal_distribution.1490314429.txt.gz · Last modified: 2017/03/24 08:43 by hkimscil

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki