A094990 a(n) = floor(8^n/7^n).
1, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5, 6, 7, 8, 9, 11, 12, 14, 16, 18, 21, 24, 28, 32, 36, 42, 48, 54, 62, 71, 81, 93, 107, 122, 139, 159, 182, 208, 238, 272, 311, 356, 407, 465, 531, 607, 694, 793, 906, 1036, 1184, 1353, 1547, 1768, 2020, 2309, 2639, 3016, 3447, 3940
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[Floor(8^n / 7^n): n in [0..60]]; // Vincenzo Librandi, Sep 09 2011
-
Mathematica
Table[ Floor[(8/7)^n], {n, 0, 62}] -
Maxima
A094990(n):=floor(8^n/7^n)$ makelist(A094990(n),n,0,60); /* Martin Ettl, Oct 25 2012 */