login
A171138
Primes of the form 7*p^2+7*p-1 (with p=prime).
2
41, 83, 2141, 2659, 3863, 6089, 15791, 31891, 37813, 66541, 90173, 160663, 187123, 210713, 349663, 362291, 368689, 401519, 442763, 464141, 486023, 679223, 769243, 904679, 945391, 976513, 1061969, 1173829, 1231859, 1315453, 1352119, 1465141
OFFSET
1,1
LINKS
MATHEMATICA
Select[Table[7p^2 + 7p - 1, {p, Prime[Range[400]]}], PrimeQ] (* Vincenzo Librandi, Oct 13 2012 *)
PROG
(Magma) [a: p in PrimesInInterval(1, 800) | IsPrime(a) where a is 7*p^2 + 7*p - 1]; // Vincenzo Librandi, Oct 13 2012
CROSSREFS
Cf. A171139.
Sequence in context: A054998 A067378 A331031 * A071886 A276302 A087939
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Jan 26 2010
STATUS
approved