%I
%S 354,723,898,963,978,1394,1569,1634,1649,1938,2003,2018,2178,2193,
%T 2258,2499,2674,2739,2754,3043,3108,3123,3283,3298,3363,3714,3779,
%U 3794,3954,3969,4034,4194,4323,4338,4369,4403,4434,4449,4578,4738,4803,4818,4978
%N Sum of 4 distinct nonzero fourth powers.
%C 1^4+2^4+3^4+4^4=354, 1^4+2^4+3^4+5^4=723, .., 2^4+3^4+4^4+5^4=978,..
%H <a href="http://www.sciencedaily.com/releases/2008/03/080314145039.htm">Part of "Euler's Equation of degree four"</a>
%t lst={};Do[Do[Do[Do[AppendTo[lst,a^4+b^4+c^4+d^4],{d,c+1,11}],{c,b+1,10}],{b,a+1,9}],{a,1,8}];Sort@lst
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Apr 11 2010
