A357970 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, 3 and 6 segments, respectively.
24, 20, 23, 23, 22, 23, 24, 21, 25, 24, 20, 16, 19, 19, 18, 19, 20, 17, 21, 20, 23, 19, 22, 22, 21, 22, 23, 20, 24, 23, 23, 19, 22, 22, 21, 22, 23, 20, 24, 23, 22, 18, 21, 21, 20, 21, 22, 19, 23, 22, 23, 19, 22, 22, 21, 22, 23, 20, 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]]; a006942[n_] := Plus @@ (IntegerDigits@ n /. {0 -> 6, 1 -> 2, 2 -> 5, 3 -> 5, 7 -> 3, 8 -> 7, 9 -> 6}); a[n_]:=a006942[a055643[n]]+6(4-Ceiling[Log10[a055643[n]+1]]); Join[{24}, Array[a, 66]]
Comments