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 A058699 #18 Apr 06 2017 13:06:54
%S A058699 1,1,2,3,7,15,56,176,1002,5604,53174,526823,10619863,214481126,
%T A058699 9035836076,476715857290,51820051838712,7479565078510584,
%U A058699 2645418340688763701,1318520401612270233223,1774758704783877366657989,4025091510519029370421431033
%N A058699 a(n) = p(p(n)), p = partition numbers A000041.
%H A058699 Alois P. Heinz, <a href="/A058699/b058699.txt">Table of n, a(n) for n = 0..50</a>
%F A058699 a(n) = A000041(A000041(n)). - _Omar E. Pol_, Apr 25 2016
%p A058699 a:= n-> (combinat[numbpart]@@2)(n):
%p A058699 seq(a(n), n=0..22); # _Alois P. Heinz_, Apr 05 2017
%t A058699 Table[Nest[PartitionsP, n, 2], {n, 0, 20}] (* _Michael De Vlieger_, Apr 25 2016 *)
%o A058699 (PARI) a(n) = numbpart(numbpart(n)); \\ _Michel Marcus_, Apr 25 2016
%Y A058699 Cf. A000009, A000041, A284908, A284909, A284910.
%K A058699 nonn
%O A058699 0,3
%A A058699 _N. J. A. Sloane_, Dec 31 2000