A110922 Squares of the form 3p + q + 3, where p and q are primes.

16, 25, 49, 121, 169, 225, 289, 361, 529, 625, 729, 841, 961, 1225, 1369, 1681, 1849, 2025, 2209, 2401, 2809, 3025, 3481, 3721, 3969, 4225, 4489, 5041, 5329, 5625, 5929, 6241, 6889, 7225, 7569, 7921, 8281, 9025, 9409, 10201, 10609, 11025, 11449, 11881

Offset

1,1

Links

Table of n, a(n) for n=1..44.

Mathematica

With[{nn=50}, Take[Union[Select[3#[[1]]+#[[2]]+3&/@Tuples[Prime[ Range[ 20nn]], {2}], IntegerQ[Sqrt[#]]&]], 50]] (* Harvey P. Dale, Jan 02 2015 *)

Crossrefs

Sequence in context: A192689 A002644 A118489 * A065408 A112392 A109685

Adjacent sequences: A110919 A110920 A110921 * A110923 A110924 A110925

Keyword

nonn

Author

Giovanni Teofilatto, Sep 23 2005

Extensions

Corrected and extended by Ray Chandler, Oct 08 2005

Status

approved