# How to create a clock model with any numbers in Mathematica?

I wonder how to create a clock-model in Mathematica. I got this model image from a maths group, I am posting this for reference. I wish to create a clock model like this with any numbers. Any help would be appreciated. Thanks in advance

• Point+Circle+Table+Text. Where are you stuck?
– Kuba
Jun 16, 2020 at 7:26
• Take a look at mentioned symbols and Graphics and hit F1 for a start.
– Kuba
Jun 16, 2020 at 7:40

If you are lazy like me, you may consider ClockGauge:

SeedRandom[1]
labels = RandomInteger[50, 12]

ClockGauge[PlotTheme -> "Business", ImageSize -> Large, GaugeMarkers -> None,
LabelStyle -> Directive[FontColor -> Cyan, FontSize -> Scaled[.075]]] /.
Text[t_Integer, a___] :> Text[labeling @t, a]


If you need a more/less serious look/feel consider

ClockGauge[PlotTheme -> "Scientific", ImageSize -> Large,
GaugeMarkers -> None,  GaugeLabels -> None, LabelStyle -> FontSize -> Scaled[.075]] /.
Text[t_Integer, a___] :> Text[labeling @ t, a]


ClockGauge[PlotTheme -> "Marketing", ImageSize -> Large,
GaugeMarkers -> None, LabelStyle -> FontSize -> Scaled[.075]] /.
Text[t_Integer, a___] :> Text[labeling @ t, a]


clock[radius_?NumericQ, innerFraction_?NumericQ, labels_?ListQ, fontStyles_?ListQ] :=
Block[{points = RotationTransform[π - π/Length[labels]][
CirclePoints[Length@labels]*innerFraction]},
Graphics[{
Thick,