A260265 Numbers n such that prime(n) + prime(n+4) + prime(n+5) + prime(n+7) + prime(n+8) = prime(n+1) + prime(n+2) + prime(n+3) + prime(n+6) + prime(n+9).
180, 205, 223, 258, 297, 326, 350, 424, 502, 514, 521, 548, 666, 757, 765, 796, 804, 861, 909, 1006, 1098, 1150, 1264, 1317, 1348, 1349, 1400, 1416, 1592, 1613, 1663, 1757, 1821, 1914, 1939, 2034, 2048, 2073, 2085, 2109, 2164, 2276, 2316, 2360, 2380, 2398, 2655
Offset: 1
Keywords
Examples
180 is in the list because 1069 + 1097 + 1103 + 1117 + 1123 = 1087 + 1091 + 1093 + 1109 + 1129.
Links
- K. D. Bajpai, Table of n, a(n) for n = 1..10000
Programs
-
Magma
[n: n in [1..3000] | NthPrime(n) + NthPrime(n+4)+ NthPrime(n+5)+ NthPrime(n+7)+ NthPrime(n+8) eq NthPrime(n+1)+ NthPrime(n+2)+ NthPrime(n+3)+ NthPrime(n+6)+ NthPrime(n+9)];
-
Mathematica
Select[Range[5000], Prime[#] + Prime[# + 4] + Prime[# + 5] + Prime[# + 7] + Prime[# + 8] == Prime[# + 1] + Prime[# + 2] + Prime[# + 3] + Prime[# + 6] + Prime[# + 9] &]
-
PARI
for(n=1,5000, if(prime(n) + prime(n+4) + prime(n+5) + prime(n+7) + prime(n+8) == prime(n+1) + prime(n+2) + prime(n+3) + prime(n+6) + prime(n+9), print1(n,", ")));