File:Standard Normal Distribution.png

From KYNNpedia

Original file(5,986 × 3,700 pixels, file size: 752 KB, MIME type: image/png)

This file is from Wikimedia Commons and may be used by other projects. The description on its file description page there is shown below.

This math image could be re-created using vector graphics as an SVG file. This has several advantages; see Commons:Media for cleanup for more information. If an SVG form of this image is available, please upload it and afterwards replace this template with {{vector version available|new image name}}.


It is recommended to name the SVG file “Standard Normal Distribution.svg”—then the template Vector version available (or Vva) does not need the new image name parameter.

Summary

Description
English: The Standard Normal Probability Distribution with shaded regions
Date
Source Own work
Author D Wells
Other versions

[edit]

<code><code><code><languages/></code></code></code>

Licensing

I, the copyright holder of this work, hereby publish it under the following license:
w:en:Creative Commons
attribution share alike
This file is licensed under the Creative Commons Attribution-Share Alike 4.0 International license.
You are free:
  • to share – to copy, distribute and transmit the work
  • to remix – to adapt the work
Under the following conditions:
  • attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
  • share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.

Source code

library(ggplot2)
p <- ggplot(NULL, aes(c(-4,4))) +
  geom_line(stat = "function", fun = dnorm) +
  geom_area(stat = "function", fun = dnorm, fill = scales::muted("blue"), xlim=c(-1,1), alpha=1/4) +
  geom_area(stat = "function", fun = dnorm, fill = scales::muted("blue"), xlim=c(-2,2), alpha=1/4) +
  geom_area(stat = "function", fun = dnorm, fill = scales::muted("blue"), xlim=c(-3,3), alpha=1/4) +
  theme_minimal() +
  theme(axis.text.x = element_text(size = 12)) +
  scale_x_continuous(labels = label_units, breaks = -4:4) +
  xlab("Standard Deviations from the Mean") +
  ylab("Probability Density") +
  geom_segment(aes(x=-1, xend=1, y=dnorm(1), yend=dnorm(1)), linetype="dashed") +
  geom_segment(aes(x=-2, xend=2, y=dnorm(2), yend=dnorm(2)), linetype="dashed") +
  geom_segment(aes(x=-3, xend=3, y=dnorm(3), yend=dnorm(3)), linetype="dashed") +
  annotate("text", x = 0, y = dnorm(1)+0.015, label = "68.3%") + #pnorm(1)-pnorm(-1) %
  annotate("text", x = 0, y = dnorm(2)+0.015, label = "95.4%") +
  annotate("text", x = 0, y = dnorm(3)+0.015, label = "99.7%")

ggsave("Normal_Distribution.png", p, width = 3.7*1.618, height = 3.7, dpi = 1000)
 
This chart was created with R.

Captions

The Standard Normal Probability Distribution

Items portrayed in this file

depicts

24 June 2019

image/png

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current18:25, 24 June 2019Thumbnail for version as of 18:25, 24 June 20195,986 × 3,700 (752 KB)wikimediacommons>D WellsUser created page with UploadWizard

The following page uses this file: