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 A152500 #9 Jul 19 2020 07:21:50 %S A152500 0,1,231,21490,1476084,90050080,5228286336,297239712256, %T A152500 16749407726592,940343619493888,52712719000338432,2953100593082269696, %U A152500 165399775808105742336,9262957817232621568000,518737995604927325405184,29049593918675470746910720,1626782962901824260072800256 %N A152500 1/4 the number of permutations of 3 indistinguishable copies of 1..n with exactly 3 local maxima. %H A152500 Andrew Howroyd, <a href="/A152500/b152500.txt">Table of n, a(n) for n = 1..200</a> %H A152500 <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (108,-3840,58752,-401664,1244160,-1433600). %F A152500 From _Colin Barker_, Jul 19 2020: (Start) %F A152500 G.f.: x^2*(1 + 123*x + 382*x^2 - 16548*x^3 - 15440*x^4) / ((1 - 4*x)^3*(1 - 20*x)^2*(1 - 56*x)). %F A152500 a(n) = 108*a(n-1) - 3840*a(n-2) + 58752*a(n-3) - 401664*a(n-4) + 1244160*a(n-5) - 1433600*a(n-6) for n>6. %F A152500 (End) %o A152500 (PARI) \\ PeaksBySig defined in A334774. %o A152500 a(n) = {PeaksBySig(vector(n,i,3), [2])[1]/4} \\ _Andrew Howroyd_, May 12 2020 %o A152500 (PARI) concat(0, Vec(x^2*(1 + 123*x + 382*x^2 - 16548*x^3 - 15440*x^4) / ((1 - 4*x)^3*(1 - 20*x)^2*(1 - 56*x)) + O(x^19))) \\ _Colin Barker_, Jul 19 2020 %Y A152500 Cf. A152499, A334774. %K A152500 nonn,easy %O A152500 1,3 %A A152500 _R. H. Hardin_, Dec 06 2008 %E A152500 Terms a(10) and beyond from _Andrew Howroyd_, May 12 2020