OFFSET
1,1
COMMENTS
The next term -- a(5) -- has 1592 digits. - Harvey P. Dale, Apr 04 2022
LINKS
MATHEMATICA
Module[{nn=5}, FromDigits[Flatten[IntegerDigits/@#]]&/@TakeList[ PerfectNumber[ Range[ (nn(nn+1))/2]], Range[nn]]] (* Harvey P. Dale, Apr 04 2022 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Omar E. Pol, Nov 12 2007
STATUS
approved