This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A135791 #7 Apr 06 2015 10:43:48 %S A135791 404,1900,3647,5646,12928,13412,14050,27688,30609,36413,45716,51804, %T A135791 60800,74576,90050,98172 %N A135791 Positive numbers of the form x^5-10x^3*y^2+5x*y^4 (where x,y are integers and x>y). %C A135791 See A135792, union A135791 and A135792 see A135793. Squares of these numbers are of the form N^5-M^2 (where N belongs to A135787 and M to A057102) Proof uses: (x^5-10x^3 y^2+5xy^4)^2=(x^2+y^2)^5-(5x^4y-10x^2y^3+y^5)^2. [This line needs editing! - _N. J. A. Sloane_, Dec 04 2007] %C A135791 Refers to A057102, which had an incorrect description and has been replaced by A256418. As a result the present sequence should be re-checked. - _N. J. A. Sloane_, Apr 06 2015 %t A135791 a = {}; Do[Do[w = x^5 - 10x^3 y^2 + 5x y^4; If[w > 0 && w < 100000, AppendTo[a, w]], {x, y, 1000}], {y, 1, 1000}]; Union[a] %Y A135791 Cf. A000404, A050803, A057102, A135784, A060803, A135786, A135787, A135789, A135790, A135792, A135793. %K A135791 nonn %O A135791 1,1 %A A135791 _Artur Jasinski_, Nov 29 2007