|
%I #12 Nov 08 2022 20:34:26
%S 5,7,14,21,25,32,34,41,59,61,63,75,79,86,88,95,102,106,113,115,122,
%T 167,169,176,183,187,189,221,223,225,237,241,248,250,257,264,268,275,
%U 277,284,302,304,306,318,322,329,331,338,345,349
%N Numbers k such that 1 and 2 occur juxtaposed in the base-3 representation of k but not of k-1.
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,3],{1,2}]>0 || SequenceCount[ IntegerDigits[n,3],{2,1}]>0,1,0],{n,400}],{0,1}][[All,2]] (* _Harvey P. Dale_, Nov 08 2022 *)
%Y Cf. A007089.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
