%I#7 2020年7月27日18:16:11
%S 31,801291782232276325374423472521566570619668717,
%电话:766815864909913962101110601109115812071252125613051354,
%电话:1403145215011567159515991648169717461795
%N对N进行编号,使字符串4,3出现在N的以7为基数的表示中,但不出现在N+1中。
%t序列位置[Table[If[SequenceCount[IntegerDigits[n,7],{4,3}]>0,1,0],{n,2000}],{1,0}][[All,1]](*需要Mathematica版本10或更高版本*)(*Harvey P.Dale_,2020年7月27日*)
%K nonn,基础
%O 1,1号机组
%百灵鸟金伯利_