login
Primes of the form p^3 + p^2 + 1, where p is a prime.
0

%I #7 Jul 25 2021 02:36:55

%S 13,37,151,1453,12697,106033,151687,362953,712891,1040503,5767381,

%T 7004353,7004353,13709041,18260617,31955503,46397161,59015191,

%U 98184703,102065653,127516537,208879507,286625461,441290203,866431387,916441453,1299786853,1574390317,1830772297

%N Primes of the form p^3 + p^2 + 1, where p is a prime.

%C Only primes p of the form 3k+2 can yield terms of this sequence (the only exception is a(2)=37, generated by p=3).

%C No prime of this sequence can generate another term in this sequence because all terms of this sequence are 1 modulo 3.

%e a(12) = 7004353 = 191^3 + 191^2 + 1.

%t Select[Table[x^3+x^2+1,{x,Prime[Range[200]]}],PrimeQ] (* _Harvey P. Dale_, Jul 31 2014 *)

%K nonn

%O 1,1

%A Avik Roy (avik_3.1416(AT)yahoo.co.in), Jan 30 2009

%E More terms from _Harvey P. Dale_, Jul 31 2014