OFFSET
1,1
COMMENTS
Conjecture: sequence is infinite.
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Range[1, 401, 2]^2+1296, PrimeQ] (* Harvey P. Dale, Sep 18 2018 *)
PROG
(Haskell)
a256834 n = a256834_list !! (n-1)
a256834_list = [x | x <- map (+ 1296) a000290_list, a010051' x == 1]
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Apr 11 2015
STATUS
approved