login
A346106
a(n) = A108951(A346096(n)), where A346096(n) gives the numerator of the primorial deflation of A276086(A108951(n)).
6
2, 6, 30, 36, 210, 900, 2310, 30, 210, 44100, 30030, 810000, 510510, 5336100, 85766121000000, 900, 9699690, 44100, 223092870, 1944810000, 151939915084881000000, 901800900, 6469693230, 189000, 28473963210000, 260620460100, 69300, 28473963210000, 200560490130, 4492511100000, 7420738134810, 1260, 733384949590939374729000000
OFFSET
1,1
FORMULA
a(n) = A324886(n) * A346107(n).
PROG
(PARI)
A064989(n) = {my(f); f = factor(n); if((n>1 && f[1, 1]==2), f[1, 2] = 0); for (i=1, #f~, f[i, 1] = precprime(f[i, 1]-1)); factorback(f)};
A319626(n) = (n / gcd(n, A064989(n)));
A346106(n) = A108951(A346096(n)); \\ Rest of program in A324886.
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jul 08 2021
STATUS
approved