proposed
approved
proposed
approved
editing
proposed
ogf:= (1-(10*x + sqrt((1-10*x)*(1-14*x)))/(2*x): initreq:= [1, 1, 12, 145, 1764, 21602]:FindRE(ogf, x, u(n));
init:= [1, 1, 12, 145]: iseq:= seq(u(i-1)=init[i], i=1..nops(init)): req:= FindRE(ogf, x, u(n));
Definiton corrected by Peter Luschny, Nov 05 2022
proposed
editing
editing
proposed
# Alternative, using function FindSeq from A174403:
ogf := -(10*x + sqrt((1-10*x)*(1-14*x)))/(2*x):
a := FindSeq(ogf): seq(a(n), n=0..17); # Peter Luschny, Nov 04 2022
Expansion of (1 - (10*x + sqrt((1-10*x)*(1-14*x)))/(2*x).
proposed
editing
editing
proposed
Expansion of (1 - 10*x + sqrt((1-10*x)*(1-14*x)))/(2*x).
The g.f. A(x) satisfies the continued fraction relation A(x) = 1/(1-x/(1-10*x-x*A(x))).
a(n) = sqrt(5/7) * 10^n * (6*hypergeom([1/2, n+1],[1],2/7)-7*hypergeom([1/2, n],[1],2/7)) / (n+1) for n > 0. [_- _Mark van Hoeij_, Jul 02 2010]
proposed
editing
editing
proposed