|
|
|
|
1, 3, 21, 162, 1365, 12219, 114156, 1100649, 10871175, 109438830, 1118798079, 11583712617, 121219182504, 1280065637487, 13623341795049, 145977237305874, 1573536198376401, 17051418418204671, 185646639499541892
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1-3x+x^2-sqrt(1-14x+27x^2-14x^3+x^4))/(4x);
G.f.: 1/(1-3x/((1-x)^2-2x/(1-3x/((1-x)^2-2x/(1-3x/((1-x)^2-2x/(1-3x/(1-... (continued fraction);
a(n) = Sum_{k=0..n} (0^(n+k)+C(n+k-1,2k-1))*A103210(k) = 0^n + Sum_{k=0..n} C(n+k-1,2k-1)*A103210(k).
Conjecture: (n+1)*a(n) +7*(-2*n+1)*a(n-1) +27*(n-2)*a(n-2) +7*(-2*n+7)*a(n-3) +(n-5)*a(n-4)=0. - R. J. Mathar, Feb 10 2015
|
|
MAPLE
|
if n = 0 then
1;
else
add((0^(n+k)+binomial(n+k-1, 2*k-1))*A103210(k), k=0..n) ;
end if;
|
|
MATHEMATICA
|
CoefficientList[Series[(1 - 3*t + t^2 - Sqrt[1 - 14*t + 27*t^2 - 14*t^3 + t^4])/(4*t), {t, 0, 50}], t] (* G. C. Greubel, May 23 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|