|
%I #13 May 10 2022 15:38:22
%S 27,84,108,165,189,251,270,327,351,408,432,489,513,570,594,651,675,
%T 732,764,813,837,894,918,980,999,1056,1080,1137,1161,1218,1242,1299,
%U 1323,1380,1404,1461,1493,1542,1566,1623,1647,1709
%N Numbers k such that 0 and 3 occur juxtaposed in the base-9 representation of k but not of k+1.
%H Harvey P. Dale, <a href="/A043962/b043962.txt">Table of n, a(n) for n = 1..1000</a>
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,9],{0,3}]>0 || SequenceCount[ IntegerDigits[n,9],{3,0}]>0,1,0],{n,2000}],{1,0}][[All,1]] (* _Harvey P. Dale_, May 10 2022 *)
%Y Cf. A007095.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
