login
A044469
Numbers n such that string 2,1 occurs in the base 5 representation of n but not of n+1.
0
11, 36, 59, 61, 86, 111, 136, 161, 184, 186, 211, 236, 261, 299, 309, 311, 336, 361, 386, 411, 434, 436, 461, 486, 511, 536, 559, 561, 586, 611, 636, 661, 684, 686, 711, 736, 761, 786, 809, 811, 836, 861, 886, 924, 934, 936, 961
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 5], {2, 1}]>0, 1, 0], {n, 1000}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 21 2021 *)
CROSSREFS
Sequence in context: A191292 A107280 A044088 * A015246 A093500 A081438
KEYWORD
nonn,base
STATUS
approved