login
A336848
a(n) = A003973(n) / A336846(n).
9
1, 2, 3, 13, 4, 2, 6, 10, 31, 8, 7, 13, 9, 4, 12, 121, 10, 62, 12, 52, 18, 14, 15, 2, 19, 6, 39, 26, 16, 8, 19, 182, 21, 20, 24, 403, 21, 8, 27, 40, 22, 12, 24, 7, 124, 10, 27, 121, 133, 38, 6, 13, 30, 26, 4, 20, 36, 32, 31, 52, 34, 38, 62, 1093, 36, 14, 36, 130, 9, 16, 37, 62, 40, 14, 57, 52, 42, 18, 42, 484, 781
OFFSET
1,2
COMMENTS
If there are no more 1's in this sequence after the initial one, then there are no odd terms of A001599 (Ore's Harmonic Numbers) larger than one.
FORMULA
a(n) = A003973(n) / A336846(n).
PROG
(PARI)
A003961(n) = { my(f = factor(n)); for(i=1, #f~, f[i, 1] = nextprime(f[i, 1]+1)); factorback(f); };
A336848(n) = { my(u=A003961(n), s=sigma(u)); (s/gcd(s, numdiv(n)*u)); };
KEYWORD
nonn
AUTHOR
Antti Karttunen, Aug 06 2020
STATUS
approved