OFFSET
1,1
MATHEMATICA
Accumulate[PerfectNumber[Range[10]]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 17 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), Mar 18 2004
EXTENSIONS
More terms from R. J. Mathar, Jan 21 2009
STATUS
approved