login
This site is supported by donations to The OEIS Foundation.
Logo

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A136030 Smallest prime factor of composite Mersenne numbers. 5
23, 47, 233, 223, 13367, 431, 2351, 6361, 179951, 193707721, 228479, 439, 2687, 167, 11447, 7432339208719, 2550183799, 745988807, 3391 (list; graph; refs; listen; history; internal format)
OFFSET

1,1

MATHEMATICA

a = {}; Do[If[PrimeQ[n] && !PrimeQ[2^n - 1], w = 2^n - 1; c = FactorInteger[w]; b = c[[1]][[1]]; AppendTo[a, b]], {n, 2, 130}]; a

CROSSREFS

Cf. A049479, A016047.

Sequence in context: A065017 A140618 A042052 * A054693 A180945 A052229

Adjacent sequences:  A136027 A136028 A136029 * A136031 A136032 A136033

KEYWORD

nonn

AUTHOR

Artur Jasinski (grafix(AT)csl.pl), Dec 11 2007

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

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

Last modified February 16 01:56 EST 2012. Contains 205860 sequences.