[go: up one dir, main page]

login
A178359
Rounded up arithmetic mean of digits of n appended to n, cf. A004427.
5
0, 11, 22, 33, 44, 55, 66, 77, 88, 99, 101, 111, 122, 132, 143, 153, 164, 174, 185, 195, 201, 212, 222, 233, 243, 254, 264, 275, 285, 296, 302, 312, 323, 333, 344, 354, 365, 375, 386, 396, 402, 413, 423, 434, 444, 455, 465, 476, 486, 497, 503, 513, 524, 534
OFFSET
0,2
COMMENTS
A010879(a(n)) = A004427(a(n)) = A004427(n);
a(A178358(n)) = A178358(a(n));
subsequence of A178403.
LINKS
FORMULA
a(n) = A008592(n) + A004427(n).
EXAMPLE
For n=8379: A004427(n) = ceiling((8+3+7+9)/4) = 7; so a(8379) = 10*8379 + 7 = 83797.
MATHEMATICA
amd[n_]:=Module[{m=Ceiling[Mean[IntegerDigits[n]]]}, n*10^IntegerLength[ m]+ m]; Array[amd, 60, 0] (* Harvey P. Dale, Aug 12 2015 *)
CROSSREFS
Sequence in context: A083967 A343444 A193772 * A108203 A308104 A108773
KEYWORD
base,nonn
AUTHOR
Reinhard Zumkeller, May 27 2010
STATUS
approved