[R] plot pdf

[mmstat]

I want to plot the unstadardized version of a normal plot.  Can you explain 
why that is not working? 



Dev.set(1) 



xcrit=-1.645 



cord.x <- c(-3,seq(-3,xcrit,0.01),xcrit) 



cord.y <- c(0,dnorm(seq(-3,xcrit,0.01)),0)            # what does 
final 0 do here? 



curve(dnorm(x,0,1),xlim=c(-3,3),main='Normal PDF') 



polygon(cord.x,cord.y,col='orange') 



savePlot(filename="c:\\ssl_z.emf",type="emf")          #unable to 
create metafile?  why?  



  

x=seq(80,200,1) 



plot(x,dnorm(x,140,15),type="l",ylab="Probability") 





  

dev.set(4) 



xcrit=135.9 



cord.x <- c(80,seq(80,xcrit,.1),xcrit) 



cord.y <- c(0,dnorm(seq(80,xcrit,.1)),0)              #final 0 
needs to be changed but to what? 

curve(dnorm(x,140,15),xlim=c(80,200),main='Normal PDF',ylab="Probability") 



polygon(cord.x,cord.y,col='orange') 



savePlot(filename="c:\\ssl_z.emf",type="emf")         #unable to create 
metafile?  why?  



  



  

Sincerely, 

Mary A. Marion 





        [[alternative HTML version deleted]]


______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.