-- you have earned Featured Contributor Badge Your exceptional post has been selected for our editorial column Staff Picks http://wolfr.am/StaffPicks and Your Profile is now distinguished by a Featured Contributor Badge and is displayed on the Featured Contributor Board. Thank you!

Overlay[
 Table[
  DiscretePlot[
   PDF[
    PascalDistribution[
     100,
     probab/100
     ],
    x
    ],
   {x, 100, 137},
   ImageSize -> 1000
   ],
  {probab, 75, 95, 5}
  ]
 ]
h[x_] = (RandomReal[{-1, 0}] x - RandomReal[{0, 1}])/(x^2 - 7); Plot[
 h[x], {x, -7, 7}]
DiscretePlot[
 Table[
   PDF[
    BinomialDistribution[100, p],
    k],
   {p, Range[10]/10}
   ] // Evaluate,
 {k, 100},
 PlotRange -> All,
 PlotMarkers -> Automatic,
 ExtentSize -> 1/2
 ]

Dear Peter, we noticed your interesting plots and special type characters.

Please let us know if you need any help to make them more appealing or behave better on cloud, and please feel free to create more posts if you have ideas to share.