A275862 floor(r*a(n-1)) + floor(r*a(n-2)), where r = 3/2, a(0) = 1, a(1) = 1.

1, 1, 2, 4, 9, 19, 41, 89, 194, 424, 927, 2026, 4429, 9682, 21166, 46272, 101157, 221143, 483449, 1056887, 2310503, 5051084, 11042380, 24140196, 52773864, 115371090, 252217431, 551382781, 1205400317, 2635174646, 5760862444, 12594055635, 27532377118

Offset

0,3

Links

Clark Kimberling, Table of n, a(n) for n = 0..1000

Formula

a(n) = floor(3*a(n-1)/2) + floor(3*a(n-2)/2).

Mathematica

r = 3/2; a[0] = 1; a[1] = 1; z = 50;
a[n_] := a[n] = Floor[r*a[n - 1]] + Floor[r*a[n - 2]];
t = Table[a[n], {n, 0, z}]

Crossrefs

Cf. A275863, A275864, A275865.

Sequence in context: A142474 A078039 A305380 * A036622 A001384 A089941

Adjacent sequences: A275859 A275860 A275861 * A275863 A275864 A275865

Keyword

nonn,easy

Author

Clark Kimberling, Aug 12 2016

Status

approved