A225874 Primes of the form 5*p^2+5*p+1, where p is a prime.
31, 61, 151, 281, 661, 911, 1531, 1901, 9461, 18911, 25561, 27011, 31601, 51511, 57781, 59951, 81281, 86461, 94531, 97301, 111751, 114761, 140281, 183361, 187211, 286801, 347161, 363151, 401861, 485161, 603781, 697511, 720101, 758551, 806011, 939611, 965801
Offset: 1
Keywords
Crossrefs
Cf. A175063.
Programs
-
Magma
[a: p in PrimesUpTo(500) | IsPrime(a) where a is 5*p^2+5*p+1]; // Bruno Berselli, May 19 2013
-
Mathematica
Select[Table[p=Prime[n]; 5*p^2+5*p+1, {n,85}], PrimeQ]
Comments