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

A252656 Numbers n such that 3^n - n is a semiprime.

Original entry on oeis.org

4, 6, 10, 25, 28, 32, 98, 124, 146, 164, 182, 190, 200, 220, 226, 230, 248, 280, 362, 376, 418, 446, 518, 544
Offset: 1

Views

Author

Vincenzo Librandi, Dec 20 2014

Keywords

Comments

Are there odd members of the sequence other than 25? There are no others < 10000. An odd number m is in the sequence iff (3^m - m)/2 is prime. - Robert Israel, Jan 02 2015
No more odd terms after a(4) = 25 for m < 200000. a(25) >= 626. - Hugo Pfoertner, Aug 07 2019

Examples

			4 is in this sequence because 3^4 - 4 = 7*11 is semiprime.
10 is in this sequence because 3^10 - 10 = 43*1373 and these two factors are prime.

Links

Crossrefs

Cf. numbers m such that k^m - m is a semiprime: A165767 (k = 2), this sequence (k = 3), A252657 (k = 4), A252658 (k = 5), A252659 (k = 6), A252660 (k = 7), A252661 (k = 8), A252662 (k = 9), A252663 (k = 10).
Cf. A001358 (semiprimes), A058037, A252788.

Programs

  • Magma
    IsSemiprime:=func; [m: m in [2..150] | IsSemiprime(s) where s is 3^m-m];
  • Maple
    select(n -> numtheory:-bigomega(3^n - n) = 2, [$1..150]); # Robert Israel, Jan 02 2015
  • Mathematica
    Select[Range[150], PrimeOmega[3^# - #] == 2 &]
  • PARI
    is(m) = bigomega(3^m-m)==2 \\ Felix Fröhlich, Dec 30 2014
  • PARI
    n=1;while(n<100,s=3^n-n;c=0;forprime(p=1,10^4,if(s%p,c++);if(s%p==0,s1=s/p;if(ispseudoprime(s1),print1(n,", ");c=0;break);if(!ispseudoprime(s1),c=0;break)));if(!c,n++);if(c,if(bigomega(s)==2,print1(n,", "));n++)) \\ Derek Orr, Jan 02 2015

Extensions

a(10) from Felix Fröhlich, Dec 30 2014
a(11)-a(14) from Charles R Greathouse IV, Jan 02 2015
a(15)-a(24) from Luke March, Aug 21 2015

A252791 Numbers m such that 6^m + m is a semiprime.

Original entry on oeis.org

2, 3, 5, 7, 11, 23, 41, 55, 73, 91, 131, 199, 221, 287
Offset: 1

Views

Author

Vincenzo Librandi, Dec 25 2014

Keywords

Comments

From Kevin P. Thompson, May 01 2022: (Start)
a(15) >= 335.
391, 443, 607, 683, 737, and 745 are also terms in this sequence. (End)

Examples

			2 is in this sequence because 6^2+2 = 2*19 is semiprime.
7 is in this sequence because 6^7+7 = 271*1033 and these two factors are prime.

Links

Crossrefs

Cf. similar sequences listed in A252788.
Cf. A252659.

Programs

  • Magma
    IsSemiprime:=func; [m: m in [1..90] | IsSemiprime(s) where s is 6^m+m];
  • Mathematica
    Select[Range[90], PrimeOmega[6^# + #]==2 &]

Extensions

a(10)-a(14) by Luke March, Jul 08 2015
Showing 1-2 of 2 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.