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.

Showing 1-6 of 6 results.

A173255 Smaller member p of a twin prime pair (p, p+2) such that the sum p+(p+2) is a fifth power: 2*(p+1) = k^5 for some integer k.

Original entry on oeis.org

4076863487, 641194278911, 16260080320511, 174339220049999, 420586798122287, 388931440807883087, 1715002302605720111, 2051821692518399999, 4617724356355049999, 5873208011345484287, 58698987193722272687, 76578949263222449999, 180701862444484649999, 562030251929933709311
Offset: 1

Views

Author

Ulrich Krug (leuchtfeuer37(AT)gmx.de), Feb 14 2010

Keywords

Comments

Since k^5 = 2*(p+1) is even, k is also even.
The lesser of twin primes p (except for 3) are congruent to -1 modulo 3 (see third comment in A001359), the greater of twin primes p+2 (except for 5) are congruent to 1 modulo 3. Therefore p+1 is a multiple of 3. Since k^5 = 2*(p+1) is a multiple of 3, k is also a multiple of 3. Hence k is divisible by 2 and by 3, i.e. a multiple of 6.
The lesser of twin primes except for 3 (A001359) are congruent to 1, 7 or 9 modulo 10; this applies also to the terms of the present sequence, a subsequence of A001359.

Examples

			p = 4076863487 and p+2 form a twin prime pair, their sum 8153726976 = 96^5 is a fifth power. Hence 4076863487 is in the sequence.
p = 641194278911 and p+2 form a twin prime pair, their sum 1282388557824 = 264^5 is a fifth power. Hence 641194278911 is in the sequence.
p = 388931440807883087 and p+2 form a twin prime pair, their sum 777862881615766176 = 3786^5 is a fifth power. Hence 388931440807883087 is in the sequence.
3786 is the smallest value of k that gives a prime when divided by 6, it corresponds to a(6): 3786 = 6*631 and 631 is prime. The next value of k that gives a prime when divided by 6 is 10326 and corresponds to a(11): 10326 = 6*1721 and 1721 is prime.
If p is a term and k^5 the corresponding fifth power, then a fifth-power multiple c^5*k^5 does not necessarily correspond to a term q. The fifth power 96^5 corresponds to a(1), but q = 2^5*96^5/2-1 = 130459631615 = 5*7607*3429989 is not prime, much less is (q, q+2) a twin prime pair.
If p is a term and k^5 the corresponding fifth power, and if k^5 is the product c^5*d^5 of two fifth powers where d is even, then d^5 does not necessarily correspond to a term q. The fifth power 3786^5 = 3^5*1262^5 corresponds to a(6), but q = 1262^5/2-1 = 1600540908674415 = 3*5*577*55171*3351883 is not prime, much less is (q, q+2) a twin prime pair.
		

Crossrefs

