A020883 -id:A020883 - cp's OEIS frontend

A155171 Numbers p such that if q = p+1 then (a = q^2-p^2, b = 2pq, c = q^2 + p^2) is a primitive Pythagorean triple with s-1 and s+1 primes, where s = a+b+c.

1, 2, 7, 10, 20, 29, 44, 50, 65, 70, 76, 77, 101, 104, 107, 115, 154, 175, 197, 202, 226, 227, 247, 275, 371, 380, 412, 457, 490, 500, 574, 596, 647, 671, 682, 710, 764, 829, 926, 1052, 1085, 1102, 1127, 1186, 1204, 1205, 1225, 1256, 1280, 1324, 1325, 1331

Offset: 1

Vladimir Joseph Stephan Orlovsky, Jan 21 2009

nonn

			p=1,q=2,a=3,b=4,c=5,s=12-+1 primes.

Cf. A020882, A020886, A020884, A020883, A024364, A024406

lst={};Do[p=n;q=p+1;a=q^2-p^2;c=q^2+p^2;b=2*p*q;s=a+b+c;If[PrimeQ[s-1]&&PrimeQ[s+1],AppendTo[lst,n]],{n,8!}];lst

Definition edited by N. J. A. Sloane, Jul 19 2022

A155173 Short leg A of primitive Pythagorean triangles such that perimeter s is average of twin prime pairs, q=p+1, A=q^2-p^2, C=q^2+p^2, B=2pq, s=A+B+C; s -/+ 1 are primes.

Original entry on oeis.org

3, 5, 15, 21, 41, 59, 89, 101, 131, 141, 153, 155, 203, 209, 215, 231, 309, 351, 395, 405, 453, 455, 495, 551, 743, 761, 825, 915, 981, 1001, 1149, 1193, 1295, 1343, 1365, 1421, 1529, 1659, 1853, 2105, 2171, 2205, 2255, 2373, 2409, 2411, 2451, 2513, 2561, 2649

Offset: 1

Vladimir Joseph Stephan Orlovsky, Jan 21 2009

nonn

With p=1, then q=2,a=3,b=4,c=5, and s=12-+1 (11, 13) both primes.

Cf. A020882, A020886, A020884, A020883, A024364, A024406, A155171.

lst={};Do[p=n;q=p+1;a=q^2-p^2;c=q^2+p^2;b=2*p*q;s=a+b+c;If[PrimeQ[s-1]&&PrimeQ[s+1],AppendTo[lst,a]],{n,8!}];lst

Name edited by Zak Seidov, Mar 21 2014

A111284 Number of permutations of [n] avoiding the patterns {2143, 2341, 2413, 2431, 3142, 3241, 3412, 3421, 4123, 4213, 4231, 4321, 4132, 4312}; number of strong sorting classes based on 2143.

Original entry on oeis.org

1, 2, 6, 10, 14, 18, 22, 26, 30, 34, 38, 42, 46, 50, 54, 58, 62, 66, 70, 74, 78, 82, 86, 90, 94, 98, 102, 106, 110, 114, 118, 122, 126, 130, 134, 138, 142, 146, 150, 154, 158, 162, 166, 170, 174, 178, 182, 186, 190, 194, 198, 202, 206, 210, 214, 218, 222, 226, 230

Offset: 1

Len Smiley, Nov 01 2005

This sequence might also be called "The Non-Pythagorean integers" since no primitive Pythagorean triangle (PPT) exists containing them. Numbers of the form 4n-2 cannot be a leg or hypotenuse of PPT [a,b,c]. This excludes all even members of the present sequence. Integers 1 and zero are excluded because they form a 'degenerate triangle' with angles = 0. Compare A125667. - H. Lee Price, Feb 02 2007

Besides the first term this sequence is the denominator of Pi/8 = 1/2 - 1/6 + 1/10 - 1/14 + 1/18 - 1/22 + .... - Mohammad K. Azarian, Oct 14 2011

Mohammad K. Azarian, Problem 1218, Pi Mu Epsilon Journal, Vol. 13, No. 2, Spring 2010, p. 116. Solution published in Vol. 13, No. 3, Fall 2010, pp. 183-185.
Granino A. Korn and Theresa M. Korn, Mathematical Handbook for Scientists and Engineers, McGraw-Hill Book Company, New York (1968).

