speed up evaluating a listable function

Asked Jun 23 '15 at 02:48

Active Jun 23 '15 at 03:17

Viewed 100 times

I apologize in advance for the vagueness, but I can't think of a more descriptive title. I am trying to find the average value of the square of BesselJ[0, x] evaluated over many lists. The function I am using is

f[h_, n_, m_] := Mean[BesselJ[0, h Table[Accumulate[Table[RandomChoice[{-1., 1.}], {j, n}]], {k, m}]]^2];

I am looking for ways to speed up this function for large values of n and m. Compiling doesn't help here since BesselJ is not compilable.

edited Jun 23 '15 at 03:17

J. M.'s missing motivation

124,525
11
401
574

asked Jun 23 '15 at 02:48

user64620

2

Have you seen this? – J. M.'s missing motivation Jun 23 '15 at 03:01
@J.M. Thanks, that post is very helpful. However I could not reproduce what he did. I get an error saying it can not find the bessel header file... – user64620 Jun 23 '15 at 19:31
I was obliquely referring to the answer I gave in that thread… I guess you never tried that? – J. M.'s missing motivation Jun 23 '15 at 22:57

speed up evaluating a listable function

0 Answers0