%I #14 May 21 2024 12:49:01
%S 54,87,135,168,216,249,297,330,378,411,459,486,540,573,621,654,702,
%T 735,783,816,864,897,945,978,1026,1059,1107,1140,1188,1215,1269,1302,
%U 1350,1383,1431,1464,1512,1545,1593,1626,1674,1707
%N Numbers k such that 0 and 6 occur juxtaposed in the base-9 representation of k but not of k-1.
%H Harvey P. Dale, <a href="/A043185/b043185.txt">Table of n, a(n) for n = 1..1000</a>
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,9],{0,6}]>0||SequenceCount[ IntegerDigits[ n,9],{6,0}]>0,1,0],{n,1800}],{0,1}][[;;,2]] (* _Harvey P. Dale_, May 21 2024 *)
%Y Cf. A007095.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|