Vincenzo Librandi, Table of n, a(n) for n = 1..10000
M. Albert, R. Aldred, M. Atkinson, C Handley, D. Holton, D. McCaughan and H. van Ditmarsch, Sorting Classes, Elec. J. of Comb. 12 (2005) R31
Index entries for linear recurrences with constant coefficients, signature (2,-1).

Cf. A125667. Complement of the union of {1}, A020882, A020883 and A020884.

Cf. A016825, A161718.

Table[If[n == 1, 1, 4n - 6], {n, 60}] (* Robert G. Wilson v, Nov 04 2005 *)

a(n) = 4*n-6, n>=2.
a(n) = A016825(n-2), n>1. - R. J. Mathar, Aug 18 2008
G.f.: x(1+3x^2)/(1-x)^2. - R. J. Mathar, Nov 10 2008
a(n^2 - 2n + 3)/2 = Sum_{i=1..n} a(i). - Ivan N. Ianakiev, Apr 24 2013
a(n) = 2*a(n-1) - a(n-2), n>3. - Rick L. Shepherd, Jul 06 2017
a(n) = |A161718(n-1)| = (-1)^(n-1)*A161718(n-1), n>0. - Rick L. Shepherd, Jul 06 2017
E.g.f.: 3*(x + 2) + exp(x)*(4*x - 6). - Stefano Spezia, Feb 02 2023

A155174 Long leg B of primitive Pythagorean triangles such that perimeters are Averages of twin prime pairs, q=p+1, a=q^2-p^2, c=q^2+p^2, b=2pq, s=a+b+c, s-+1 are primes.

Original entry on oeis.org

4, 12, 112, 220, 840, 1740, 3960, 5100, 8580, 9940, 11704, 12012, 20604, 21840, 23112, 26680, 47740, 61600, 78012, 82012, 102604, 103512, 122512, 151800, 276024, 289560, 340312, 418612, 481180, 501000, 660100, 711624, 838512, 901824, 931612

Offset: 1

Vladimir Joseph Stephan Orlovsky, Jan 21 2009

nonn

p=1,q=2,a=3,b=4,c=5,s=12-+1 primes, ...

Cf. A020882, A020886, A020884, A020883, A024364, A024406, A155171, A155173

lst={};Do[p=n;q=p+1;a=q^2-p^2;c=q^2+p^2;b=2*p*q;s=a+b+c;If[PrimeQ[s-1]&&PrimeQ[s+1],AppendTo[lst,b]],{n,8!}];lst

A343894 Perimeters of integer-sided primitive triangles (a, b, c) where side a is the harmonic mean of the 2 other sides b and c, i.e., 2/a = 1/b + 1/c with b < a < c. The triples (a, b, c) are listed in increasing order of side a, and if sides a coincide, in increasing order of side b.

Original entry on oeis.org

13, 37, 47, 71, 73, 107, 121, 143, 183, 177, 181, 191, 241, 239, 249, 253, 291, 299, 347, 337, 359, 409, 421, 429, 431, 433, 491, 517, 503, 529, 563, 537, 541, 579, 587, 649, 659, 661, 671, 753, 743, 769, 759, 781, 831, 767, 789, 793, 897, 851, 923, 863, 913, 947, 1033, 933

Offset: 1

Bernard Schott, May 07 2021

nonn

The triples (a, b, c) are listed in increasing order of side a, and if sides a coincide then in increasing order of side b.
The sequence is not monotonic: a(9) = 183 > a(10) = 177.
All terms are odd.
For the corresponding primitive triples and miscellaneous properties and references, see A343891.

			a(3) = 15 + 12 + 20 = 47, because the third triple is (15, 12, 20) with relations 2/15 = 1/12 + 1/20 and 20-15 < 12 < 20+15.

Michel Marcus, Table of n, a(n) for n = 1..1000

Cf. A343891 (triples), A020883 (side a), A343892 (side b), A343893 (side c), A343895.

Cf. A020886, A020890.

for a from 4 to 200 do
for b from floor(a/2)+1 to a-1 do
c := a*b/(2*b-a);
if c=floor(c) and igcd(a,b,c)=1 and c-b

