login
a(n) = A106184(n) / A001316(n).
1

%I #7 Feb 25 2016 03:24:16

%S 1,1,5,7,59,95,377,655,10163,18459,71099,132641,1021455,1937515,

%T 7477505,14335423,443971523,857241875,3328921191,6459762413,

%U 50311588373,97986366561,382518036575,747066030569,11690129046071,22881444619663,89673873841559,175837008468485

%N a(n) = A106184(n) / A001316(n).

%F a(n) = 2^(2*n-A000120(n))*hypergeometric([-n,1/2],[1],1)*hypergeometric([1/2,-n/2,-n/2+1/2],[-n/2+3/4,-n/2+1/4],1/2).

%p H := n -> hypergeom([1/2,-n/2,-n/2+1/2],[-n/2+3/4,-n/2+1/4],1/2):

%p A000984 := n -> 4^n*hypergeom([-n,1/2],[1],1):

%p A001316 := n -> 2^(add(i, i = convert(n, base, 2))):

%p a := n -> H(n)*A000984(n)/A001316(n): seq(simplify(a(n)),n=0..27);

%Y Cf. A000120, A000984, A001316, A106184.

%K nonn

%O 0,3

%A _Peter Luschny_, Feb 24 2016