Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #13 Nov 20 2024 09:44:47
%S 1,2,4,7,31,51,771,1401,14841,51129,3679929,3957129,482958729,
%T 927745929,6739632009,27172044009,20949961932009,22047762636009,
%U 6424421468364009,6728534219386089,122581010799226089,2444896564058746089,1126445624341666426089
%N Partial sums of A055067 where A055067(n) is the product of non-divisors of n.
%C A055067(n) = the product of non-divisors of n.
%H Paolo Xausa, <a href="/A280713/b280713.txt">Table of n, a(n) for n = 1..400</a>
%F a(n) = Sum_{i=1..n} A055067(i).
%t Accumulate[Array[#!/Times@@Divisors[#] &, 30]]
%o (Magma) [&+[Factorial(k) / &*[d: d in Divisors(k)]: k in [1..n]]: n in [1..100]];
%Y Cf. A055067, A280714.
%K nonn
%O 1,2
%A _Jaroslav Krizek_, Jan 07 2017