A173513 a(n) = ceiling(A173510(n)/2).

1, 1, 2, 2, 3, 3, 4, 5, 7, 9, 11, 14, 18, 23, 30, 38, 49, 63, 80, 103, 132, 169, 216, 277, 355, 454, 582, 745, 954, 1222, 1565

Offset

0,3

Links

Table of n, a(n) for n=0..30.

Formula

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

Mathematica

l[0] = 2; l[1] = 1;
l[n_] := l[n] = l[n - 1] + l[n - 2] - Floor[l[n - 1]/2]
Table[l[n] - Floor[l[n]/2], {n, 0, 30}]

Crossrefs

Cf. A000032, A173497, A173510, A173508.

Sequence in context: A113788 A018243 A127207 * A367693 A147663 A301765

Adjacent sequences: A173510 A173511 A173512 * A173514 A173515 A173516

Keyword

nonn

Author

Roger L. Bagula, Nov 23 2010

Status

approved