login
Numbers n such that string 3,1 occurs in the base 6 representation of n but not of n-1.
1

%I #9 Jan 05 2023 17:27:26

%S 19,55,91,114,127,163,199,235,271,307,330,343,379,415,451,487,523,546,

%T 559,595,631,667,684,739,762,775,811,847,883,919,955,978,991,1027,

%U 1063,1099,1135,1171,1194,1207,1243,1279,1315,1351

%N Numbers n such that string 3,1 occurs in the base 6 representation of n but not of n-1.

%H Harvey P. Dale, <a href="/A044121/b044121.txt">Table of n, a(n) for n = 1..1000</a>

%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,6],{3,1}]>0,1,0],{n,1500}],{0,1}][[All,2]] (* _Harvey P. Dale_, Jan 05 2023 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_