%I #7 Dec 17 2021 12:44:26
%S 57,121,185,249,313,377,441,456,505,569,633,697,761,825,889,953,968,
%T 1017,1081,1145,1209,1273,1337,1401,1465,1480,1529,1593,1657,1721,
%U 1785,1849,1913,1977,1992,2041,2105,2169,2233,2297,2361
%N Numbers n such that string 7,1 occurs in the base 8 representation of n but not of n-1.
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n,8],{7,1}]>0,1,0],{n,2500}],{0,1}][[All,2]] (* _Harvey P. Dale_, Dec 17 2021 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_