A151950 a(n) = A151949(n)/9.
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 2, 1, 0, 1, 2, 3, 4, 5, 6, 7, 3, 2, 1, 0, 1, 2, 3, 4, 5, 6, 4, 3, 2, 1, 0, 1, 2, 3, 4, 5, 5, 4, 3, 2, 1, 0, 1, 2, 3, 4, 6, 5, 4, 3, 2, 1, 0, 1, 2, 3, 7, 6, 5, 4, 3, 2, 1, 0, 1, 2, 8, 7, 6, 5, 4, 3, 2, 1, 0, 1, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0, 11, 11, 22
Offset: 0
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..10000 (terms 0..1000 from Joseph Myers)
- Index entries for the Kaprekar map
Crossrefs
Programs
-
PARI
a(n) = my(d=digits(n)); (fromdigits(vecsort(d,,4)) - fromdigits(vecsort(d)))/9; \\ Michel Marcus, Sep 25 2018
Extensions
Extended by Joseph Myers, Aug 28 2009