|
|
A080892
|
|
Numbers k such that 3^k-2 is a semiprime.
|
|
5
|
|
|
3, 8, 10, 12, 13, 15, 16, 19, 20, 21, 25, 28, 39, 42, 44, 48, 55, 57, 60, 66, 67, 76, 78, 85, 118, 130, 156, 162, 193, 212, 214, 217, 218, 228, 244, 312, 330, 352, 357, 376, 386, 388, 412, 442, 449, 464, 480, 525, 545, 552, 630, 644
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The next roadblock to being able to extend the sequence is 3^658 - 2, a 314-decimal digit composite with no known factors. - Ryan Propper, Feb 07 2013
|
|
LINKS
|
|
|
EXAMPLE
|
a(1) = 3 because 3^3-2 = 25 = 5*5.
a(2) = 8 because 3^8-2 = 6559 = 7*937.
a(3) = 10 because 3^10-2 = 59047 = 137*431.
|
|
MATHEMATICA
|
Do[f = 3^n - 2; If[ !PrimeQ[f], s = FactorIntegerECM[f]; If[PrimeQ[s] && PrimeQ[f/s], Print[n]]], {n, 2, 10^3}] (* Ryan Propper, May 11 2007 *)
|
|
PROG
|
(PARI) for(n=1, 200, if(bigomega(3^n-2)==2, print1(n", "))) /* Herman Jamke (hermanjamke(AT)fastmail.fm), Apr 02 2007 */
|
|
CROSSREFS
|
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Added missing a(1)=3 by Herman Jamke (hermanjamke(AT)fastmail.fm), Apr 01 2007
a(27)-a(42) from Herman Jamke (hermanjamke(AT)fastmail.fm) and Ryan Propper, Apr 01, Apr 19 2007, May 11 2007
Restored missing terms < 388 by Sean A. Irvine, Apr 06 2011 (Some correctly stated terms in Jamke's and Propper's list had been omitted during editing)
|
|
STATUS
|
approved
|
|
|
|