login
Numbers n such that string 1,1 occurs in the base 5 representation of n but not of n+1.
0

%I #7 Mar 11 2015 11:18:00

%S 6,34,56,81,106,131,174,181,206,231,256,284,306,331,356,381,409,431,

%T 456,481,506,534,556,581,606,631,659,681,706,731,874,881,909,931,956,

%U 981,1006,1034,1056,1081,1106,1131,1159,1181,1206

%N Numbers n such that string 1,1 occurs in the base 5 representation of n but not of n+1.

%t Flatten[Position[Partition[Table[If[MemberQ[Partition[ IntegerDigits[ n,5],2,1],{1,1}],1,0],{n,1300}],2,1],{1,0}]] (* _Harvey P. Dale_, Mar 11 2015 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_