A174156 Numbers n such that n^32+(n+1)^32 is a prime.
8, 10, 12, 22, 100, 146, 154, 219, 246, 269, 287, 309, 336, 373, 392, 398, 423, 440, 449, 476, 515, 540, 557, 628, 671, 693, 715, 733, 746, 780, 848, 879, 913, 924, 926, 937, 974, 975, 1130, 1191, 1193, 1198, 1204, 1260, 1272, 1316, 1378, 1400, 1414, 1451
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[n: n in [1..1500] | IsPrime(n^32+(n+1)^32 )];
-
Mathematica
lst={};Do[If[PrimeQ[n^32+(n+1)^32],AppendTo[lst,n]],{n,1500}];lst (* Vincenzo Librandi, Aug 31 2012 *) Select[Range[1500], PrimeQ[#^32 + (# + 1)^32] &] (* Bruno Berselli, Aug 31 2012 *) Position[Total/@Partition[Range[1460]^32,2,1],?(PrimeQ[#]&)]//Flatten (* _Harvey P. Dale, Jul 05 2021 *)