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-10 of 10 results.

A121618 Nexus primes of order 7 or primes of form n^7 - (n-1)^7 = A022523(n-1).

Original entry on oeis.org

127, 14197, 543607, 1273609, 2685817, 5217031, 16344637, 141903217, 1928294551, 8258704609, 14024867221, 22815424087, 30914273881, 91154730577, 116160677851, 183510024391, 280667317267, 552932810431, 1517045588059
Offset: 1

Views

Author

Alexander Adamchuk, Aug 10 2006

Keywords

Comments

Indices n such that Nexus number of 7 order (or A022523(n-1) = n^7 - (n-1)^7) is prime are listed in A121619(n) = {2,4,7,8,9,10,12,17,26, 33,36,39,41,49,51,55,59,66,78,79,80,88,96,98,...}. a(1) = 127 is Mersenne prime A000668(4).

Crossrefs

Programs

  • Mathematica
    Select[Table[n^7 - (n-1)^7, {n,1,200}],PrimeQ]
    Select[Differences[Range[100]^7],PrimeQ] (* Harvey P. Dale, Mar 27 2025 *)
  • PARI
    select(isprime,vector(1000,n,n^7-(n-1)^7)) \\ Charles R Greathouse IV, May 15 2013

A121619 Indices n such that Nexus numbers of order 7 (A022523(n-1) = n^7 - (n-1)^7) are primes.

Original entry on oeis.org

2, 4, 7, 8, 9, 10, 12, 17, 26, 33, 36, 39, 41, 49, 51, 55, 59, 66, 78, 79, 80, 88, 96, 98, 104, 113, 118, 120, 123, 135, 136, 142, 146, 156, 157, 160, 162, 173, 176, 194, 210, 219, 220, 221, 222, 224, 232, 234, 247, 281, 291, 297, 298, 305
Offset: 1

Views

Author

Alexander Adamchuk, Aug 10 2006

Keywords

Comments

Corresponding Nexus primes of order 7 (or primes of form A022523(n-1) = n^7 - (n-1)^7) are listed in A121618[n] = {127, 14197, 543607, 1273609, 2685817, 5217031, 16344637, 141903217,...}.

Crossrefs

Programs

Extensions

More terms from Carl R. White, Feb 28 2008

A181124 Difference of two positive 5th powers.

Original entry on oeis.org

0, 31, 211, 242, 781, 992, 1023, 2101, 2882, 3093, 3124, 4651, 6752, 7533, 7744, 7775, 9031, 13682, 15783, 15961, 16564, 16775, 16806, 24992, 26281, 29643, 31744, 32525, 32736, 32767, 40951, 42242, 51273, 55924, 58025, 58806, 59017, 59048, 61051
Offset: 1

Views

Author

T. D. Noe, Oct 06 2010

Keywords

Comments

Because x^5-y^5 = (x-y)(x^4+x^3*y+x^2*y^2+x*y^3+y^4), the difference of two 5th powers is a prime number only if x=y+1, in which case all the primes are in A121616. The number 7744 is the first of an infinite number of squares in this sequence.

Crossrefs

Cf. A024352 (squares), A181123 (cubes), A147857 (4th powers), A181125-A181128 (6th to 9th powers)

Programs

  • Mathematica
    nn=10^9; p=5; Union[Reap[Do[n=i^p-j^p; If[n<=nn, Sow[n]], {i,Ceiling[(nn/p)^(1/(p-1))]}, {j,i}]][[2,1]]]

A121620 Smallest prime of the form k^p - (k-1)^p, where p = prime(n).

Original entry on oeis.org

3, 7, 31, 127, 313968931, 8191, 131071, 524287, 777809294098524691, 68629840493971, 2147483647, 114867606414015793728780533209145917205659365404867510184121, 44487435359130133495783012898708551, 1136791005963704961126617632861
Offset: 1

Views

Author

Alexander Adamchuk, Aug 10 2006

Keywords

Comments

