OFFSET
1,3
LINKS
Stefano Spezia, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = A371004(n)^(1/4).
MATHEMATICA
Select[Range[0, 4000]^4, IntegerQ[DigitSum[#]^(1/4)]&]^(1/4)
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Stefano Spezia, Mar 09 2024
STATUS
approved