|
%I #11 Sep 08 2022 08:46:09
%S 2,5,17,37,37,7,65,31,40,43,145,13,197,73,107,411,325,31,401,163,569,
%T 157,577,11,718,211,889,20,901,123,1025,701,427,343,1417,235,1445,421,
%U 1745,29,1765,211,1937,305,277,601,2305,443,2572,1529,963,823,2917,323
%N Numerator of (n/tau(n) + sigma(n)/n).
%C Numerator of (n/A000005(n) + A000203(n)/n).
%C See A245785 - denominator of (n/tau(n) + sigma(n)/n).
%H Jaroslav Krizek, <a href="/A245784/b245784.txt">Table of n, a(n) for n = 1..10000</a>
%e For n = 9; a(9) = numerator(9/tau(9) + sigma(9)/9) = numerator(9/3 + 13/9) = numerator(40/9) = 40.
%o (Magma) [Numerator((n/(#[d: d in Divisors(n)]))+(SumOfDivisors(n)/n)): n in [1..1000]]
%o (PARI) for(n=1, 100, s=n/numdiv(n); t=sigma(n)/n; print1(numerator(s+t),", ")) \\ _Derek Orr_, Aug 15 2014
%Y Cf. A000005, A000203, A245785, A245786.
%K nonn,frac
%O 1,1
%A _Jaroslav Krizek_, Aug 15 2014
|
