%I #9 Mar 11 2015 11:01:52
%S 1,1,1,2,3,5,7,11,16,24,36,54,80,121,181,271,407,610,915,1372,2058,
%T 3088,4631,6947,10420,15630,23446,35169,52753,79129,118693,178039,
%U 267059,400589,600883,901324,1351986,2027979,3041968
%N a(n) = A061419(n) - A002379(n).
%C lim (a(n) * (2/3)^n) = 2/3 * A083286 - 1.
%o (PARI) p=1; for(n=2, 100, p=p+ceil(p/2); print1(p-floor((3/2)^n)", "))
%K nonn,easy
%O 5,4
%A _Ralf Stephan_, Jun 01 2003
|