login
A336837
Numerator of ratio A336841(n)/A000005(n).
4
0, 1, 2, 14, 3, 9, 5, 17, 44, 13, 6, 32, 8, 21, 23, 284, 9, 163, 11, 137, 37, 25, 14, 105, 30, 33, 86, 73, 15, 81, 18, 547, 44, 37, 53, 1622, 20, 45, 58, 149, 21, 129, 23, 260, 401, 57, 26, 1662, 230, 109, 65, 114, 29, 297, 63, 237, 79, 61, 30, 263, 33, 73, 213, 4010, 83, 153, 35, 383, 100, 183, 36, 1715, 39, 81
OFFSET
1,3
FORMULA
a(n) = A336841(n) / A336856(n) = A336841(n) / gcd(A000005(n), A336841(n)).
PROG
(PARI)
A003961(n) = { my(f = factor(n)); for(i=1, #f~, f[i, 1] = nextprime(f[i, 1]+1)); factorback(f); };
A336841(n) = ((numdiv(n)*A003961(n)) - sigma(A003961(n)));
A336837(n) = numerator(A336841(n)/numdiv(n));
CROSSREFS
Cf. A336839 (denominators).
Sequence in context: A227628 A298800 A138907 * A276189 A281944 A306724
KEYWORD
nonn,frac
AUTHOR
Antti Karttunen, Aug 07 2020
STATUS
approved