A357999 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 A074458).
1, 0, 5, 12, 14, 41, 74, 87, 128, 185, 185, 162, 167, 159, 119, 67, 26, 7, 1
Offset: 8
Crossrefs
Programs
-
Mathematica
a055643[n_]:=FromDigits@ Apply[Join, PadLeft[#, 2] & /@ IntegerDigits@ IntegerDigits[n, 60]]; a074458[n_] := Plus @@ (IntegerDigits@ n /. {0 -> 6, 1 -> 2, 2 -> 5, 3 -> 5, 7 -> 4, 8 -> 7, 9 -> 5}); a[n_]:=a074458[a055643[n]]+6(4-Ceiling[Log10[a055643[n]+1]]);Table[Count[Join[{24},Array[a,1439]],n],{n,8,26}]
Comments