# ListPlot doesn't shows all points [closed]

I have a table: p1 = Table[(Binomial[2000, k]*StirlingS2[1386, k]*k!)/(2000^1386), {k, 1, 1386, 1}];

I used ListPlot[p1] to draw a plot of this values. This is the plot, where on Y I have values of p1 and on X I have values of k. But when I draw my plot, I see only points which are starting from $k \approx 560$. Why I can't see points for all values of k? Is this because of that values for small k are too small? How can I fix that?

• Just add PlotRange->Full. – C. E. Jan 22 '14 at 19:50
• @Pickett It doesn't helped. – Ziva Jan 22 '14 at 19:55
• @picket and closers: PlotRange isn't the issue here. The points Zia is missing (before about k =560) fall within the visible range but are simply not plotted. – Sjoerd C. de Vries Jan 22 '14 at 20:41

p1 = Table[(Binomial[2000, k]*StirlingS2[1386, k]*k!)/(2000^1386), {k,1, 1386, 1}]

• @ziva Usually, ListPlot works just fine without N, but the numbers in your table are a bit extreme (just have a look at p[[1]] and p[[800]]) and I think ListPlot removes the smallest/most hopeless cases. Cases[ListPlot[p1, PlotRange -> All], Point[p___] :> Length@p, Infinity] shows that there are 849 points in the arbitrary precision plot. If you use p1//N in the above you'll see you have 1386 points instead. – Sjoerd C. de Vries Jan 22 '14 at 20:32