[Date Index] [Thread Index] [Author Index]

Mathematica 6 and normal distribution?

• To: mathgroup at smc.vnet.net
• Subject: [mg77816] Mathematica 6 and normal distribution?
• From: sean_in_cali at yahoo.com
• Date: Sun, 17 Jun 2007 06:11:02 -0400 (EDT)

Has Mathematica 6 fixed the problems discussed in this thread?

http://groups.google.com/group/comp.soft-sys.math.mathematica/browse_frm/thread/f3d8f7cf40057943/350a024cc20c290b?lnk=gst&q=normal+distribution&rnum=2&hl=en#350a024cc20c290b

From their website it seems like they are saying NormalDistribution is
new in Mathematica 6.

Has anyone run the codes to check?  Last time the problem was in the
25th bin in the code below--with the value at 25th bin being lower
than the rest.

SeedRandom[1111111 ];
vec1=Table[Random[Real,{0,1000}],{10^6}];
vec2=Map[If[#<44,1,0]&,vec1];
ones=Flatten[Position[vec2,1]];
plotvec=Map[Length,Split[Sort[Drop[ones-RotateRight[ones,1],1]]]];
ListPlot[Log[plotvec],PlotRange->All]
ListPlot[plotvec,PlotRange->All]


Thanks for checking.