login
Nonnegative numbers n such that abs(-66n^3 + 3845n^2 - 60897n + 251831) is prime.
6

%I #12 Feb 20 2017 14:40:02

%S 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,

%T 26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,47,49,51,

%U 54,58,65,68,70,75,76,77,82,88,89,97,99,101,102,104,109

%N Nonnegative numbers n such that abs(-66n^3 + 3845n^2 - 60897n + 251831) is prime.

%C 46 is the smallest number not in this sequence.

%H Robert Price, <a href="/A272437/b272437.txt">Table of n, a(n) for n = 1..3012</a>

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Prime-GeneratingPolynomial.html">Prime-Generating Polynomials</a>

%e 4 is in this sequence since abs(-66*4^3 + 3845*4^2 - 60897*4 + 251831) = abs(-4224+61520-243588+251831) = 65539 is prime.

%t Select[Range[0, 109], PrimeQ[-66#^3 + 3845#^2 - 60897# + 251831] &]

%o (PARI) is(n)=isprime(abs(66*n^3-3845*n^2+60897*n-251831)) \\ _Charles R Greathouse IV_, Feb 20 2017

%Y Cf. A050268, A050267, A005846, A007641, A007635, A048988, A050265, A050266, A271980, A272030, A272074, A272075, A272160, A271144, A272285, A272401, A272438.

%K nonn

%O 1,3

%A _Robert Price_, Apr 29 2016