A328580 a(n) is the largest primorial dividing A276086(n), where A276086 converts the primorial base expansion of n into its prime product form.
1, 2, 1, 6, 1, 6, 1, 2, 1, 30, 1, 30, 1, 2, 1, 30, 1, 30, 1, 2, 1, 30, 1, 30, 1, 2, 1, 30, 1, 30, 1, 2, 1, 6, 1, 6, 1, 2, 1, 210, 1, 210, 1, 2, 1, 210, 1, 210, 1, 2, 1, 210, 1, 210, 1, 2, 1, 210, 1, 210, 1, 2, 1, 6, 1, 6, 1, 2, 1, 210, 1, 210, 1, 2, 1, 210, 1, 210, 1, 2, 1, 210, 1, 210, 1, 2, 1, 210, 1, 210
Offset: 0
Keywords
Links
Programs
-
PARI
A328580(n) = { my(i=1, p=2, pr=1); while(n && (n%p), pr *= p; n = n\p; p = nextprime(1+p)); (pr); };