login
A043953
Numbers k such that 3 and 7 occur juxtaposed in the base-8 representation of k but not of k+1.
0
31, 59, 95, 123, 159, 187, 223, 255, 287, 315, 351, 379, 415, 443, 479, 507, 543, 571, 607, 635, 671, 699, 735, 767, 799, 827, 863, 891, 927, 955, 991, 1019, 1055, 1083, 1119, 1147, 1183, 1211, 1247, 1279, 1311, 1339, 1375
OFFSET
1,1
MATHEMATICA
Select[Range[1400], MemberQ[Sort/@Partition[IntegerDigits[#, 8], 2, 1], {3, 7}] && !MemberQ[Sort/@Partition[IntegerDigits[#+1, 8], 2, 1], {3, 7}]&] (* Harvey P. Dale, Oct 09 2011 *)
CROSSREFS
Cf. A007094.
Sequence in context: A166604 A039350 A043173 * A327447 A139954 A153636
KEYWORD
nonn,base
STATUS
approved