%I#15 2022年1月16日23:33:29
%S 2,17,73521577593109711534177871333353338573788941617,
%电话:65537656096969770289707937489726215326265726639331777,
%电话:33192133652933697752948953312953363335909215949535985372098241210124921024172134529
%N个素数,其base-8表示也是素数的base-3表示。
%对于任意两个不同的碱基b,C>1,这个序列是基于相同思想的二维序列数组的一部分。序列A235265和A235266是该列表中最基本的序列。序列A089971、A089981和A090707到A090721以及序列A065720-A065727遵循相同的思想,其中一个基等于10。
%C有关进一步的动机和交叉参考,请参见序列A235265,它是整个序列家族的主要条目。
%C似乎是A066649和A123364的一个子序列。
%C由于以7为基数的扩展的尾数必须小于3(与所有其他扩展一样),因此这是A045381的子序列。
%H Alois P.Heinz,n的表格,n=1..10000的a(n)</a>
%哈斯勒,<a href=“https://docs.google.com/document/d/10IM7fcAbB2tqRGuwfGvuEGUzD_IXbgXPDK0tfxN4M3o/pub“>基c展开式也是素数基b展开式的素数</a>
%例如,17=21_8和21_3=7都是质数。
%t b8b3pQ[n_]:=模块[{id8=整数位数[n,8]},最大[id8]<3&&PrimeQ[起始数字[id8,3]]];选择[Prime[Range[160000]],b8b3pQ](*哈维·P·戴尔,2019年3月16日*)
%o(PARI)是(p,b=3,c=8)=vecmax(d=数字(p,c))<b&isprime(向量(#d,i,b^(#d-i))*d~)&&isprim(p)
%o(PARI)表示素数(p=1,1e3,is(p,8,3)&&print1(vector(#d=数字(p,3),i,8^(#d-i))*d~,“,”))\\要生成术语,这比直接使用is(.)=is(.,3,8)选择它们更有效
%Y参考A231478、A065720⊂A036952、A065721-A065727、A235394、A235395、A089971⊂A020449、A089981、A090707-A091924、A235461-A235482、A235615-A235639。有关更多交叉引用,请参阅链接。
%K nonn,基础
%O 1,1号机组
%A _M.F.Hasler,2014年1月12日
|