OFFSET
1,5
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
FORMULA
G.f.: (Sum_{p prime, k>=1} x^(p^k)/(1 - x^(p^k)))^2. - Ilya Gutkovskiy, Mar 15 2017
MAPLE
X:= Vector(100, numtheory:-bigomega):
seq(add(X[i]*X[n-i], i=1..n-1), n=1..100); # Robert Israel, Mar 15 2017
MATHEMATICA
Table[Sum[PrimeOmega[i] PrimeOmega[n - i], {i, 1, n - 1} ], {n, 1, 61}] (* Indranil Ghosh, Mar 16 2017 *)
PROG
(PARI) for(n=1, 61, print1(sum(i=1, n - 1, bigomega(i) * bigomega(n - i)), ", ")) \\ Indranil Ghosh, Mar 16 2017
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Reinhard Zumkeller, Oct 07 2005
STATUS
approved