WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

ゲージの枠を制御する

ゲージの枠の大きさ，色，外観を変化させる：
Wolfram Language code: g1 = MapThread[AngularGauge[RandomInteger[{1, 100}], {0, 100}, GaugeFrameSize -> .2, GaugeFrameElementFunction -> #, GaugeFrameStyle -> ColorData[92, "ColorList"][[#2]]]&, {ChartElementData["AngularGauge", "Frame"], Range@Length@ChartElementData["AngularGauge", "Frame"]}];
Wolfram Language code: g2 = gauges = Table[AngularGauge[42, {0, 100}, GaugeFrameElementFunction -> f, GaugeFrameStyle -> RandomChoice[ColorData[63, "ColorList"]], GaugeFrameSize -> 0.4], {f, ChartElementData["AngularGauge", "Frame"][[{1, 2, 4, 6, 7, 8}]]}];
Wolfram Language code: Grid[Table[ AngularGauge[RandomInteger[{1, 100}], {0, 100}, GaugeStyle -> GrayLevel[0.25], GaugeFrameSize -> s, GaugeFrameElementFunction -> f, GaugeFrameStyle -> Hue[s]], {s, {0.05, 0.2, 0.4}}, {f, {"BezelSector", "GlassSector", "Sector"}}]]
Wolfram Language code: Grid[{Flatten[Table[ VerticalGauge[RandomInteger[{1, 100}], {0, 100}, GaugeStyle -> GrayLevel[0.25], GaugeFrameSize -> s, GaugeFrameElementFunction -> f, GaugeFrameStyle -> Hue[0.5 + 4s]], {s, {0.05, 0.1}}, {f, {"GlassRectangle", "FadingRectangle", "Rectangle"}}]]}]