A044368 - OEIS

A044368

Numbers n such that string 3,6 occurs in the base 10 representation of n but not of n-1.

%I #7 Mar 10 2016 09:58:26

%S 36,136,236,336,360,436,536,636,736,836,936,1036,1136,1236,1336,1360,

%T 1436,1536,1636,1736,1836,1936,2036,2136,2236,2336,2360,2436,2536,

%U 2636,2736,2836,2936,3036,3136,3236,3336,3360,3436

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

%t Transpose[SequencePosition[Table[If[SequenceCount[IntegerDigits[n],{3,6}]>0,1,0],{n,4000}],{0,1}]][[2]] (* The program uses the SequencePosition and SequenceCount functions from Mathematica version 10 *) (* _Harvey P. Dale_, Mar 10 2016 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_