All Mersenne primes of form 2^p-1 = {3, 7, 31, 127, 8191,...} belong to a(n). Mersenne prime A000668(n) = a(k) when prime(k) = A000043(n). Last digit is always 1 for Nexus numbers of form n^p - (n-1)^p with p = {5, 13, 17, 29, 37, 41, 53, 61, 73, 89, 97, 101,...} = A004144(n) Pythagorean primes: primes of form 4n+1.

Crossrefs

Programs

  • Mathematica
    t = {}; n = 0; While[n++; p = Prime[n]; k = 1; While[q = (k + 1)^p - k^p; ! PrimeQ[q], k++]; q < 10^100, AppendTo[t, q]]; t (* T. D. Noe, Feb 12 2013 *)
    spf[p_]:=Module[{k=2},While[CompositeQ[k^p-(k-1)^p],k++];k^p-(k-1)^p]; Table[spf[p],{p,Prime[ Range[20]]}] (* Harvey P. Dale, Apr 01 2024 *)

A121617 Numbers n such that A022521(n-1) = n^5 - (n-1)^5 is prime.

Original entry on oeis.org

2, 3, 6, 11, 17, 20, 25, 28, 31, 32, 35, 36, 42, 45, 47, 55, 58, 65, 67, 76, 79, 86, 88, 89, 100, 102, 105, 110, 111, 113, 121, 122, 145, 149, 166, 175, 179, 193, 198, 211, 218, 223, 226, 230, 240, 244, 245, 256, 262, 287, 292, 295, 297, 298, 300
Offset: 1

Views

Author

Alexander Adamchuk, Aug 10 2006

Keywords

Comments

The elements of A022521 are sometimes called Nexus number of order 5, see there.
The terms should have 1 subtracted, since indices of primes in A022521 are 1, 2, 5, 10, 16, 19, 24, 27, 30, 31, 34, 35, 41, 44, 46, .... - M. F. Hasler, Jan 27 2013
Corresponding Nexus Primes of order 5 (or primes of form (n+1)^5 - n^5 = A022521(n)) are listed in A121616 = {31, 211, 4651, 61051, 371281, 723901, 1803001, 2861461, ...}.

Crossrefs

Programs

A121091 Smallest nexus prime of the form n^p - (n-1)^p, where p is an odd prime.

Original entry on oeis.org

7, 19, 37, 61, 4651, 127, 1273609, 2685817, 271, 331, 397, 6431804812640900941, 547, 631, 5613125740675652943160572913465695837595324940170321, 371281, 919
Offset: 2

Views

Author

Alexander Adamchuk, Aug 11 2006, revised Dec 01 2006, Feb 15 2007

Keywords

Comments

a(19) = 19^1607 - 18^1607, which is too large to include. It has 2055 decimal digits. See A062585(1) = 1607.
a(20)-a(21) = {723901, 8005616640331026125580781}. a(n) is currently known for all n up to n = 96. Corresponding smallest odd primes p such that (n+1)^p - n^p is prime are listed in A125713(n) = {3,3,3,3,5,3,7,7,3,3,3,17,3,3,43,5,3,10957,5,19,127,229,3,3,3,13,3,3,149,3,5,3,23,3,5,83,3,3,37,7,3,3,37,5,3,5,58543,...}. a(n+1) = A065013(n) for n = {4, 7, 10, 12, 13, 16, 17, 19, 22, 24, 25, 27, 28, 31, ...} = A047845(n) = (n-1)/2, where n runs through odd nonprimes (A014076), for n>1.

Crossrefs

Cf. A125713 = Smallest odd prime p such that (n+1)^p - n^p is prime. Cf. A065913 = Smallest prime of form (n+1)^k - n^k. Cf. A058013 = Smallest prime p such that (n+1)^p - n^p is prime. Cf. A047845, A014076.
Cf. A062585 = numbers n such that k^n - (k-1)^n is prime, where k is 19. Cf. A000043, A057468, A059801, A059802, A062572-A062666.

Formula

a(n) = n^A125713(n) - (n-1)^A125713(n).

A221846 Number of primes of the form (x+1)^5 - x^5 less than 10^n.

