OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
select(isprime, [seq(128*x^8 - 256*x^6 + 160*x^4 - 32*x^2 + 1, x=1..100)]); # Robert Israel, Aug 13 2024
MATHEMATICA
lst={}; Do[p=ChebyshevT[8, n]; If[PrimeQ[p], AppendTo[lst, p]], {n, 9^3}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Sep 11 2008
STATUS
approved