A055570 Sum of digits of (a(n)^4) is greater than or equal to a(n).
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 13, 14, 15, 16, 17, 18, 21, 22, 23, 24, 25, 26, 28, 36
Offset: 0
Examples
a(2) = 2 because 2^4 = 16 and 1+6 = 7>= 2
Programs
-
Mathematica
Select[Range[0,50],Total[IntegerDigits[#^4]]>=#&] (* Harvey P. Dale, Jan 20 2020 *)
Extensions
Definition clarified by Harvey P. Dale, Jan 20 2020