OFFSET
1,1
COMMENTS
a(20) has 84 digits. Most terms of A173299 are nonprime.
PROG
(Magma) Z<x>:=PolynomialRing(Integers()); N<r>:=NumberField(2*x^2-2*x-1); S:=[ r^n+(1-r)^n: n in [1..300] ]; [ k: j in [1..#S] | IsPrime(k) where k is Numerator(RationalField()!S[j])];
CROSSREFS
KEYWORD
nonn
AUTHOR
Klaus Brockhaus, Mar 02 2010
STATUS
approved