Programs

  • Magma
    /* gives triples  */ [ : k in [2..10500 by 2] | IsPrime(p) and IsPrime(p+2) where p is (k^5 div 2)-1 ];
  • Mathematica
    Select[Range[2, 10^5, 2]^5/2 - 1, And@@PrimeQ[# + {0, 2}] &] (* Amiram Eldar, Dec 24 2019 *)

Extensions

Edited, non-specific references and keywords base, hard removed, MAGMA program added and listed terms verified by the Associate Editors of the OEIS, Feb 26 2010
More terms from Amiram Eldar, Dec 24 2019

A172494 Numbers k with (p,p+2) = ((2*k)^3/2 - 1,(2*k)^3/2 + 1) is a twin prime pair.

Original entry on oeis.org

1, 3, 87, 195, 243, 297, 408, 495, 522, 528, 573, 600, 798, 885, 903, 957, 1038, 1053, 1110, 1200, 1233, 1293, 1302, 1308, 1368, 1473, 1482, 1578, 1623, 1797, 1953, 2028, 2142, 2238, 2370, 2772, 2868, 2973, 3033, 3393, 3483, 3582, 3777, 3822, 3840, 3912
Offset: 1

Views

Author

Ulrich Krug (leuchtfeuer37(AT)gmx.de), Feb 05 2010

Keywords

Comments

a(n) is necessarily a multiple of 3 for n > 1.

Examples

			3 = (2*1)^3/2 - 1 = prime(2), 3 + 2 = 5 = (2*1)^3/2 + 1, (3,5) is the first twin prime pair => a(1) = 1.
107 = (2*3)^3/2 - 1 = prime(28), 107 + 2 = 109 = (2*3)^3/2 + 1, (107,109) is the 10th twin prime pair => a(2) = 3.
		

Crossrefs

Programs

  • Mathematica
    Select[Range[4000],AllTrue[(2#)^3/2+{1,-1},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jan 21 2015 *)
  • PARI
    select(n -> isprime((2*n)^3/2-1) && isprime((2*n)^3/2+1), [1..4000]) \\ Satish Bysany, Mar 03 2017

Formula

2*a(n) = (2*A172271(n) + 2)^(1/3). - R. J. Mathar, Aug 21 2014

A174370 Lesser member p of a twin prime pair (p, p + 2) such that 2p + 3(p + 2) is a perfect square.

Original entry on oeis.org

71, 191, 6551, 9767, 18119, 21647, 27527, 35447, 46271, 79631, 103391, 103967, 121367, 127679, 161639, 207671, 241559, 254927, 264959, 273311, 380327, 421079, 450599, 479879, 592367, 700127, 745751, 949607, 986567, 1011599, 1013399
Offset: 1

Views

Author

Ulrich Krug (leuchtfeuer37(AT)gmx.de), Mar 17 2010

Keywords

Comments

2p + 3(p + 2) = 5p + 6.
There are two parametric solutions for natural numbers:
(a) p = 5t^2 + 2t - 1, k = 5t + 1, necessarily for a prime p: t = 2s => p = 20s^2 + 4s - 1, k = 10s + 1.
If s = 3k + 2 => p of (a) is not prime but a multiple of 3.
If the least significant digit of k is 1, solution of (a) for s = (k - 1)/10).
(b) p = 5t^2 + 8t + 2, k = 5t + 4, necessarily for a prime p: t = 2s - 1 => p = 20s^2 - 4s - 1, N = 10s-1.
If s = 3k + 1 => p of (b) is not prime but a multiple of 3.
If the least significant digit of k is 9, solution of (b) for s = (k + 1)/10).

Examples

			71 and 73 are twin primes, 2 * 71 + 3 * 73 = 19^2.
191 and 193 are twin primes, 2 * 191 + 3 * 193 = 31^2.
		

References

  • Leonard E. Dickson, History of the Theory of numbers, vol. 2: Diophantine Analysis, Dover Publications 2005.
  • Richard K. Guy, Unsolved Problems in Number Theory, New York, Springer-Verlag, 1994.
  • Edmund Landau, Handbuch der Lehre von der Verteilung der Primzahlen, Band I, B. G. Teubner, Leipzig u. Berlin, 1909.

Crossrefs

Programs

  • Mathematica
    Select[Prime[Range[10^5]], PrimeQ[# + 2] && IntegerQ[Sqrt[2# + 3(# + 2)]] &] (* Alonso del Arte, Dec 05 2011 *)
    Select[(Range[2251]^2 - 6)/5, And @@ PrimeQ[# + {0, 2}] &] (* Amiram Eldar, Dec 24 2019 *)
    Select[Partition[Prime[Range[80000]],2,1],#[[2]]-#[[1]]==2&&IntegerQ[Sqrt[ 2#[[1]]+ 3#[[2]]]]&][[All,1]] (* Harvey P. Dale, May 12 2022 *)
  • PARI
    forstep(n=1,1e4,[10,8,10,2],if(isprime(p=n^2\5-1)&&isprime(p+2),print1(p", "))) \\ Charles R Greathouse IV, Dec 05 2011

A173560 Numbers m such that (6*m)^5 is a sum of a twin prime pair.

Original entry on oeis.org

16, 44, 84, 135, 161, 631, 849, 880, 1035, 1086, 1721, 1815, 2155, 2704, 2871, 2975, 3011, 3159, 3220, 3365, 3390, 3669, 3996, 4075, 4704, 4761, 5025, 5090, 5299, 5585, 5640, 5970, 6314, 6606, 7035, 7785, 8104, 8129, 8610, 9116, 9665, 9966, 10249
Offset: 1

Views

Author

Ulrich Krug (leuchtfeuer37(AT)gmx.de), Feb 21 2010

Keywords

Comments

The twin prime pairs are characterized in A173255.
No such m has least significant digit (LSD) e = 2 or 7 because a = (6 * e)^5/2 - 1, representing the smaller of the twin primes, would get LSD 5.
No such m has LSD e = 3 or 8, because a+2 = (6 * e)^5/2 + 1, representing the larger prime, would get LSD 5.
The primes in this sequence here are a(6) = 631 = prime(115), a(11) = 1721 = prime(268),
a(17) = 3011 = prime(432), a(49) = 10859 = prime(1320), ...

Examples

			p = (6 * 16)^5/2 - 1 = 4076863487 = A000040(193435931); p+2 = A000040(193435932), so a(1) = 16.
p = (6 * 44)^5/2 - 1 = 641194278911 = A000040(24524572848); p+2 = A000040(24524572849), so a(2) = 44.
p = (6 * 84)^5/2 - 1 = 16260080320511 = A000040(553382827197); p+2 = A000040(553382827198), so a(3) = 84.
		

Crossrefs

Programs

  • Mathematica
    Select[Range[700],AllTrue[((6*#)^5-2)/2+{0,2},PrimeQ]&] (* Harvey P. Dale, Dec 21 2024 *)
  • PARI
    isok(m) = {my(k = (6*m)^5/2); isprime(k-1) && isprime(k+1);} \\ Amiram Eldar, Jul 19 2025

A174003 Primes q with q^3 = 2+3*p for a prime p.

Original entry on oeis.org

2, 5, 11, 17, 41, 47, 89, 101, 107, 239, 311, 347, 431, 479, 521, 641, 701, 719, 761, 839, 881, 941, 947, 1031, 1049, 1301, 1319, 1361, 1499, 1559, 1571, 1667, 1721, 1871, 1931, 2459, 2621, 2687, 2777, 2837, 2861, 2879, 2939, 3347, 3389, 3467, 3539, 3617, 3671, 3917
Offset: 1

Views

Author

Eva-Maria Zschorn (e-m.zschorn(AT)zaschendorf.km3.de), Mar 05 2010

Keywords

Comments

q^3 = prime(1) + prime(2) * p.
A subsequence of A003627.

Examples

			2^3 = 2 + 3 * 2, 2 = prime(1) gives q(1) = 2 = prime(1).
5^3 = 2 + 3 * 41, 41 = prime(13) gives q(2) = 5 = prime(3).
11^3 = 2 + 3 * 443, 443 = prime(86) gives q(3) = 11 = prime(5).
		

References

  • Wolfgang M. Schmidt, Diophantine approximations and Diophantine equations. Lecture Notes in Mathematics, Springer-Verlag, 2000

Crossrefs

Programs

  • Mathematica
    Select[Prime[Range[600]],PrimeQ[(#^3-2)/3]&] (* Harvey P. Dale, Jul 22 2015 *)

Extensions

Typo in a(11) corrected, keyword:base removed - R. J. Mathar, Mar 18 2010

A178033 Lesser of a twin prime pair (p,p+2) such that permuting the digits of p and those of p+2 gives a different twin prime pair (q, q+2).

Original entry on oeis.org

281, 461, 641, 821, 1031, 1091, 1229, 1277, 1301, 1319, 1427, 1697, 1721, 1787, 1877, 2081, 2129, 2381, 2687, 2711, 2801, 3119, 3251, 3257, 3371, 3467, 3527, 3581, 3821, 3851, 4091, 4127, 4157, 4217, 4241, 4271, 4421, 4517, 4637, 4649, 4721, 4787, 4931, 4967, 5231, 5417, 5477, 5651
Offset: 1

Views

Author

Ulrich Krug (leuchtfeuer37(AT)gmx.de), May 17 2010

Keywords

Comments

Permutations with initial zeros are disallowed, so that 101 is not a member (101,103 and 11,13); equivalently, we require that p is a permutation of the digits of q as well.

Examples

			281 is a term as 281 is the lesser of the twin prime pair 281,283, and after permuting 821, 823 is also a twin prime pair.
1229 is a term as (1229,1231) is a twin prime pair and after permuting (2129, 2131) is also a twin prime pair.
		

Crossrefs

Programs

  • Mathematica
    perm@n_ :=
     Select[FromDigits@# & /@
       DeleteCases[Rest@Permutations@IntegerDigits@n, _?(First@# == 0 &)],
       PrimeQ];
    Cases[{#, perm@# & /@ #} & /@
      Cases[6*# + {-1, 1} & /@
        Range@2000, {?PrimeQ ..}], {{x, }, {{__, a_, _}, {_, b_, _}} /; b - a == 2} :> x] (* Hans Rudolf Widmer, Oct 04 2024 *)

Extensions

Corrected and edited by D. S. McNeil, Nov 23 2010
More terms from Hans Rudolf Widmer, Oct 04 2024
Showing 1-6 of 6 results.