|
%I #8 Mar 10 2013 16:43:48
%S 1,0,0,2,0,2,0,0,2,0,1,3,0,2,0,0,2,0,2,0,0,2,0,0,2,1,3,1,0,2,0,2,4,0,
%T 2,0,0,2,0,2,0,0,2,0,0,2,0,2,0,2,4,0,2,0,0,2,0,0,2,0,2,0,1,3,1,1,3,0,
%U 2,0,0,2,2,4,2,0,2,0,2,4,0,2,0,1,3,1
%N Inner product of the Zeckendorf binary representation of n and its reverse.
%C a(n) = sum (A189920(n,k) * A213676(n,k): k = 1..A072649(n));
%C a(A027941(n)) = n.
%H Reinhard Zumkeller, <a href="/A216176/b216176.txt">Table of n, a(n) for n = 1..10000</a>
%o (Haskell)
%o a216176 n = sum $ zipWith (*) zs $ reverse zs
%o where zs = a189920_row n
%Y Cf. A159780.
%K nonn
%O 1,4
%A _Reinhard Zumkeller_, Mar 10 2013
|
