A133229-OEIS公司

A133229号

最小索引-sum i+j，使素数（i）+素数（j）=4*n^2。a（0）=-1表示不存在这样的素数对。

-1, 2, 8, 14, 20, 27, 37, 46, 57, 70, 80, 95, 108, 124, 142, 160, 174, 193, 213, 231, 253, 277, 297, 321, 346, 376, 396, 425, 451, 476, 507, 537, 566, 598, 626, 659, 693, 725, 770, 796, 836, 870, 912, 941, 984, 1022, 1060, 1103, 1146, 1187, 1243, 1277, 1322, 1366, 1404, 1449, 1500, 1553, 1597, 1648, 1691, 1746, 1798

(列表;图表;参考;听;历史;文本;内部格式)

抵消

0,2

链接

n=0..62时的n、a（n）表。

配方奶粉

a（n）=最小值（i+j），1<=i<=j：A000040型（i）+A000040型（j）=A016742号（n） ●●●●-R.J.马塔尔，2008年4月22日

MAPLE公司

A133229号：=proc（n）局部a016742，i，j，a；a016742：=4*n^2；a:=2*numtheory[pi]（a016742）；如果n=0，则返回（-1）；fi；对于i从1到numtheory[pi]（a016742-1），如果是i素数（a016642-ithprime（i）），那么j:=numtheori[pi]；fi；od：返回（a）；结束：连续(A133229号（n），n=0..80）#R.J.马塔尔2008年4月22日

数学

加入[｛-1｝，表[Min[Total/@（PrimePi/@选择[IntegerPartitions[4 n^2，｛2｝]，AllTrue[#，PrimeQ]&]）]，｛n，70｝]]（*需要Mathematica版本10或更高版本*）(*哈维·P·戴尔2021年6月18日*）

交叉参考

囊性纤维变性。A000040型,A005843号,A016742号,A113631号,A133230号.

上下文中的序列：A294960型 2019年1月59日 A241003型*A364615型 A161330号 A046940号

相邻序列：A133226号 A133227号 A133228号*A133230号 A133231号 A133232号

关键词

签名

作者

亚历山大·波沃洛茨基2007年12月19日

扩展

编辑和扩展人R.J.马塔尔2008年4月22日

状态

经核准的