OFFSET
1,1
COMMENTS
A186450 is a subsequence. - Altug Alkan, Oct 28 2015
LINKS
Kevin P. Thompson, Table of n, a(n) for n = 1..106 (terms 1..75 from Klaus Brockhaus, terms 76..81 from Amiram Eldar)
Florian Luca and Igor E. Shparlinsky, On the largest prime factor of n! + 2^n - 1, J. Th. des Nombres de Bordeaux 2005, Vol.17, Fasc. 3.
FORMULA
EXAMPLE
a(6) = 29 since 29 is the largest prime factor of n! + 2^n - 1 = 6! + 2^6 - 1 = 783 = 3^3 * 29.
MATHEMATICA
Table[FactorInteger[n! + 2^n - 1][[-1, 1]], {n, 20}] (* Alonso del Arte, Oct 28 2015 *)
PROG
(Magma) largestpf := func<n | f[#f, 1] where f is Factorization(n)>; [largestpf(Factorial(n)+2^n-1): n in [1..24]]; // Klaus Brockhaus, Nov 20 2009
(PARI) a(n)=my(f=factor(n!+2^n-1)[, 1]); f[#f] \\ Charles R Greathouse IV, Feb 01 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Feb 09 2007
EXTENSIONS
Definition corrected by Artur Jasinski, Apr 22 2008
STATUS
approved