cp's OEIS Frontend

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.

A120682 Difference between legs of primitive Pythagorean triangles sorted first on hypotenuse, then long leg.

This page as a plain text file.
%I A120682 #11 Mar 07 2020 07:00:23
%S A120682 1,7,7,17,1,23,31,17,49,23,47,7,41,71,41,7,79,31,97,73,17,119,127,89,
%T A120682 47,1,113,161,49,119,73,167,23,103,31,199,161,103,89,223,151,241,191,
%U A120682 137,71,79,217,17,137,287,233,49,287,113,119,47,281,337,23,193,217,151,97
%N A120682 Difference between legs of primitive Pythagorean triangles sorted first on hypotenuse, then long leg.
%H A120682 Ray Chandler, <a href="/A120682/b120682.txt">Table of n, a(n) for n = 1..10000</a>
%F A120682 a(n) = A046087(n) - A046086(n) = A118962(n) - A118961(n).
%t A120682 A[s_Integer] := With[{s6 = StringPadLeft[ToString[s], 6, "0"]}, Cases[ Import["https://oeis.org/A" <> s6 <> "/b" <> s6 <> ".txt", "Table"], {_, _}][[All, 2]]];
%t A120682 A046086 = A@046086;
%t A120682 A046087 = A@046087;
%t A120682 a[n_] := A046087[[n]] - A046086[[n]];
%t A120682 a /@ Range[10000]; (* _Jean-François Alcover_, Mar 07 2020 *)
%Y A120682 Cf. A120681, A058529, A046086, A046087, A118961, A118962.
%K A120682 nonn
%O A120682 1,2
%A A120682 _Lekraj Beedassy_, Jun 24 2006
%E A120682 Edited and extended by _Ray Chandler_, Apr 10 2010