Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%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