A119592 a(0)=1, a(1)=2, a(2)=3, a(3)=5, a(4)=7, a(5)=10; a(n) = floor(a(n-1) + 1 + (a(n-2) + 1)/6) for n>=6.

1, 2, 3, 5, 7, 10, 12, 14, 17, 20, 24, 28, 33, 38, 44, 51, 59, 68, 79, 91, 105, 121, 139, 160, 184, 211, 242, 278, 319, 366, 420, 482, 553, 634, 727, 833, 955, 1095, 1255, 1438, 1648, 1888, 2163, 2478, 2839, 3253, 3727, 4270, 4892, 5604, 6420, 7355, 8426

Offset

0,2

Comments

A variant of A119565.

Links

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

Mathematica

a[0]=1; a[1]=2; a[2]=3; a[3]=5; a[4]=7; a[5]=10; a[n_]:=a[n]=Floor[a[n-1]+1+(a[n-2]+1)/6];

Crossrefs

Cf. A119565.

Sequence in context: A123885 A010062 A119565 * A191892 A087539 A140690

Adjacent sequences: A119589 A119590 A119591 * A119593 A119594 A119595

Keyword

nonn

Author

Zak Seidov, Jun 01 2006

Extensions

Edited by Dean Hickerson, Jun 03 2006

Status

approved