OFFSET
0,3
FORMULA
PROG
(PARI) a366369(n) = my(r=1); forprime(p=2, n, if(n<2*p^logint(n, p), r*=p)); r;
CROSSREFS
KEYWORD
nonn
AUTHOR
Max Alekseyev, Oct 08 2023
STATUS
approved