A191634 a(n) = floor((1 + 3^n)/(1 + 3*n)).

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

Vincenzo Librandi, Table of n, a(n) for n = 1..600

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. A016777, A034472.

Cf. A191627.

Sequence in context: A106515 A153122 A109545 * A120846 A101522 A094969

Adjacent sequences: A191631 A191632 A191633 * A191635 A191636 A191637

Keyword

nonn,easy

Author

Clark Kimberling, Jun 09 2011

Status

approved