MathGroup Archive 2007

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

Search the Archive

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.



  • Prev by Date: question
  • Next by Date: Re: Manipulate a complex expression
  • Previous by thread: Re: Crinkled Hyperbola (ContourPlot in Manipulate)
  • Next by thread: Re: Mathematica 6 and normal distribution?