login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Largest prime factor of [e*2^n].
2

%I #19 Sep 08 2022 08:44:49

%S 2,5,5,7,43,43,173,347,139,107,23,293,293,293,293,293,79,79,883,883,

%T 114013,114013,114013,114013,1232573,1232573,1499,364841611,364841611,

%U 364841611,364841611,170801,170801,56812319,56812319,56812319,56812319

%N Largest prime factor of [e*2^n].

%H Sean A. Irvine, <a href="/A027438/b027438.txt">Table of n, a(n) for n = 0..360</a>

%t Table[FactorInteger[Floor[E 2^n]][[-1,1]],{n,0,40}] (* _Harvey P. Dale_, May 31 2013 *)

%o (PARI) for(n=0,22,print(factor(floor(exp(1)*2^n))))

%o (Magma) [Max(PrimeDivisors(Floor(Exp(1)*2^n))):n in [0..37]]; // _Marius A. Burtea_, Nov 05 2019

%Y Cf. A006530, A027437.

%K nonn

%O 0,1

%A _N. J. A. Sloane_, _Allan C. Wechsler_

%E More terms from _Jason Earls_, Jul 11 2001