WOLFRAM

Wolfram Language & System Documentation Center

Gauge Needles and Other Markers

    
Specify the needle appearance for a gauge, position a marker along the scale, or fill in the scale to the appropriate value:
Wolfram Language code: needles = Table[AngularGauge[RandomInteger[{1, 100}], {0, 100}, GaugeMarkers -> m, GaugeStyle -> RandomChoice[ColorData[67, "ColorList"]]], {m, ChartElementData["AngularGauge", "Markers"][[{2, 3, 6, 16, 18, 20}]]}];
Wolfram Language code: markers = Table[AngularGauge[42, {0, 100}, GaugeMarkers -> Placed["PolarMarker", p], GaugeFrameSize -> 0.2, GaugeStyle -> RandomChoice[ColorData[82, "ColorList"]]], {p, {"InsideScale", "OutsideScale", "Frame"}}];
Wolfram Language code: fills = MapThread[AngularGauge[42, {0, 100}, GaugeMarkers -> Placed[#1, #2], GaugeStyle -> RandomChoice[ColorData[82, "ColorList"]]]&, {ChartElementData["AngularGauge", "Markers"][[{9, 15, 9}]], {"DivisionCenter", "DivisionInterval", "ScaleRange"}}];
Wolfram Language code: Grid[Partition[Join[needles, markers, fills], 3]]
Wolfram Language code: bars = Grid[Partition[Join[Table[HorizontalGauge[RandomInteger[{10, 90}], {0, 100}, GaugeMarkers -> m, GaugeStyle -> RandomChoice[ColorData[85, "ColorList"]], ImageSize -> 250], {m, ChartElementData["HorizontalGauge", "Markers"][[{2, 9}]]}], MapThread[HorizontalGauge[RandomInteger[{50, 100}], {0, 100}, GaugeMarkers -> Placed[##1], ScaleDivisions -> {5, 2}, GaugeStyle -> RandomChoice[ColorData[85, "ColorList"]], ImageSize -> 250]&, {ChartElementData["HorizontalGauge", "Markers"][[{3, 4, 5, 10}]], {"Scale", "DivisionCenter", "DivisionInterval", "Scale"}}]], 2]]