OFFSET
1,1
COMMENTS
ChebyshevT[16,x] is the 16th Chebyshev polynomial of the first kind evaluated at x.
The corresponding values n are in A219278.
MATHEMATICA
lst={}; Do[p=Abs[ChebyshevT[16, n]]; If[PrimeQ[p], AppendTo[lst, p]], {n, 10^3}]; lst
Select[ChebyshevT[16, Range[250]], PrimeQ] (* Harvey P. Dale, May 06 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Nov 17 2012
STATUS
approved