|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|