A191632 - OEIS

A191632

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

3, 3, 5, 11, 27, 66, 168, 437, 1157, 3107, 8435, 23106, 63772, 177147, 494789, 1388603, 3913338, 11069156, 31412472, 89404728, 255130565, 729792083, 2092070640, 6009139074, 17291604274, 49840506437, 143879197829, 415941680999, 1204041708155, 3489680204994

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

MATHEMATICA

f[n_] := Floor[(3^n)/(2 n - 1)]

Table[f[n], {n, 1, 40}] (* A191632 *)

PROG

(Magma) [Floor((3^n)/(2*n - 1)): n in [1..30]]; // Vincenzo Librandi, Sep 12 2011

(Maxima) A191632(n):=floor((3^n)/(2*n-1))$ makelist(A191632(n), n, 1, 30); /* Martin Ettl, Oct 25 2012 */

CROSSREFS