OFFSET
1,2
COMMENTS
a(n) = A235711(2*n). - Reinhard Zumkeller, Mar 18 2014
LINKS
Bruno Berselli, Table of n, a(n) for n = 1..1000
PROG
(Magma) Ad:=func<h | h*(&+[Factorisation(h)[i][2]/Factorisation(h)[i][1]: i in [1..#Factorisation(h)]])>; [0] cat [Ad(n^2): n in [2..50]]; // Bruno Berselli, Oct 22 2013
(Haskell)
a068720 = a003415 . a000290 -- Reinhard Zumkeller, Mar 18 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Feb 26 2002
STATUS
approved