login
a(n) = ceiling(A173510(n)/2).
0

%I #13 Nov 17 2019 01:44:33

%S 1,1,2,2,3,3,4,5,7,9,11,14,18,23,30,38,49,63,80,103,132,169,216,277,

%T 355,454,582,745,954,1222,1565

%N a(n) = ceiling(A173510(n)/2).

%F a(n) = A173510(n) - floor(A173510(n)/2).

%t l[0] = 2; l[1] = 1;

%t l[n_] := l[n] = l[n - 1] + l[n - 2] - Floor[l[n - 1]/2]

%t Table[l[n] - Floor[l[n]/2], {n, 0, 30}]

%Y Cf. A000032, A173497, A173510, A173508.

%K nonn

%O 0,3

%A _Roger L. Bagula_, Nov 23 2010