login
A044113
Numbers n such that string 1,5 occurs in the base 6 representation of n but not of n-1.
0
11, 47, 66, 83, 119, 155, 191, 227, 263, 282, 299, 335, 371, 396, 443, 479, 498, 515, 551, 587, 623, 659, 695, 714, 731, 767, 803, 839, 875, 911, 930, 947, 983, 1019, 1055, 1091, 1127, 1146, 1163, 1199, 1235, 1271, 1307, 1343
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 6], {1, 5}]>0, 1, 0], {n, 1400}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 07 2018 *)
CROSSREFS
Sequence in context: A158809 A279768 A238665 * A044494 A124670 A142103
KEYWORD
nonn,base
STATUS
approved