A044521 - OEIS

%I #7 Aug 31 2021 15:53:16

%S 51,100,149,198,247,296,345,363,394,443,492,541,590,639,688,706,737,

%T 786,835,884,933,982,1031,1049,1080,1129,1178,1227,1276,1325,1374,

%U 1392,1423,1472,1521,1570,1619,1668,1717,1735,1766,1815

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

%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,7],{0,2}]>0,1,0],{n,2000}],{1,0}][[All,1]] (* _Harvey P. Dale_, Aug 31 2021 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_