%I#47 2015年9月20日15:08:46
%S 11,13,3,2,5,7,17,71,19,97,73,31101103,37,79907701107709911,
%电话:1131313111103131373733131171739397971719,
%电话:191919393737979777737307307727171031033737017013
%N a(1)=11。对于n>1,让s表示a(n-1)的数字串,省略第一个数字。那么a(n)是以s开头的尚未出现的最小素数。
%如果a(n-1)只有一个数字,那么a(n)就是缺失的最小素数。
%C忽略s中的前导零。
%b文件表明序列中没有出现无限多的素数。然而,目前没有证据表明任何特定的素数(比如说23)从未出现过。
%C _Alois P.Heinz指出,该序列与A262283最终合并(详见后文)_N.J.A.Sloane,2015年9月19日
%C不带素数条件的变量:A262356.-_Reinhard Zumkeller,2015年9月19日
%H Alois P.Heinz,n的表格,n=1..705的a(n)</a>
%e a(1)=11,所以s=1,a(2)是以1开头的最小缺失素数,所以a(2”)=13。那么s=3,那么a(3)=3。那么s是空字符串,因此a(4)=2,依此类推。
%o(哈斯克尔)
%o导入数据。列表(isPrefixOf,删除)
%o a262282 n=a262282_列表!!(n-1)
%o a262282_list=11:f“1”(地图显示(删除11 a000040_list)),其中
%o f xs-pss=(读取ys::Integer):
%o f(dropWhile(=='0')ys')(删除ys-pss)
%o其中ys@(_:ys')=头$filter(isPrefixOf xs)pss
%o--_Reinhard Zumkeller_,2015年9月19日
%是A089755建议的。参见A262283。
%Y参考A262356。
%K nonn,基础
%O 1,1
%A _弗兰克林·T·亚当斯-沃特斯和N·J·A·斯隆,2015年9月18日
%E来自_Alois P.Heinz的更多条款,2015年9月18日
|