A050799 - OEIS

%I #8 Oct 17 2019 22:40:45

%S 8,80,288,360,1088,1224,2600,5328,6560,9800,11024,16640,21024,21608,

%T 25920,26568,32040,38024,40400,54288,59048,74528,83520,84680,88208,

%U 114920,130320,149768,154448,203400,216224,218088,233288,239120,263168

%N Values of n^2 - 1 resulting from A050795.

%t 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 *)

%Y Cf. A050795.

%K nonn

%O 0,1

%A _Patrick De Geest_, Sep 15 1999