OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
FORMULA
MATHEMATICA
g[p_, e_] := e+3; a[1] = 1; a[n_] := Times @@ g @@@ FactorInteger[n]; Array[a, 100]
PROG
(PARI) for(n=1, 100, print1(direuler(p=2, n, (1+2*X-2*X^2)/(1-X)^2)[n], ", "))
CROSSREFS
KEYWORD
nonn,easy,mult
AUTHOR
Vaclav Kotesovec, Feb 28 2023
STATUS
approved