A094975 a(n) = floor(7^n/3^n).
1, 2, 5, 12, 29, 69, 161, 376, 878, 2050, 4783, 11162, 26044, 60771, 141799, 330865, 772020, 1801380, 4203220, 9807513, 22884198, 53396463, 124591747, 290714077, 678332846, 1582776641, 3693145496, 8617339492, 20107125483, 46916626127
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[Floor(7^n / 3^n): n in [0..40]]; // Vincenzo Librandi, Sep 08 2011
-
Mathematica
Table[ Floor[(7/3)^n], {n, 0, 30}] -
Maxima
A094975(n):=floor(7^n/3^n)$ makelist(A094975(n),n,0,60); /* Martin Ettl, Oct 25 2012 */
-
PARI
a(n)=7^n\3^n \\ Charles R Greathouse IV, Sep 08 2011