login
A044130
Numbers n such that string 4,4 occurs in the base 6 representation of n but not of n-1.
0
28, 64, 100, 136, 168, 208, 244, 280, 316, 352, 384, 424, 460, 496, 532, 568, 600, 640, 676, 712, 748, 784, 816, 856, 892, 928, 964, 1000, 1008, 1072, 1108, 1144, 1180, 1216, 1248, 1288, 1324, 1360, 1396, 1432, 1464, 1504, 1540
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 6], {4, 4}]>0, 1, 0], {n, 1600}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 01 2018 *)
CROSSREFS
Sequence in context: A038641 A342756 A043386 * A044511 A290543 A344044
KEYWORD
nonn,base
STATUS
approved