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,3

Links

Table of n, a(n) for n=0..25.

Example

a(2) = 2 because 2^4 = 16 and 1+6 = 7>= 2

Mathematica

Select[Range[0, 50], Total[IntegerDigits[#^4]]>=#&] (* Harvey P. Dale, Jan 20 2020 *)

Crossrefs

Cf. A055565, A055575, A055568, A055569, A055571, A055572.

Sequence in context: A243079 A167619 A020664 * A083114 A129350 A368365

Adjacent sequences: A055567 A055568 A055569 * A055571 A055572 A055573

Keyword

base,fini,full,nonn

Author

Henry Bottomley, May 26 2000

Extensions

Definition clarified by Harvey P. Dale, Jan 20 2020

Status

approved