cp's OEIS Frontend

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.

A052824 A simple grammar: cycles of pairs of cycles.

This page as a plain text file.
%I A052824 #17 Apr 18 2017 07:04:09
%S A052824 0,0,2,6,34,220,1808,17388,194724,2478096,35418192,561533280,
%T A052824 9785418432,185921027136,3825633439392,84756646285920,
%U A052824 2011657535668128,50924796197369088,1369659967551038976,39003791158314816768,1172394903935534452992,37094744191300029964800
%N A052824 A simple grammar: cycles of pairs of cycles.
%H A052824 INRIA Algorithms Project, <a href="http://ecs.inria.fr/services/structure?nbr=789">Encyclopedia of Combinatorial Structures 789</a>
%F A052824 E.g.f.: log(-1/(-1+log(-1/(-1+x))^2)).
%F A052824 E.g.f.: -log(1-(log(1-x))^2). - _Vaclav Kotesovec_, Oct 01 2013
%F A052824 a(n) ~ (n-1)! * (exp(1)/(exp(1)-1))^n. - _Vaclav Kotesovec_, Oct 01 2013
%p A052824 spec := [S,{B=Cycle(Z),C=Prod(B,B),S=Cycle(C)},labeled]: seq(combstruct[count](spec,size=n), n=0..20);
%t A052824 CoefficientList[Series[-Log[1-(Log[1-x])^2], {x, 0, 20}], x]* Range[0, 20]! (* _Vaclav Kotesovec_, Oct 01 2013 *)
%Y A052824 Cf. A185393.
%K A052824 easy,nonn
%O A052824 0,3
%A A052824 encyclopedia(AT)pommard.inria.fr, Jan 25 2000
%E A052824 More terms from _Alois P. Heinz_, Mar 16 2016