1,2

Table of n, a(n) for n=1..72.

with(numtheory); f := proc(n) local d, t1, t2; t2 := 0; t1 := divisors(n); for d in t1 do t2 := t2 + sqrt(d) end do; t2 end proc; # exact value of sigma_{1/2}(n)

Sequence in context: A090104 A333822 A075795 * A341729 A087851 A332932

Adjacent sequences: A058265 A058266 A058267 * A058269 A058270 A058271

nonn

N. J. A. Sloane, Dec 08 2000

approved