# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a174227
Showing 1-1 of 1

%I A174227 #19 Nov 04 2022 17:09:22
%S A174227 1,1,12,145,1764,21602,266232,3301349,41178660,516512462,6513158376,
%T A174227 82542517386,1051024082472,13442267711940,172638285341040,
%U A174227 2225824753934445,28802104070304420,373966734921011990
%N A174227 Expansion of -(10*x + sqrt((1-10*x)*(1-14*x)))/(2*x).
%C A174227 Hankel transform is A077417.
%C A174227 The g.f. A(x) satisfies the continued fraction relation A(x) = 1/(1-x/(1-10*x-x*A(x))).
%F A174227 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
%F A174227 D-finite with recurrence: (n+1)*a(n) +12*(1-2*n)*a(n-1) +140*(n-2)*a(n-2)=0. - _R. J. Mathar_, Sep 30 2012
%p A174227 with(LREtools): with(FormalPowerSeries): # requires Maple 2022
%p A174227 ogf:= -(10*x + sqrt((1-10*x)*(1-14*x)))/(2*x): req:= FindRE(ogf,x,u(n));
%p A174227 init:= [1, 1, 12, 145]: iseq:= seq(u(i-1)=init[i],i=1..nops(init)):
%p A174227 rmin:= subs(n=n-2, MinimalRecurrence(req,u(n),{iseq})[1]); # Mathar's recurrence
%p A174227 a:= gfun:-rectoproc({rmin, iseq}, u(n), remember):
%p A174227 seq(a(n),n=0..17); # _Georg Fischer_, Nov 03 2022
%p A174227 # Alternative, using function FindSeq from A174403:
%p A174227 ogf := -(10*x + sqrt((1-10*x)*(1-14*x)))/(2*x):
%p A174227 a := FindSeq(ogf): seq(a(n), n=0..17); # _Peter Luschny_, Nov 04 2022
%K A174227 nonn,easy
%O A174227 0,3
%A A174227 _Paul Barry_, Mar 12 2010
%E A174227 Definiton corrected by _Peter Luschny_, Nov 05 2022

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE