Services & ResourcesWolfram ForumsMathGroup Archive

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

Increasing RandomInteger speed

• To: mathgroup at smc.vnet.net
• Subject: [mg86490] Increasing RandomInteger speed
• From: Art <grenander at gmail.com>
• Date: Wed, 12 Mar 2008 05:26:07 -0500 (EST)

Is there an intelligent way to speed up generating the following
sample from an inhomogeneous Poisson process to be comparable to the
homogeneous one?

mu = RandomReal[10, 10000];

{t1, sp1} = Timing[RandomInteger[PoissonDistribution[#], 1] & /@ mu];
{t2, sp2} = Timing[RandomInteger[PoissonDistribution[10], 10000]];

In[128]:= t1

Out[128]= 8.47253

In[129]:= t2

Out[129]= 0.004

Thanks,
Art

• Follow-Ups:
  • Re: Increasing RandomInteger speed
    • From: Darren Glosemeyer <darreng@wolfram.com>