登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A084866号 可以用p和q素数写成2*p^2+3*q^2形式的素数。 5
83, 173, 197, 269, 317, 389, 461, 557, 653, 701, 797, 941, 1091, 1109, 1181, 1229, 1637, 1709, 1949, 1997, 2069, 2141, 2309, 2531, 2549, 2621, 2789, 2861, 3221, 3389, 3461, 3581, 3821, 4157, 4229, 4349, 4493, 5051, 5261, 5381, 5501, 5693 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
的后续A084864型和,共A084865型;A084863号(a(n))>0。
链接
罗伯特·伊斯雷尔,n=1..10000时的n,a(n)表
例子
A000040型(40) = 173 = 98 + 75 = 2*7^2 + 3*5^2 = 2*A000040型(4)^2 + 3*A000040型(3) ^2,因此173是一个术语。
MAPLE公司
N: =10^4:#获得项<=N
P: =选择(isprime,[2,seq(i,i=3..floor((N/2)^(1/2))):
m: =无(P):
R: ={}:
对于p in p do
对于i从2到m,而3*P[i]^2<=N-2*P^2 do
v: =2*p^2+3*p[i]^2;
如果isprime(v),则R:=R并集{v}fi
日期:
排序(转换(R,列表))#罗伯特·伊斯雷尔2020年11月5日
数学
nn=10^4;(*获得术语<=nn*)
P=选择[Join[{2},Range[3,Floor[Sqrt[nn/2]]],PrimeQ];
m=长度[P];
R={};
Do[对于[i=2,3*P[[i]]^2<=nn-2*P^2,i++,
v=2*p^2+3*p[[i]]^2;
如果[PrimeQ[v],R=R~联合~{v}]],
{p,p}];
排序[R](*Jean-François Alcover公司,2021年12月13日,之后罗伯特·伊斯雷尔*)
交叉参考
囊性纤维变性。A084863号,A084864型,A084865型.
关键词
非n
作者
莱因哈德·祖姆凯勒,2003年6月10日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|Demos公司|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人员OEIS基金会。

许可协议、使用条款、隐私政策。.

最后修改时间:美国东部时间2024年3月28日16:58。包含371254个序列。(在oeis4上运行。)