A070655 Numbers k such that k+1, k^2+1, k^4+1 and k^8+1 are primes.
1, 2, 4, 19380, 285090, 337536, 448630, 532390, 534430, 545140, 547536, 585106, 602056, 677076, 876180, 1007386, 1030200, 1331950, 1462000, 1736346, 1878790, 1883856, 2071960, 2194666, 2240890, 2763010, 2824720, 3018606, 3114996
Offset: 1
Keywords
Links
- Jason Bard, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A070325.
Programs
-
Mathematica
Do[ If[ PrimeQ[n + 1] && PrimeQ[n^2 + 1] && PrimeQ[n^4 + 1] && PrimeQ[n^8 + 1], Print[n]], {n, 1, 10^7}]