A165052 a(n) = A165051(n)/5.

0, 0, 0, 0, 0, 0, 1, 0, 1, 2, 3, 4, 2, 1, 0, 1, 2, 3, 3, 2, 1, 0, 1, 2, 4, 3, 2, 1, 0, 1, 5, 4, 3, 2, 1, 0, 7, 7, 14, 21, 28, 35, 7, 0, 7, 14, 21, 28, 14, 7, 7, 14, 21, 28, 21, 14, 14, 14, 21, 28, 28, 21, 21, 21, 21, 28, 35, 28, 28, 28, 28, 28, 14, 14, 14, 21, 28, 35, 14, 7, 7, 14, 21, 28, 14

Offset

0,10

Links

Joseph Myers, Table of n, a(n) for n=0..1296

Index entries for the Kaprekar map

Mathematica

A165052[n_] := (FromDigits[ReverseSort[#], 6] - FromDigits[Sort[#], 6] & [IntegerDigits[n, 6]])/5;
Array[A165052, 100, 0] (* Paolo Xausa, Jan 24 2026 *)

Crossrefs

Cf. A165051.

In other bases: A164884 (base 2), A164994 (base 3), A165013 (base 4), A165033 (base 5), A165072 (base 7), A165091 (base 8), A165111 (base 9), A151950 (base 10).

Sequence in context: A037892 A037900 A037838 * A107474 A114734 A299755

Adjacent sequences: A165049 A165050 A165051 * A165053 A165054 A165055

Keyword

base,nonn

Author

Joseph Myers, Sep 04 2009

Status

approved