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 A385801 #10 Jul 09 2025 10:14:36 %S A385801 1,1,5,39,385,4438,57375,812720,12428977,203183595,3525740946, %T A385801 64607354042,1245332551755,25172891719156,532300335665640, %U A385801 11750901331656240,270347716681495537,6472208752084251545,161016802667814325743,4157582808082008519225 %N A385801 G.f. A(x) satisfies A(x) = 1/(1 - x*A(x)^3 - x^2*A(x)^2*A'(x)). %F A385801 a(0) = 1; a(n) = Sum_{i, j, k, l>=0 and i+j+k+l=n-1} (i+1) a(i) * a(j) * a(k) * a(l). %t A385801 terms = 20; A[_] = 0; Do[A[x_] = 1/(1-x*A[x]^3-x^2*A[x]^2*A'[x]) + O[x]^terms // Normal, terms]; CoefficientList[A[x], x] (* _Stefano Spezia_, Jul 09 2025 *) %Y A385801 Cf. A182304, A385806. %Y A385801 Cf. A385767. %K A385801 nonn %O A385801 0,3 %A A385801 _Seiichi Manyama_, Jul 09 2025