A357971 a(n) is the number of segments used to represent the time of n minutes past midnight in the format hh:mm on a 7-segment calculator display; version where the digits '6', '7' and '9' use 6, 4 and 6 segments, respectively.
24, 20, 23, 23, 22, 23, 24, 22, 25, 24, 20, 16, 19, 19, 18, 19, 20, 18, 21, 20, 23, 19, 22, 22, 21, 22, 23, 21, 24, 23, 23, 19, 22, 22, 21, 22, 23, 21, 24, 23, 22, 18, 21, 21, 20, 21, 22, 20, 23, 22, 23, 19, 22, 22, 21, 22, 23, 21, 24, 23, 20, 16, 19, 19, 18, 19, 20
Offset: 0
Links
- Stefano Spezia, Table of n, a(n) for n = 0..1439 (first period of the sequence).
- Index entries for sequences related to calculator display
Programs
-
Mathematica
a055643[n_]:=FromDigits@ Apply[Join, PadLeft[#, 2] & /@ IntegerDigits@ IntegerDigits[n, 60]]; a010371[n_] := Plus @@ (IntegerDigits@ n /. {0 -> 6, 1 -> 2, 2 -> 5, 3 -> 5, 7 -> 4, 8 -> 7, 9 -> 6}); a[n_]:=a010371[a055643[n]]+6(4-Ceiling[Log10[a055643[n]+1]]); Join[{24},Array[a,66]]
Comments