A033899 Sort then Add!.

17, 34, 68, 136, 272, 499, 998, 1897, 3686, 7354, 10811, 11929, 23228, 45466, 90032, 90271, 91550, 93109, 94508, 99097, 107096, 108775, 124553, 248008, 250496, 275065, 300632, 302968, 326657, 562324, 785780, 843568, 1189256, 2314945, 3549404

Offset

1,1

Links

Table of n, a(n) for n=1..35.

Mathematica

NestList[FromDigits[Sort[IntegerDigits[#]]]+#&, 17, 40] (* Harvey P. Dale, Apr 07 2018 *)

Crossrefs

Cf. A033860.

Sequence in context: A268287 A249988 A098365 * A110287 A102813 A360573

Adjacent sequences: A033896 A033897 A033898 * A033900 A033901 A033902

Keyword

nonn,base,easy

Author

N. J. A. Sloane, David W. Wilson

Status

approved