A256839 Primes of form n^2 + 14641.
14657, 14741, 14897, 15217, 15541, 15797, 15937, 19541, 20117, 22037, 22741, 23857, 25457, 28097, 30517, 31541, 38977, 40241, 42197, 43541, 44917, 47041, 48497, 50741, 57077, 58741, 61297, 64817, 65717, 74177, 77141, 80177, 82241, 87541, 107057, 117041
Offset: 1
Keywords
Links
- Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Haskell
a256839 n = a256839_list !! (n-1) a256839_list = [x | x <- map (+ 14641) a000290_list, a010051' x == 1]
-
Mathematica
Select[Range[500]^2+14641,PrimeQ] (* Harvey P. Dale, Mar 20 2017 *)
Comments