login
A044509
Numbers n such that string 4,2 occurs in the base 6 representation of n but not of n+1.
0
26, 62, 98, 134, 161, 170, 206, 242, 278, 314, 350, 377, 386, 422, 458, 494, 530, 566, 593, 602, 638, 674, 710, 746, 782, 809, 818, 854, 890, 926, 971, 998, 1025, 1034, 1070, 1106, 1142, 1178, 1214, 1241, 1250, 1286, 1322, 1358
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 6], {4, 2}]>0, 1, 0], {n, 1400}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 30 2021 *)
CROSSREFS
Sequence in context: A162316 A173085 A044128 * A039413 A043236 A044016
KEYWORD
nonn,base
STATUS
approved