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

A082101 Primes of form 2^k + 3^k.

Original entry on oeis.org

2, 5, 13, 97
Offset: 1

Views

Author

Labos Elemer, Apr 14 2003

Keywords

Comments

Next term, if it exists, is > 10^125074. - David Wasserman, Aug 13 2004
Since x+y is a factor of x^m+y^m if m is odd, 2^m+3^m is divisible by 2+3=5 unless m is zero or a power of 2. This is similar to Fermat numbers 1+2^m. - Michael Somos, Aug 27 2004
Checked k being powers of two through 2^21. Thus a(5) > 10^2000000. Primes of this magnitude are rare (about 1 in 4.6 million), so chance of finding one is remote with today's computer algorithms and speeds. - Robert Price, Apr 25 2013
If a(5) exists it is greater than 10^16000000. Probably complete. - Charles R Greathouse IV, Apr 29 2013

Examples

			m=0: 1+1, m=1: 2+3, m=2: 4+9, m=4: 16+81.
		

Crossrefs

Programs

A294132 Sorted list of prime factors of numbers of the form 3^(2^m) + 2^(2^m) with m >= 0.

Original entry on oeis.org

5, 13, 17, 97, 257, 401, 769, 1153, 3041, 14177, 65537, 286721, 1810433, 2752513, 4043777, 7340033, 13631489, 23068673, 72222721, 319291393, 348061697, 625483777, 3937533953, 54498164737, 106216554497, 121899667073, 151597350913, 342456532993
Offset: 1

Views

Author

Arkadiusz Wesolowski, Oct 23 2017

Keywords

Comments

Primes p such that the multiplicative order of 3/2 (mod p) is a power of 2.

Examples

			The first 5 such numbers are 5, 13, 97, 6817, 43112257, 1853024483819137. Their prime factorizations are (5), (13), (97), (17) (401), (14177) (3041), (1153) (1607133116929). - _N. J. A. Sloane_, Oct 29 2017
		

Crossrefs

Programs

  • PARI
    print1(5, ", "); forprime(p=13, 342456532993, z=znorder(Mod(3/2, p)); if(2^ispower(z)==z, print1(p, ", ")));

A094316 Primes p for which 2^j+p^j is also prime for j in {0,2,8,512}.

Original entry on oeis.org

13, 4133, 1831343, 2320583, 3828673, 9173893, 23658377, 24037537, 42489677, 56253203, 78222863, 96325093, 99846337, 110453773, 110468653, 117748427, 122173187, 130937467, 138072163, 146981537, 174978913, 184050553, 186927817
Offset: 1

Views

Author

Labos Elemer, Jun 02 2004

Keywords

Examples

			Smallest such prime is 13 and the relevant four primes are
2, 173, 815730977 and a 571-digit prime.
		

Crossrefs

Programs

  • Mathematica
    {ta=Table[0, {100}], u=1}; {exponents, {a, b, c, d}={0, 2, 8, 512}} Do[s0=Prime[j]^a+2^a;s1=Prime[j]^b+2^b;s2=Prime[j]^c+2^c;s3=Prime[j]^d+2^d; If[PrimeQ[s0]&&PrimeQ[s1]&&PrimeQ[s2]&&PrimeQ[s3], Print[{j, Prime[j]}];ta[[u]]=Prime[j];u=u+1], {j, 1, 1000000}] ta

Extensions

a(6)-a(23) from Donovan Johnson, Oct 12 2008
Showing 1-3 of 3 results.