1,8

with(numtheory): f := proc(n) local i, j; j := n; for i in divisors(n) do j := j*(1+1/i); od; end;

Cf. A029933.

Sequence in context: A074296 A085961 A152191 this_sequence A011397 A081665 A131911

Adjacent sequences: A029931 A029932 A029933 this_sequence A029935 A029936 A029937

nonn

N. J. A. Sloane (njas(AT)research.att.com).