cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A357997 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 A010371).

Original entry on oeis.org

1, 0, 5, 10, 16, 35, 66, 88, 119, 166, 187, 177, 161, 154, 129, 81, 35, 9, 1
Offset: 8

Views

Author

Stefano Spezia, Oct 23 2022

Keywords

Comments

Since 8 <= A357971(n) <= 26 the sequence is finite and begins with offset 8.

Crossrefs

Histogram of A357971.

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]]); Table[Count[Join[{24},Array[a,1439]],n],{n,8,26}]