login
Numbers n such that string 6,4 occurs in the base 7 representation of n but not of n-1.
0

%I #7 Nov 13 2013 14:26:16

%S 46,95,144,193,242,291,322,340,389,438,487,536,585,634,665,683,732,

%T 781,830,879,928,977,1008,1026,1075,1124,1173,1222,1271,1320,1351,

%U 1369,1418,1467,1516,1565,1614,1663,1694,1712,1761,1810

%N Numbers n such that string 6,4 occurs in the base 7 representation of n but not of n-1.

%t Select[Range[2000],MemberQ[Partition[IntegerDigits[#,7],2,1],{6,4}] && !MemberQ[Partition[IntegerDigits[#-1,7],2,1],{6,4}]&] (* _Harvey P. Dale_, Nov 13 2013 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_