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