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 A267327 #32 Jan 18 2016 16:50:37
%S A267327 1,112,2223,33334,444445,5555556,66666667,777777778,8888888889,
%T A267327 999999999910,101010101010101010101011,11111111111111111111111112,
%U A267327 1212121212121212121212121213,131313131313131313131313131314,14141414141414141414141414141415,1515151515151515151515151515151516
%N A267327 a(n) = decimal expansion of (n-1) prepended n times to the decimal expansion of n (n > 0).
%C A267327 These terms are primes: a(7), a(19), a(989), a(1187), a(4183); see A267237.
%F A267327 a(n) = (10^(n+1)*(n-1) - n + 10) / 9 (n <= 9).
%F A267327 a(n) = Sum_{i=0...n+1} (n*10^(i*(floor(log(10, n+1)) + 1))) + 1 (n <> 10^k, k > 0), i.e. doesn't give correctly the terms ending with 0.
%e A267327 a(3) = 2223 ('3-1' prepended 3 times to '3').
%t A267327 Table[ FromDigits[ StringJoin@@ ToString/@ PadLeft[{n}, n+1, n-1]], {n, 50}](* Or *)
%t A267327 FromDigits/@ Table[ Nest[ ToString[n] <> #&, ToString[n+1], n+1], {n, 0, 50}]
%Y A267327 Cf. A000461, A158849, A158859, A267237.
%K A267327 nonn,easy,base
%O A267327 1,2
%A A267327 _Mikk Heidemaa_, Jan 13 2016