Dynamically setting {min, max} in Angular Gauge[] & speed it up.
- To: mathgroup at smc.vnet.net
- Subject: [mg131788] Dynamically setting {min, max} in Angular Gauge[] & speed it up.
- From: Matthias Bode <lvsaba at hotmail.com>
- Date: Thu, 3 Oct 2013 22:27:23 -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
Hola:
This
DynamicModule[
{x = Dynamic[Refresh[IntegerPart[
FinancialData["XAU/EUR"]*32.15123943028],
UpdateInterval -> 10]]},
AngularGauge[x, {31000, 31200},
TargetUnits -> "EUR/kg Au",
GaugeLabels ->
{Dynamic[Refresh[DateString[{"Hour", ":",
"Minute", ":", "Second", " h"}],
UpdateInterval -> 1]], "Unit", "Value"},
ScaleDivisions -> 12, GaugeStyle -> Red,
TicksStyle -> Black, PerformanceGoal ->
"Speed", ImageSize -> 200]]
works - albeit extremely slowly and paralyzing the machine; keyboard input only appears after several seconds.*
I would like to set min and max as a function of x, e. g. {x * .9, x * 1.1}. How?
Best regards,
MATTHIAS BODE
*) === MathematicaMark9 Detailed Timings === (intel CORE i7)
Total Test 1 Test 2 Test 3 Test 4 Test 5 Test 6 Test 7 Test 8 Test 9 Test 10 Test 11 Test 12 Test 13 Test 14 Test 15
matthias
Microsoft Windows (64-bit) 11.3 0.64 0.73 0.94 0.58 0.81 0.66 0.59 1.11 0.75 0.88 1.19 0.08 1.03 0.67 0.61