login
A191634
a(n) = floor((1 + 3^n)/(1 + 3*n)).
3
1, 1, 2, 6, 15, 38, 99, 262, 703, 1904, 5210, 14363, 39858, 111231, 311932, 878504, 2483464, 7044008, 20038990, 57160400, 163443018, 468374024, 1344902554, 3868897760, 11148534334, 32175516814, 92995091280, 269138734764, 779890651873, 2262539913128
OFFSET
1,3
LINKS
MATHEMATICA
f[n_] := Floor[(1 + 3^n)/(3 n + 1)]
Table[f[n], {n, 1, 40}] (* A191634 *)
PROG
(PARI) a(n)=(3^n+1)\(3*n+1) \\ Charles R Greathouse IV, Jun 17 2011
(Maxima) A191634(n):=floor( (1+3^n)/(1+3*n) )$ makelist(A191634(n), n, 1, 30); /* Martin Ettl, Oct 25 2012 */
CROSSREFS
Cf. A191627.
Sequence in context: A106515 A153122 A109545 * A120846 A101522 A094969
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Jun 09 2011
STATUS
approved