Original entry on oeis.org

0, 0, 1, 2, 3, 4, 6, 12, 19, 30, 40, 66, 110, 173, 285, 463, 749, 1256, 2075, 3499, 5884, 9928, 16754, 28345, 48037, 82187, 140358, 239768, 409315, 700510, 1200863, 2061093, 3544072, 6098353, 10505051
Offset: 0

Views

Author

Vladimir Pletser, Jan 26 2013

Keywords

Comments

Number of primes less than 10^n and equal to the difference of two consecutive fifth powers (x+1)^5 - x^5 = 5x(x+1)(x^2+x+1)+1 (A121616). Values of x = A121617. Sequence of number of primes less than 10^n and of the form (x+1)^5 - x^5 have similar characteristics to similar sequences for natural primes (A006880) and cuban primes (A113478).

A221848 Partial sums of primes equal (x+1)^5 - x^5.

Original entry on oeis.org

31, 242, 4893, 65944, 437225, 1161126, 2964127, 5825588, 10154739, 15080020, 22166471, 30110772, 44945803, 64557704, 87939735, 132059086, 186723797, 273272598, 371065129, 533543630, 723425661, 990642712, 1283752673, 1590492954, 2080592455
Offset: 1

Views

Author

Vladimir Pletser, Jan 26 2013

Keywords

Comments

Partial sums of primes equal to the difference of two consecutive fifth powers (x+1)^5 - x^5 = 5x(x+1)(x^2+x+1)+1 (A121616). Values of x = A121617. Number of primes equal (x+1)^5 - x^5 < 10^(n) in A221846. Partial sums of number of primes of the form (x+1)^5 - x^5 have similar characteristics to similar sequences for natural primes (A007504) and cuban primes (A221793).

Programs

  • Mathematica
    Accumulate[Select[#[[2]]-#[[1]]&/@Partition[Range[100]^5,2,1],PrimeQ]] (* Harvey P. Dale, Mar 29 2013 *)

Extensions

More terms from Harvey P. Dale, Mar 29 2013

A221847 Number of primes of the form (x+1)^5 - x^5 having n digits.

Original entry on oeis.org

0, 0, 1, 1, 1, 1, 2, 6, 7, 11, 10, 26, 44, 63, 112, 178, 286, 507, 819, 1424, 2385, 4044, 6826, 11591, 19692, 34150, 58171, 99410, 169547, 291195, 500353, 860230, 1482979, 2554281, 4406698
Offset: 0

Views

Author

Vladimir Pletser, Jan 26 2013

Keywords

Comments

Number of primes having n digits and equal to the difference of two consecutive fifth powers (x+1)^5 - x^5 = 5x(x+1)(x^2+x+1)+1 (A121616). Values of x = A121617. Sequence of number of primes having n digits and of the form (x+1)^5 - x^5 have similar characteristics to similar sequences for natural primes (A006879) and cuban primes (A221792).

A221849 Number of primes of the form (x+1)^5 - x^5 with x <= 10^n.

Original entry on oeis.org

1, 4, 25, 149, 1101, 8489, 69978, 596022, 5179467, 45811178
Offset: 0

Views

Author

Vladimir Pletser, Jan 26 2013

Keywords

Comments

Number of primes equal to the difference of two consecutive fifth powers (x+1)^5 - x^5 = 5x(x+1)(x^2+x+1)+1 (A121616) with x <= 10^n. Values of x = A121617. Sequence of number of primes of the form (x+1)^5 - x^5 with x <= 10^n have similar characteristics to similar sequences for natural primes and cuban primes (A221794).

Programs

  • Mathematica
    fQ[n_] := PrimeQ[(n + 1)^5 - n^5]; c = k = 0; Do[ While[k < 10^n + 1, If[ fQ@ k, c++]; k++]; Print[{n, c}], {n, 9}] (* Robert G. Wilson v, Jan 31 2013 *)

Extensions

a(7) - a(9) from Robert G. Wilson v, Jan 31 2013
Showing 1-10 of 10 results.