A283001 a(n) = (A004186(n) - n)/9.

0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 3, 4, 5, 6, 7, 8, 0, 0, 0, 1, 2, 3, 4, 5, 6, 7, 0, 0, 0, 0, 1, 2, 3, 4, 5, 6, 0, 0, 0, 0, 0, 1, 2, 3, 4, 5, 0, 0, 0, 0, 0, 0, 1, 2, 3, 4, 0, 0, 0, 0, 0, 0, 0, 1, 2, 3, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1

Offset

0,14

Comments

A004186(n) is the number formed when the digits of n are sorted nonincreasingly.

Is this the same as A037887 or A037851? - R. J. Mathar, Mar 06 2017

Links

David A. Corneth, Table of n, a(n) for n = 0..9999

Formula

a(10*n) = 10*a(n).

Example

a(141) = (411 - 141)/9 = 30.

Mathematica

s[n_]:= FromDigits@ Reverse@ Sort@ IntegerDigits@ n; a[n_]:=(s[n]-n)/9; Table[a[n], {n, 0, 89}] (* Indranil Ghosh, Feb 26 2017 *)

Prog

(PARI) a(n) = my(d = digits(n), v=vecsort(d, , 4)-d); sum(i=1, #v, v[i]*10^(#v-i)) / 9
(Python) def A283001(n): return (int("".join(sorted(str(n), reverse=True)))-n)/9 # Indranil Ghosh, Feb 26 2017

Crossrefs

Cf. A004186, A037887, A037851.

Sequence in context: A155919 A265540 A075011 * A037851 A037887 A207505

Adjacent sequences: A282998 A282999 A283000 * A283002 A283003 A283004

Keyword

nonn,base,easy,look

Author

David A. Corneth, Feb 26 2017

Status

approved