OFFSET
1,3
EXAMPLE
a(2) = 2 because 2^5 = 32 and 3+2 = 5>= 2
MATHEMATICA
Select[Range[0, 50], Total[IntegerDigits[#^5]]>=#&] (* Harvey P. Dale, Jul 03 2021 *)
CROSSREFS
KEYWORD
base,fini,full,nonn
AUTHOR
Henry Bottomley, May 26 2000
STATUS
approved