OFFSET
1,1
COMMENTS
Primes p such that 3*p + 10 is a square.
MAPLE
a(1) = 2 because 2*3 + 10 = 16, which is a square.
a(1) = 2 because 3*(3 + 2)/3 - 3 = 2 is prime.
MATHEMATICA
Select[Table[(k (k + 2))/3 - 3, {k, 2, 450}], PrimeQ]
PROG
(Magma) [a: k in [2..250] | IsPrime(a) where a is k*(k+2) div 3 - 3 ]; /* or */ [p: p in PrimesUpTo(60000) | IsSquare(3*p+10)];
(PARI) forprime(p=2, 1e5, if(issquare(3*p+10), print1(p , ", "))) \\ Altug Alkan, Dec 05 2015
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Dec 05 2015
STATUS
approved