A094969 a(n) = floor(5^n/2^n).
1, 2, 6, 15, 39, 97, 244, 610, 1525, 3814, 9536, 23841, 59604, 149011, 372529, 931322, 2328306, 5820766, 14551915, 36379788, 90949470, 227373675, 568434188, 1421085471, 3552713678, 8881784197, 22204460492, 55511151231, 138777878078, 346944695195, 867361737988
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[Floor(5^n / 2^n): n in [0..30]]; // Vincenzo Librandi, Sep 08 2011
-
Maple
A094969:=n->floor(5^n/2^n): seq(A094969(n), n=0..40); # Wesley Ivan Hurt, Feb 22 2017
-
Mathematica
Table[ Floor[(5/2)^n], {n, 0, 30}] Floor[(5/2)^Range[0,30]] (* Harvey P. Dale, Jul 16 2012 *) -
Maxima
A094969(n):=floor(5^n/2^n)$ makelist(A094969(n),n,0,30); /* Martin Ettl, Oct 25 2012 */
-
PARI
a(n)=5^n>>n \\ Charles R Greathouse IV, Sep 08 2011