OFFSET
8,2
COMMENTS
Since 8 <= A357970(n) <= 26 the sequence is finite and begins with offset 8.
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]]); Table[Count[Join[{24}, Array[a, 1439]], n], {n, 8, 26}]
CROSSREFS
KEYWORD
nonn,base,easy,fini,full
AUTHOR
Stefano Spezia, Oct 23 2022
STATUS
approved