|
%I #7 Feb 18 2018 20:29:53
%S 16,52,88,96,124,160,196,232,268,304,312,340,376,412,448,484,520,528,
%T 556,576,628,664,700,736,744,772,808,844,880,916,952,960,988,1024,
%U 1060,1096,1132,1168,1176,1204,1240,1276,1312,1348
%N Numbers n such that string 2,4 occurs in the base 6 representation of n but not of n-1.
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,6],{2,4}]>0,1,0],{n,1400}],{0,1}][[All,2]] (* _Harvey P. Dale_, Feb 18 2018 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