PARI

lista(nn) = {my(list = List()); for (a=4, nn, for (b = floor(a/2)+1, a-1, my(c = a*b/(2*b-a)); if ((denominator(c) == 1) && (gcd([a, b, c]) == 1) && (c-bMichel Marcus, May 10 2021

a(n) = A343891(n, 1) + A343891(n, 2) + A343891(n, 3).

a(n) = A020883(n) + A343892(n) + A343893(n).

A063011 Ordered products of the sides of primitive Pythagorean triangles.

Original entry on oeis.org

60, 780, 2040, 4200, 12180, 14760, 15540, 40260, 65520, 66780, 92820, 120120, 189840, 192720, 199980, 235620, 277680, 354960, 453960, 497640, 595140, 619020, 643500, 1021020, 1063860, 1075620, 1265880, 1484340, 1609080, 1761540

Offset: 1

Henry Bottomley, Jul 26 2001

nonn

It is an open question whether any two distinct Pythagorean triples can have the same product of their sides.

			a(1)=3*4*5=60; a(2)=5*12*13=780 (rather than 6*8*10=480, which would not be primitive).

Cf. A020882, A020883, A020884, A020885, A020886, A057096.

k=17000000;lst={};Do[Do[If[IntegerQ[a=Sqrt[c^2-b^2]]&&GCD[a,b,c]==1,If[a>=b,Break[]];x=a*b*c;If[x<=k,AppendTo[lst,x]]],{b,c-1,4,-1}],{c,5,700,1}];Union@lst (* Vladimir Joseph Stephan Orlovsky, Sep 05 2009 *)
With[{nn=50},Take[(Times@@#)Sqrt[#[[1]]^2+#[[2]]^2]&/@Union[Sort/@ ({Times@@#, (Last[#]^2-First[#]^2)/2}&/@(Select[Subsets[Range[1,nn+1,2],{2}],GCD@@#==1&]))]//Union,nn]] (* Harvey P. Dale, Jun 08 2018 *)

A155175 Hypotenuse C of primitive Pythagorean triangles such that perimeters are Averages of twin prime pairs, q=p+1, a=q^2-p^2, c=q^2+p^2, b=2pq, s=a+b+c, s-+1 are primes.

Original entry on oeis.org

5, 13, 113, 221, 841, 1741, 3961, 5101, 8581, 9941, 11705, 12013, 20605, 21841, 23113, 26681, 47741, 61601, 78013, 82013, 102605, 103513, 122513, 151801, 276025, 289561, 340313, 418613, 481181, 501001, 660101, 711625, 838513, 901825, 931613

Offset: 1

Vladimir Joseph Stephan Orlovsky, Jan 21 2009

nonn

p=1,q=2,a=3,b=4,c=5,s=12-+1 primes, ...

Cf. A020882, A020886, A020884, A020883, A024364, A024406, A155171, A155173, A155174

lst={};Do[p=n;q=p+1;a=q^2-p^2;c=q^2+p^2;b=2*p*q;s=a+b+c;If[PrimeQ[s-1]&&PrimeQ[s+1],AppendTo[lst,c]],{n,8!}];lst

A156678 Consider primitive Pythagorean triangles (A^2 + B^2 = C^2, gcd (A, B) = 1, A < BA020884(n)).

Original entry on oeis.org

4, 12, 24, 15, 40, 60, 35, 84, 112, 63, 144, 180, 21, 99, 220, 264, 143, 312, 364, 45, 195, 420, 480, 255, 56, 544, 612, 77, 323, 684, 80, 760, 399, 840, 924, 117, 483, 1012, 1104, 55, 575, 1200, 140, 1300, 165, 675, 1404, 1512, 783, 176, 1624, 1740, 91, 221, 899

Offset: 1

Ant King, Feb 15 2009

The ordered sequence of A values is A020884(n) and the ordered sequence of B values is A020883(n) (allowing repetitions) and A024354(n) (excluding repetitions)

			As the first four primitive Pythagorean triples (ordered by increasing A) are (3,4,5), (5,12,13), (7,24,25) and (8,15,17), then a(1)=4, a(2)=12, a(3)=24 and a(4)=15.

Beiler, Albert H.: Recreations In The Theory Of Numbers, Chapter XIV, The Eternal Triangle, Dover Publications Inc., New York, 1964, pp. 104-134.
Sierpinski, W.; Pythagorean Triangles, Dover Publications, Inc., Mineola, New York, 2003.

Reinhard Zumkeller, Table of n, a(n) for n = 1..1000
Ron Knott, Right-angled Triangles and Pythagoras' Theorem

A020884, A020883, A024354, A156679, A042965, A156680, A156681, A042965.

Cf. A037213.

a156678 n = a156678_list !! (n-1)
a156678_list = f 1 1 where
   f u v | v > uu `div` 2        = f (u + 1) (u + 2)
         | gcd u v > 1 || w == 0 = f u (v + 2)
         | otherwise             = v : f u (v + 2)
         where uu = u ^ 2; w = a037213 (uu + v ^ 2)
-- Reinhard Zumkeller, Nov 09 2012

PrimitivePythagoreanTriplets[n_]:=Module[{t={{3,4,5}},i=4,j=5},While[i

a(n) = A020884(n) + A156680(n).

A235598 Begin with a(0) = 3. Let a(n) for n > 0 be the smallest positive integer not yet in the sequence which forms part of a Pythagorean triple when paired with a(n-1).

Original entry on oeis.org

3, 4, 5, 12, 9, 15, 8, 6, 10, 24, 7, 25, 20, 16, 30, 18, 80, 39, 36, 27, 45, 28, 21, 29, 420, 65, 33, 44, 55, 48, 14, 50, 40, 32, 60, 11, 61, 1860, 341, 541, 146340, 15447, 20596, 25745, 32208, 2540, 1524, 635, 381, 508, 16125, 4515, 936, 75, 72, 54, 90, 56

Offset: 0

Jack Brennen, Dec 26 2013

Is the sequence infinite?  Can it "paint itself into a corner" at any point? Note that picking any starting point >= 5 seems to lead to a finite sequence ending in 5,3,4. For example, starting with 6 we get 6,8,10,24,7,25,15,9,12,5,3,4, stop (A235599).
By beginning with 3 or 4, we make sure that the 5,3,4 dead-end is never available.
If infinite, is it a permutation of the integers >= 3? This seems likely.  Proving it doesn't seem easy though.
Comment from Jim Nastos, Dec 30 2013: Your question about whether the sequence can 'paint itself into a corner' is essentially asking if the Pythagorean graph has a Hamiltonian path. As far as I know, the questions in the Cooper-Poirel paper (see link) are still unanswered. They ask whether the graph is k-colorable with a finite k, or whether it is even connected (sort of equivalent to your question of whether it is a permutation of the integers >=3).
Lars Blomberg has computed the sequence out to 3 million terms without finding a dead end.
Position of k>2: 0, 1, 2, 7, 10, 6, 4, 8, 35, 3, 67, 30, 5, 13, 89, 15, 143, 12, 22, 118, 385, 9, 11, ..., see A236243. - Robert G. Wilson v, Jan 17 2014

Robert G. Wilson v, Table of n, a(n) for n = 0..10000
J. Cooper and C. Poirel, Note on the Pythagorean Triple System

Cf. A020882, A020883, A020884, A235599, A236243, A236244.

f[s_List] := Block[{n = s[[-1]]}, sol = Solve[ x^2 + y^2 == z^2 && x > 0 && y > 0 && z > 0 && (x == n || z == n), {x, y, z}, Integers]; Append[s, Min[ Complement[ Union[ Extract[sol, Position[ sol, Integer]]], s]]]]; lst = Nest[f, {3}, 250] (* _Robert G. Wilson v, Jan 17 2014 *)

A343891 List of primitive triples (a, b, c) for integer-sided triangles where side a is the harmonic mean of the 2 other sides b and c, i.e., 2/a = 1/b + 1/c with b < a < c.

Original entry on oeis.org

4, 3, 6, 12, 10, 15, 15, 12, 20, 21, 15, 35, 24, 21, 28, 35, 30, 42, 40, 36, 45, 45, 35, 63, 55, 40, 88, 56, 44, 77, 60, 55, 66, 63, 56, 72, 72, 52, 117, 77, 63, 99, 80, 65, 104, 84, 78, 91, 91, 70, 130, 99, 90, 110, 105, 77, 165, 112, 105, 120, 117, 99, 143, 120, 85, 204, 132, 102, 187

Offset: 1

Bernard Schott, May 03 2021

The triples (a, b, c) are displayed in increasing order of side a, and if sides a coincide then in increasing order of the side b.
When sides satisfy 2/a = 1/b + 1/c, or a = 2*b*c/(b+c) then a is always the middle side with b < a < c.
Equivalent relations: the heights and sines satisfy 2*h_a = h_b + h_c and 2/sin(A) = 1/sin(B) + 1/sin(C).
Inequalities between sides: a/2 < b < a < c < b*(1+sqrt(2)).

			(4, 3, 6) is the first triple with 2/4 = 1/3 + 1/6 and 6-4 < 3 < 6+4.
The table begins:
   4,  3,  6;
  12, 10, 15;
  15, 12, 20;
  21, 15, 35;
  24, 21, 28;
  35, 30, 42;
  ...

V. Lespinard & R. Pernet, Trigonométrie, Classe de Mathématiques élémentaires, programme 1962, problème B-337 p. 179, André Desvigne.

Cf. A020883 (side a), A343892 (side b), A343893 (side c), A343894 (perimeter).

for a from 4 to 200 do
for b from floor(a/2)+1 to a-1 do
c := a*b/(2*b-a);
if c=floor(c) and igcd(a,b,c)=1 and c-b

cp's OEIS Frontend

A155171 Numbers p such that if q = p+1 then (a = q^2-p^2, b = 2*p*q, c = q^2 + p^2) is a primitive Pythagorean triple with s-1 and s+1 primes, where s = a+b+c.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

Extensions

A155173 Short leg A of primitive Pythagorean triangles such that perimeter s is average of twin prime pairs, q=p+1, A=q^2-p^2, C=q^2+p^2, B=2*p*q, s=A+B+C; s -/+ 1 are primes.

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

Extensions

A111284 Number of permutations of [n] avoiding the patterns {2143, 2341, 2413, 2431, 3142, 3241, 3412, 3421, 4123, 4213, 4231, 4321, 4132, 4312}; number of strong sorting classes based on 2143.

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Mathematica

Formula

A155174 Long leg B of primitive Pythagorean triangles such that perimeters are Averages of twin prime pairs, q=p+1, a=q^2-p^2, c=q^2+p^2, b=2*p*q, s=a+b+c, s-+1 are primes.

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A343894 Perimeters of integer-sided primitive triangles (a, b, c) where side a is the harmonic mean of the 2 other sides b and c, i.e., 2/a = 1/b + 1/c with b < a < c. The triples (a, b, c) are listed in increasing order of side a, and if sides a coincide, in increasing order of side b.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

PARI

Formula

A063011 Ordered products of the sides of primitive Pythagorean triangles.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A155175 Hypotenuse C of primitive Pythagorean triangles such that perimeters are Averages of twin prime pairs, q=p+1, a=q^2-p^2, c=q^2+p^2, b=2*p*q, s=a+b+c, s-+1 are primes.

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A156678 Consider primitive Pythagorean triangles (A^2 + B^2 = C^2, gcd (A, B) = 1, A < BA020884(n)).

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Haskell

Mathematica

Formula

A155171 Numbers p such that if q = p+1 then (a = q^2-p^2, b = 2pq, c = q^2 + p^2) is a primitive Pythagorean triple with s-1 and s+1 primes, where s = a+b+c.

A155173 Short leg A of primitive Pythagorean triangles such that perimeter s is average of twin prime pairs, q=p+1, A=q^2-p^2, C=q^2+p^2, B=2pq, s=A+B+C; s -/+ 1 are primes.

A155174 Long leg B of primitive Pythagorean triangles such that perimeters are Averages of twin prime pairs, q=p+1, a=q^2-p^2, c=q^2+p^2, b=2pq, s=a+b+c, s-+1 are primes.

A155175 Hypotenuse C of primitive Pythagorean triangles such that perimeters are Averages of twin prime pairs, q=p+1, a=q^2-p^2, c=q^2+p^2, b=2pq, s=a+b+c, s-+1 are primes.