%I
%S 1,1,3,6,9,12,16,20,24,28,33,38,43,48,53,58,63,69,75,81,87,93,99,105,
%T 111,117,123,129,136,143,150,157,164,171,178,185,192,199,206,213,220,
%U 227,234,241,248,255,263,271,279,287,295,303,311,319,327,335,343,351
%N Partial sums of the Lucas Inverse A130247.
%H G. C. Greubel, <a href="/A130248/b130248.txt">Table of n, a(n) for n = 1..5000</a>
%F a(n)=sum{1<=k<=n, A130247(k)}=2+(n+1)*A130247(n)A000032(A130247(n)+2) for n>=3. G.f.: g(x)=1/(1x)^2*(sum{k>=1, x^Lucas(k)}x^2).
%t Join[{1, 1}, Table[Sum[Floor[Log[GoldenRatio, k + 1/2]], {k, 1, n}], {n, 3, 50}]] (* _G. C. Greubel_, Dec 24 2017 *)
%Y Other related sequences: A000032, A130241, A130242, A130243, A130244, A130245, A130246, A130251, A130252, A130257, A130261. Fibonacci inverse see A130233  A130240, A104162.
%K nonn
%O 1,3
%A _Hieronymus Fischer_, May 19 2007
