提出

经核准的

编辑

提出

Antti Karttunen，<a href=“/A069847号/b069847.txt“>n表，n=1..20000时a（n）</a>

（PARI）A069847号（n） ={my（digs=数字（n），u=#digs，nums=集合（[]））；对于（n=1，1+u，nums=setunion（nums，[fromdigits（向量（1+u、i，如果（i<n，digs[i]，如果（i>n，diggs[i-1]，6））））；#select（isprime，nums）；}\\安蒂·卡图恩2019年8月23日

经核准的

编辑

_阿玛纳斯·穆尔西(阿玛纳斯_阴暗的(自动变速箱)雅虎.通用域名格式),_,2002年4月16日

OEIS服务器: https://oeis.org/edit/global/2075

编辑和扩展人 _罗伯特·威尔逊v(rgwv（相对湿度）(自动变速箱)rgwv公司.通用域名格式),_,2002年4月18日

OEIS服务器: https://oeis.org/edit/global/156

囊性纤维变性。A069842号,A069843号,A069844号,A069845号,A069846号,A069848号,A069849号,A069850型& 和 A069851号.

基础,非n,新的

通过在n中所有可能的位置插入6而获得的不同素数。这包括前缀。

1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 2, 0, 0, 0, 2, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 2, 0, 2, 0, 0, 0, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 2, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 3, 0, 1, 0, 0

1,13

请参阅中的示例A069842号.

表[Count[PrimeQ[Union[FromDigits/@Table[Insert[IntegerDigits[n]，6，j]，{j，1，Floor[Log[10，n]+2]}]]，True]，{n，1，105}]

囊性纤维变性。A069842号,A069843号,A069844号,A069845号,A069846号,A069848号,A069849号,A069850型&A069851号.

基础,非n

阿玛纳斯·穆尔西（Amarnath_Murthy（AT）yahoo.com），2002年4月16日

由Robert G.Wilson v（rgwv（AT）rgwv.com）编辑和扩展，2002年4月18日

经核准的