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 A319336 #8 Sep 19 2018 16:08:24
%S A319336 1,2,6,15,84,55,100,770,1680,1323,141120,8470,27720,3474900,4228224,
%T A319336 3468465,19459440,131030900,109156320,1042578108,8779605120,
%U A319336 1514663280,41736380400,175685635125,24960905112,1254125149200,4476730258000,10664476594200,73326164511600
%N A319336 Denominator of the average of the averages of all integer partitions of n.
%H A319336 Andrew Howroyd, <a href="/A319336/b319336.txt">Table of n, a(n) for n = 1..500</a>
%e A319336 The sequence of average averages begins: 1, 3/2, 11/6, 31/15, 187/84, 131/55, 247/100, 1993/770, 4463/1680, 3635/1323.
%t A319336 Table[Denominator[Mean[Mean/@IntegerPartitions[n]]],{n,20}]
%o A319336 (PARI) seq(n)={[denominator(poldegree(p)*subst(intformal(p/y)/p, y, 1)) | p <- Vec(-1+1/prod(k=1, n, 1 - x^k*y + O(x*x^n)))]} \\ _Andrew Howroyd_, Sep 19 2018
%Y A319336 Numerators are in A319335.
%Y A319336 Cf. A056239, A067538, A237984, A296150, A316313, A316314, A316440.
%K A319336 nonn,frac
%O A319336 1,2
%A A319336 _Gus Wiseman_, Sep 17 2018