login
A044504
Numbers n such that string 3,3 occurs in the base 6 representation of n but not of n+1.
1
21, 57, 93, 131, 165, 201, 237, 273, 309, 347, 381, 417, 453, 489, 525, 563, 597, 633, 669, 705, 741, 791, 813, 849, 885, 921, 957, 995, 1029, 1065, 1101, 1137, 1173, 1211, 1245, 1281, 1317, 1353, 1389, 1427, 1461, 1497, 1533, 1569, 1605, 1643, 1677, 1713
OFFSET
1,1
MATHEMATICA
f[n_] := Length[StringPosition[ToString[FromDigits[IntegerDigits[n, 6]]], "33", 1]]; Select[Table[n, {n, 10000}], f[#] > 0 && f[# + 1] == 0 &] (* Vladimir Joseph Stephan Orlovsky, Jul 20 2011 *)
CROSSREFS
Cf. A044123.
Sequence in context: A176069 A043382 A044123 * A118057 A327902 A020148
KEYWORD
nonn,base
STATUS
approved