|
Search: id:A067082
|
|
|
| A067082 |
|
If n = abc...def in decimal notation then the right digit sum function = abc...def + bc...def + c...def + ... + def + ef + f. |
|
+0
2
|
|
| 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12, 14, 16, 18, 20, 22, 24, 26, 28, 20, 22, 24, 26, 28, 30, 32, 34, 36, 38, 30, 32, 34, 36, 38, 40, 42, 44, 46, 48, 40, 42, 44, 46, 48, 50, 52, 54, 56, 58, 50, 52, 54, 56, 58, 60, 62, 64, 66, 68, 60, 62, 64, 66, 68, 70, 72, 74, 76, 78, 70, 72
(list; graph; listen)
|
|
|
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 (vladeta(AT)eunet.rs), 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
|
Cf. A067079, A067080, A065039.
Sequence in context: A096868 A067036 A119823 this_sequence A102685 A005358 A032960
Adjacent sequences: A067079 A067080 A067081 this_sequence A067083 A067084 A067085
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jan 05 2002
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 07 2002
|
|
|
Search completed in 0.002 seconds
|
