%I #9 Apr 14 2021 20:04:26
%S 2,3,35,35,1001,1001,46189,46189,1062347,30808063,86822723,3212440751,
%T 10131543907,435656388001,20475850236047,1085220062510491,
%U 3766351981654057,229747470880897477,810162134158954261
%N Least product of successive primes beginning from just greater than n which is > n!.
%H Robert Israel, <a href="/A092981/b092981.txt">Table of n, a(n) for n = 1..449</a>
%e a(1) = 2 because the first prime >1 is 2 and 2 is > 1!
%e a(2) = 3 because the first prime >2 is 3 and 3 is > 2!
%e a(3) = 5*7 because first prime >3 is 5 and 5<3! but 5*7 >3!
%e a(7) = 46189 = 11*13*17*19 > 7!=5040 > 11*13*17= 2431.
%p f:= proc(n) local t,p,P;
%p t:= n!;
%p P:= 1; p:= n;
%p do
%p p:= nextprime(p);
%p P:= P*p;
%p if P > t then return P fi
%p od
%p end proc:
%p map(f, [$1..25]); # _Robert Israel_, Apr 14 2021
%Y Cf. A092982.
%K nonn
%O 1,1
%A _Amarnath Murthy_, Mar 28 2004
%E Corrected and extended by Mark Hudson (mrmarkhudson(AT)hotmail.com), Jul 23 2004
%E More terms from _David Wasserman_, Aug 21 2006