%I A020884
%S A020884 3,5,7,8,9,11,12,13,15,16,17,19,20,20,21,23,24,25,27,28,28,29,31,32,33,
%T A020884 33,35,36,36,37,39,39,40,41,43,44,44,45,47,48,48,49,51,51,52,52,53,55,
               56,
%U A020884 57,57,59,60,60,60,61,63,64,65,65,67,68,68,69,69,71,72,73,75,75,76,76,
               77
%N A020884 Consider primitive Pythagorean triangles (A^2 + B^2 = C^2, (A, B) = 1, 
               A <= B); sequence gives values of A, sorted.
%C A020884 Union of A081874 and A081925. - Lekraj Beedassy (blekraj(AT)yahoo.com), 
               Jul 28 2006
%H A020884 Ron Knott, <a href="http://www.mcs.surrey.ac.uk/Personal/R.Knott/Pythag/
               pythag.html">Pythagorean Triples and Online Calculators</a>
%H A020884 P. Alfeld, <a href="http://www.math.utah.edu/~alfeld/teaching/ptt.html">
               Pythagorean Triples</a>
%H A020884 N. Exner, <a href="http://www.mste.uiuc.edu/activity/triples">Generating 
               Pythagorean Triples(Applet)</a>
%H A020884 W. A. Kehowski, <a href="http://glory.gc.maricopa.edu/~wkehowsk/187-Precalculus-02-03-Sp/
               pythagorean-triples.pdf">Pythagorean Triples</a>
%t A020884 lst={}; amx=99; Do[For[b=a+1, b<(a^2/2), c=(a^2+b^2)^(1/2); If[c==IntegerPart[c]&&GCD[a, 
               b, c]==1, AppendTo[lst, a]]; b=b+2], {a, 3, amx}]; lst [From Vladimir 
               Orlovsky (4vladimir(AT)gmail.com), Aug 07 2008]
%Y A020884 Cf. A020882-A020886. Different from A024352.
%Y A020884 Cf. A009004.
%Y A020884 Sequence in context: A160238 A025050 A025051 this_sequence A024352 A134407 
               A144724
%Y A020884 Adjacent sequences: A020881 A020882 A020883 this_sequence A020885 A020886 
               A020887
%K A020884 nonn,easy,nice
%O A020884 0,1
%A A020884 Clark Kimberling (ck6(AT)evansville.edu)
%E A020884 Extended and corrected by David W. Wilson (davidwwilson(AT)comcast.net)