Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2013

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

Search the Archive

Re: ProgressIndicator in ParallelTable problem, redux

  • To: mathgroup at smc.vnet.net
  • Subject: [mg131778] Re: ProgressIndicator in ParallelTable problem, redux
  • From: psycho_dad <s.nesseris at gmail.com>
  • Date: Wed, 2 Oct 2013 05:55:36 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-outx@smc.vnet.net
  • Delivered-to: mathgroup-newsendx@smc.vnet.net
  • References: <l2e7rs$ff5$1@smc.vnet.net>

Nevermind, I have solved the problem with the following piece of code. It's ugly but it works, both in the example and in the real case:

LaunchKernels[3];
p = {0, 0, 0};
SetSharedVariable[p]
ParallelArray[(Print["Chain ", #, "/3 : ",ProgressIndicator[Dynamic[p[[#]]], {0, 10}]];Sum[Pause[.10 + 0.1 #]; p[[#]] = k; (k^2), {k, 0, 10, 1}]) &, 3]

BTW, I changed the Pause[] part a bit, so that each thread has a different progress. If anyone has a better idea, let me know.

Cheers 



  • Prev by Date: Re: Output display by slide
  • Next by Date: small string issue
  • Previous by thread: Re: ProgressIndicator in ParallelTable problem, redux
  • Next by thread: Output display by slide