A094970 a(n) = floor(7^n/2^n).
1, 3, 12, 42, 150, 525, 1838, 6433, 22518, 78815, 275854, 965491, 3379220, 11827271, 41395451, 144884079, 507094277, 1774829971, 6211904899, 21741667147, 76095835015, 266335422555, 932173978944, 3262608926305, 11419131242070, 39966959347247, 139884357715364, 489595252003776
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[Floor(7^n / 2^n): n in [0..30]]; // Vincenzo Librandi, Sep 08 2011
-
Mathematica
Table[ Floor[(7/2)^n], {n, 0, 30}] -
Maxima
A094970(n):=floor(7^n/2^n)$ makelist(A094970(n),n,0,30); /* Martin Ettl, Oct 25 2012 */
-
PARI
a(n)=7^n>>n \\ Charles R Greathouse IV, Feb 04 2016
Formula
7^n = a(n)*2^n + A138616(n). - R. J. Mathar, Oct 26 2012