Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- p1 = Histogram[averagen, {0, 20, 1}, "Probability",
- FrameLabel -> {"Number in Population n",
- "!(*SubscriptBox[(P), (N)])"}, Frame -> True,
- LabelStyle -> FontSize -> 16]
- p2 = s = 2; a = 10; Plot[ 1/Sqrt[2 Pi s^2] E^-((x - a)^2/(2 s^2)), {x, 0, 20}]
Add Comment
Please, Sign In to add comment