|
%I #11 Dec 12 2022 17:48:04
%S 44,76,125,157,206,238,287,319,368,396,449,481,530,562,611,643,684,
%T 724,773,805,854,886,935,967,1016,1048,1097,1125,1178,1210,1259,1291,
%U 1340,1372,1413,1453,1502,1534,1583,1615,1664,1696
%N Numbers k such that 4 and 8 occur juxtaposed in the base-9 representation of k but not of k-1.
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,9],{4,8}]>0||SequenceCount[ IntegerDigits[n,9],{8,4}]>0,1,0],{n,2000}],{0,1}][[All,2]] (* _Harvey P. Dale_, Dec 12 2022 *)
%Y Cf. A007095.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
