login
A044498
Numbers n such that string 2,3 occurs in the base 6 representation of n but not of n+1.
0
15, 51, 87, 95, 123, 159, 195, 231, 267, 303, 311, 339, 375, 411, 447, 483, 519, 527, 575, 591, 627, 663, 699, 735, 743, 771, 807, 843, 879, 915, 951, 959, 987, 1023, 1059, 1095, 1131, 1167, 1175, 1203, 1239, 1275, 1311, 1347
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 6], {2, 3}]>0, 1, 0], {n, 1500}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 12 2018 *)
CROSSREFS
Sequence in context: A337295 A334530 A044117 * A138082 A002602 A098831
KEYWORD
nonn,base
STATUS
approved