login
A044596
Numbers n such that string 3,4 occurs in the base 8 representation of n but not of n+1.
0
28, 92, 156, 220, 231, 284, 348, 412, 476, 540, 604, 668, 732, 743, 796, 860, 924, 988, 1052, 1116, 1180, 1244, 1255, 1308, 1372, 1436, 1500, 1564, 1628, 1692, 1756, 1767, 1855, 1884, 1948, 2012, 2076, 2140, 2204, 2268, 2279
OFFSET
1,1
MATHEMATICA
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 8], {3, 4}]>0, 1, 0], {n, 2500}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jan 01 2017 *)
CROSSREFS
Sequence in context: A113958 A219815 A044215 * A331765 A333280 A192256
KEYWORD
nonn,base
STATUS
approved