This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A178358 #13 Dec 30 2023 12:37:16 %S A178358 0,11,22,33,44,55,66,77,88,99,110,111,212,213,314,315,416,417,518,519, %T A178358 120,221,222,323,324,425,426,527,528,629,230,231,332,333,434,435,536, %U A178358 537,638,639,240,341,342,443,444,545,546,647,648,749,350,351,452,453 %N A178358 Rounded up arithmetic mean of digits of n prepended to n, cf. A004427. %C A178358 A000030(a(n)) = A004427(a(n)) = A004427(n); %C A178358 a(A178359(n)) = A178359(a(n)); %C A178358 subsequence of A178403. %H A178358 Reinhard Zumkeller, <a href="/A178358/b178358.txt">Table of n, a(n) for n = 0..10000</a> %F A178358 a(n) = A004427(n)*A011557(A055642(n)) + n. %e A178358 n=8379 --> A004427(n) = ceiling((8+3+7+9)/4) = 7 %e A178358 --> a(8379) = 7*10^4 + 8379 = 78379. %t A178358 Table[Ceiling[Mean[IntegerDigits[n]]]*10^IntegerLength[n]+n,{n,0,100}] (* _Harvey P. Dale_, Apr 21 2019 *) %o A178358 (Haskell) %o A178358 a178358 n = read $ show (a004427 n) ++ show n :: Integer %o A178358 -- _Reinhard Zumkeller_, Mar 17 2014 %K A178358 base,nonn,look %O A178358 0,2 %A A178358 _Reinhard Zumkeller_, May 27 2010