login
A050800
Values of n^2 + 1 resulting from A050796.
0
2, 50, 65, 145, 170, 290, 325, 442, 485, 530, 730, 785, 901, 962, 1025, 1090, 1157, 1370, 1445, 1682, 1765, 1850, 1937, 2117, 2210, 2305, 2501, 2705, 2810, 3026, 3250, 3365, 3601, 3845, 3970, 4097, 4490, 4625, 4901, 5185, 5330, 5626, 5777, 5930, 6085
OFFSET
1,1
MATHEMATICA
t={2}; Do[i=c=2; x=n^2+1; While[i<n&&c!=0, If[IntegerQ[Sqrt[x-i^2]], c=0; AppendTo[t, x]]; i++], {n, 3, 78}]; t (* Jayanta Basu, Jun 01 2013 *)
CROSSREFS
Cf. A050796.
Sequence in context: A225795 A027619 A076267 * A231051 A317819 A231082
KEYWORD
nonn
AUTHOR
Patrick De Geest, Sep 15 1999
STATUS
approved