OFFSET
1,1
LINKS
Klaus Brockhaus, Table of n, a(n) for n=1..1000
EXAMPLE
7 is in the sequence because 2^4 - 3^2 = 7; 127 is in the sequence because 8^4 - 63^2 = 127.
MATHEMATICA
nn=60; Take[Union[Flatten[Table[n^4-m^2, {n, 0, nn}, {m, n^2-1}]]], nn] (* Harvey P. Dale, Mar 04 2013 *)
PROG
(PARI) {z=455; v=[]; n=2; while((p=n^4)-(q=n^2-1)^2<=z, m=q; while(m>0&&(a=p-m^2)<=z, v=concat(v, a); m--); n++); v=listsort(List(v), 1); for(j=1, #v, print1(v[j], ", "))} /* Klaus Brockhaus, May 31 2008 */
CROSSREFS
KEYWORD
nonn
AUTHOR
Garrett Webb (garrettwebb(AT)gmail.com), May 14 2008
EXTENSIONS
Edited and extended by Klaus Brockhaus, May 31 2008
STATUS
approved