A104588 Product of primes less than or equal to sqrt(n).
1, 1, 1, 2, 2, 2, 2, 2, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210, 210
Offset: 1
Keywords
Programs
-
Maple
A104588 := proc(n) A034386(A000196(n)) ; end proc: # R. J. Mathar, Jul 28 2013
-
PARI
a(n) = {pr = 1; forprime (p=2, sqrtint(n), pr *= p;); return (pr);} \\ Michel Marcus, Jul 28 2013