OFFSET
0,3
FORMULA
a(abcd) = abcd+(abcd-1000a)+(abcd-1000a-100b)+(abcd-1000a-100b-10c).
n*length(n)-Sum_{k=1..length(n)} 10^k*floor(n/10^k). - Vladeta Jovovic, Jan 08 2002
EXAMPLE
a(256) = 256 + 56 + 6 = 318.
MATHEMATICA
Table[d = IntegerDigits[n]; rd = 0; While[ Length[d] > 0, rd = rd + FromDigits[d]; d = Drop[d, 1]]; rd, {n, 0, 75} ]
CROSSREFS
KEYWORD
base,nonn,easy
AUTHOR
Amarnath Murthy, Jan 05 2002
EXTENSIONS
More terms from Robert G. Wilson v, Jan 07 2002
STATUS
approved