|
|
A050799
|
|
Values of n^2 - 1 resulting from A050795.
|
|
0
|
|
|
8, 80, 288, 360, 1088, 1224, 2600, 5328, 6560, 9800, 11024, 16640, 21024, 21608, 25920, 26568, 32040, 38024, 40400, 54288, 59048, 74528, 83520, 84680, 88208, 114920, 130320, 149768, 154448, 203400, 216224, 218088, 233288, 239120, 263168
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
MATHEMATICA
|
t={}; Do[i=c=1; x=n^2-1; While[i<n&&c!=0, If[IntegerQ[Sqrt[x-i^2]], c=0; AppendTo[t, x]]; i++], {n, 3, 520}]; t (* Jayanta Basu, Jun 01 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|