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 A134800 #8 Jul 25 2019 19:57:27 %S A134800 1,12,357,11152230,425677101135,176231297385490627, %T A134800 792100212551575195824363010,37184565560468428349101431231014883, %U A134800 179772163726015311853733844583531746326175175 %N A134800 Concatenation of next n partition numbers A000041. %H A134800 Harvey P. Dale, <a href="/A134800/b134800.txt">Table of n, a(n) for n = 1..37</a> %t A134800 FromDigits[Flatten[IntegerDigits/@#]]&/@With[{nn=10},TakeList[ PartitionsP[ Range[0,(nn(nn+1))/2]],Range[nn]]] (* Requires Mathematica version 11 or later *) (* _Harvey P. Dale_, Jul 25 2019 *) %Y A134800 Cf. A000041, A053067, A132926, A133013. See A134801 for another version. %K A134800 easy,nonn,base,less %O A134800 1,2 %A A134800 _Omar E. Pol_, Nov 12 2007 %E A134800 Edited by _Charles R Greathouse IV_, Apr 28 2010