%I A135792
%S A135792 41,122,316,1121,1312,1900,2868,2876,3904,4282,6121,9963,10112,11516,
%T A135792 17684,19841,20122,23028,23807,25525,29646,31996,35872,41984,44403,
%U A135792 49001,59162,60800,65900,71996,76453,76788,80404,91776,92032
%N A135792 Positive numbers of the form x^5-10x^3*y^2+5x*y^4 (where x,y are integers 
               and y>x).
%t A135792 a = {}; Do[Do[w = x^5 - 10x^3 y^2 + 5x y^4; If[w > 0 && w < 100000, AppendTo[a, 
               w]], {y, x, 1000}], {x, 1, 1000}]; Union[a]
%Y A135792 Cf. A000404, A050803, A057102, A135784, A060803, A135786, A135787, A135789, 
               A135790, A135791, A135793.
%Y A135792 Sequence in context: A044292 A044673 A135793 this_sequence A067896 A142290 
               A013643
%Y A135792 Adjacent sequences: A135789 A135790 A135791 this_sequence A135793 A135794 
               A135795
%K A135792 nonn
%O A135792 1,1
%A A135792 Artur Jasinski (grafix(AT)csl.pl), Nov 29 2007