login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A044480
Numbers n such that string 4,2 occurs in the base 5 representation of n but not of n+1.
0
22, 47, 72, 97, 114, 122, 147, 172, 197, 222, 239, 247, 272, 297, 322, 347, 364, 372, 397, 422, 447, 472, 489, 497, 522, 547, 574, 597, 614, 622, 647, 672, 697, 722, 739, 747, 772, 797, 822, 847, 864, 872, 897, 922, 947, 972
OFFSET
1,1
MATHEMATICA
Select[Range[1000], MemberQ[Partition[IntegerDigits[#, 5], 2, 1], {4, 2}]&&!MemberQ[Partition[IntegerDigits[#+1, 5], 2, 1], {4, 2}]&] (* Harvey P. Dale, Mar 13 2011 *)
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 5], {4, 2}]>0, 1, 0], {n, 1000}], {1, 0}][[All, 1]] (* Harvey P. Dale, Aug 24 2021 *)
CROSSREFS
Sequence in context: A132763 A250723 A044099 * A253602 A217751 A209186
KEYWORD
nonn,base
STATUS
approved