login
Numbers n with property that n^3+n^2+{3,5} are twin primes.
1

%I #4 Dec 12 2012 16:04:22

%S 0,1,28,103,403,613,658,1018,1138,1318,1678,2023,2188,2383,2653,3418,

%T 3853,3958,4333,4393,4828,5278,5908,6163,8218,8428,8683,8848,9028,

%U 9043,9478,9868,10003,10243,10978,11518,11533,12133,12493,13603,13633,14593

%N Numbers n with property that n^3+n^2+{3,5} are twin primes.

%C All positive terms == 1 mod 3.

%H Harvey P. Dale, <a href="/A168254/b168254.txt">Table of n, a(n) for n = 0..1000</a>

%t Union[Table[If[PrimeQ[n^3+n^2+3]&&PrimeQ[n^3+n^2+5],n,0],{n,1,40000,3}]]

%t Select[Range[0, 15000], And @@ PrimeQ[#^3 + #^2 + {3, 5}] &] (* _Harvey P. Dale_, Dec 12 2012 *)

%K nonn

%O 0,3

%A _Zak Seidov_, Nov 21 2009