|
Search: id:A110873
|
|
|
| A110873 |
|
Squares of the form 8p - 7, where p is prime. |
|
+0
4
|
|
| 9, 49, 81, 225, 289, 529, 625, 1089, 1521, 1681, 2209, 3025, 5041, 6561, 7569, 7921, 9025, 10609, 12769, 14641, 16129, 16641, 18769, 20449, 22801, 23409, 28561, 31329, 36481, 37249, 39601, 40401, 46225, 49729, 50625, 69169, 70225, 73441, 78961
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
FORMULA
|
a(n) = A110872(n)^2 = 8*A055469(n) - 7.
a(n) = 8*A055469(n)-7.
|
|
MATHEMATICA
|
Select[Table[n^2, {n, 300}], PrimeQ[(# + 7)/8] &] (*Chandler*)
|
|
PROGRAM
|
(PARI) for(i=1, 1000, n=i^2+7; if(n%8==0&&isprime(n/8), print1(n-7, ", "))) (Klasen)
|
|
CROSSREFS
|
Cf. A055469, A067186, A110872.
Adjacent sequences: A110870 A110871 A110872 this_sequence A110874 A110875 A110876
Sequence in context: A137175 A028375 A032598 this_sequence A087352 A039940 A012111
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Giovanni Teofilatto (g.teofilatto(AT)tiscalinet.it), Sep 18 2005
|
|
EXTENSIONS
|
Extended by Lambert Klasen (lambert.klasen(AT)gmx.net) and Ray Chandler (rayjchandler(AT)sbcglobal.net), Oct 01 2005
|
|
|
Search completed in 0.002 seconds
|
