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 A289954 #10 Jul 24 2017 02:04:12 %S A289954 10395,675675,26801775,855870015,24479795340,661680519500, %T A289954 17424049022380,455359195951660,11950227130952110,317363732767667950, %U A289954 8572733672197564870,236346930206430701350,6665648338618807806268,192596934884274256728700,5706700987506640526104700 %N A289954 Number of permutations of [n] having exactly six nontrivial cycles. %C A289954 A nontrivial cycle has size > 1. %H A289954 Alois P. Heinz, <a href="/A289954/b289954.txt">Table of n, a(n) for n = 12..450</a> %H A289954 Wikipedia, <a href="https://en.wikipedia.org/wiki/Permutation">Permutation</a> %F A289954 E.g.f.: (log(1-x)+x)^6/6!*exp(x). %t A289954 Drop[Range[0, 30]! CoefficientList[Series[(Log[1 - x] + x)^6 / 6! Exp[x], {x, 0, 30}], x], 12] (* _Vincenzo Librandi_, Jul 24 2017 *) %o A289954 (PARI) x = 'x + O('x^30); Vec(serlaplace((log(1-x)+x)^6/6!*exp(x))) \\ _Michel Marcus_, Jul 24 2017 %Y A289954 Column k=6 of A136394. %K A289954 nonn %O A289954 12,1 %A A289954 _Alois P. Heinz_, Jul 16 2017