A358000 a(n) is the number of times in the format hh:mm that can be represented in a 7-segment display by using only n segments (version A277116).
1, 2, 4, 16, 25, 39, 82, 106, 126, 170, 190, 169, 154, 146, 111, 65, 26, 7, 1
Offset: 8
Crossrefs
Programs
-
Mathematica
a055643[n_]:=FromDigits@ Apply[Join, PadLeft[#, 2] & /@ IntegerDigits@ IntegerDigits[n, 60]]; a277116[n_] := Plus @@ (IntegerDigits@ n /. {0 -> 6, 1 -> 2, 2 -> 5, 3 -> 5, 7 -> 3, 8 -> 7, 9 -> 5}); a[n_]:=a277116[a055643[n]]+6(4-Ceiling[Log10[a055643[n]+1]]);Table[Count[Join[{24},Array[a,1439]],n],{n,8,26}]
Comments