%I #6 May 13 2013 01:54:10
%S 1651609,346843729,1234422421,8573842621,68524008841,91197383509,
%T 199720105201,253913232301,1305596196829,3008406075949,3508808350321,
%U 4076728993681,21664213900309,45306839594521,66526499195521
%N Primes of the form P_6(n) where P_k(n) is the Legendre polynomial of order k at n.
%C This sequence is infinite under Bunyakovsky's conjecture. [_Charles R Greathouse IV_, Oct 26 2011]
%H Charles R Greathouse IV, <a href="/A144127/b144127.txt">Table of n, a(n) for n = 1..10000</a>
%F Primes of the form 924n^6 + 2772n^5 + 3150n^4 + 1680n^3 + 420n^2 + 42n + 1. [_Charles R Greathouse IV_, Oct 26 2011]
%t lst={};Do[p=LegendreP[6,n];If[PrimeQ[p],AppendTo[lst,p]],{n,1,7^3,2}];lst
%o (PARI) forstep(n=1,1e4,2,if(isprime(t=pollegendre(6,n)),print1(t", ")))
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Sep 11 2008
|