cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A123528 Numerator of average of prime factors of n.

This page as a plain text file.
%I A123528 #5 Oct 15 2017 01:00:22
%S A123528 2,3,2,5,5,7,2,3,7,11,7,13,9,4,2,17,8,19,3,5,13,23,9,5,15,3,11,29,10,
%T A123528 31,2,7,19,6,5,37,21,8,11,41,4,43,5,11,25,47,11,7,4,10,17,53,11,8,13,
%U A123528 11,31,59,3,61,33,13,2,9,16,67,7,13,14,71,12,73,39,13,23,9,6,79,13,3,43,83,7
%N A123528 Numerator of average of prime factors of n.
%H A123528 G. C. Greubel, <a href="/A123528/b123528.txt">Table of n, a(n) for n = 2..5000</a>
%F A123528 a(n) = sopfr(n) / bigomega(n) = A001414(n) / A001222(n).
%e A123528 12 = 2 * 2 * 3, so a(12) = (2 + 2 + 3) / 3 = 7/3.
%e A123528 Sequence of fractions starts 2/1, 3/1, 2/1, 5/1, 5/2, 7/1, 2/1, 3/1, 7/2, 11/1, 7/3.
%t A123528 f[n_] := Plus @@ Times @@@ FactorInteger@n; f[1] = 0; Numerator[ Table[ f[n]/PrimeOmega[n], {n, 2, 50}]] (* _G. C. Greubel_, Oct 14 2017 *)
%Y A123528 Cf. A123529, A067629, A001414, A001222.
%K A123528 frac,nonn
%O A123528 2,1
%A A123528 _Franklin T. Adams-Watters_, Oct 02 2006