login
A092965
Greatest prime arising as the product of numbers chosen from among the first n numbers + 1.
6
2, 3, 7, 13, 61, 241, 2521, 20161, 72577, 604801, 39916801, 59875201, 3113510401, 17435658241, 186810624001, 10461394944001, 118562476032001, 246245142528001, 24329020081766401, 304112751022080001
OFFSET
1,1
COMMENTS
There are a maximum of 2^n numbers which arise as the products of the subsets of the first n natural numbers. The actual number is smaller because of repetitions. Then a(n) = the greatest prime obtained on adding 1 to each of these numbers.
Different from A089136 (see the comments there).
LINKS
EXAMPLE
a(5) = 61 = 3*4*5 + 1. 5! + 1, 4!+ 1, are composite and 2*4*5 + 1 = 41 <61, etc.
MATHEMATICA
Do[l = Map[Times @@ #&, Subsets[Range[n]]]; Print[Max[Select[Map[ #+1&, l], PrimeQ]]], {n, 20}] (* Ryan Propper, Aug 13 2005 *)
f[n_] := Max@ Select[ Union[ Times @@@ Subsets@ Range@ n] + 1, PrimeQ]; Array[f, 20] (* Robert G. Wilson v, Nov 13 2014 *)
CROSSREFS
Sequence in context: A104372 A092969 A089136 * A051454 A051452 A058017
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Mar 26 2004
EXTENSIONS
More terms from Ryan Propper, Aug 13 2005
STATUS
approved