OFFSET
0,2
LINKS
Gheorghe Coserea, Table of n, a(n) for n = 0..1001
Andrew Misseldine, Counting Schur Rings over Cyclic Groups, arXiv preprint arXiv:1508.03757 [math.RA], 2015.
FORMULA
G.f.: (1-x)/(-x^2 + x-1 + 2*(1-x)*sqrt(1-4*x)); equivalently, the g.f. can be rewritten as -y^2*(y^2 - y + 1)/(3*y^4 - 7*y^3 + 8*y^2 - 6*y + 1), where y=A000108(x). - Gheorghe Coserea, Sep 10 2018
MATHEMATICA
c[k_] := Binomial[2k, k]/(k+1);
om[0, _] = 1; om[1, x_] := x; om[n_, x_] := om[n, x] = x om[n-1, x] + Sum[ (c[k-1] x + 1) om[n-k, x], {k, 2, n}];
Table[om[n, 4], {n, 0, 25}] (* Jean-François Alcover, Oct 05 2018, after Gheorghe Coserea *)
PROG
(PARI)
A269750_seq(N, t='t) = {
my(a=vector(N), c(k)=binomial(2*k, k)/(k+1)); a[1]=1; a[2]=t;
for (n = 2, N-1,
a[n+1] = t*a[n] + sum(k = 2, n, (c(k-1)*t+1)*a[n+1-k]));
return(a);
};
A269750_seq(25, numdiv(6)) \\ Gheorghe Coserea, Sep 10 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Mar 23 2016
EXTENSIONS
More terms from Gheorghe Coserea, Mar 24 2016
a(0)=1 prepended by Gheorghe Coserea, Sep 10 2018
STATUS
approved