login
A102651
a(n) = 4 * floor(23*2^n/15).
4
4, 12, 24, 48, 96, 196, 392, 784, 1568, 3140, 6280, 12560, 25120, 50244, 100488, 200976, 401952, 803908, 1607816, 3215632, 6431264, 12862532, 25725064, 51450128, 102900256, 205800516, 411601032, 823202064, 1646404128, 3292808260
OFFSET
0,1
COMMENTS
In binary, each term differs from the previous by a single bit.
FORMULA
G.f.: ( 4+4*x-4*x^4 ) / ( (x-1)*(2*x-1)*(1+x)*(x^2+1) ). - R. J. Mathar, Feb 20 2011
MAPLE
A102651:=n->4*floor(23*2^n/15); seq(A102651(n), n=0..50); # Wesley Ivan Hurt, Jan 21 2014
MATHEMATICA
Table[4*Floor[23*2^n/15], {n, 0, 50}] (* Wesley Ivan Hurt, Jan 21 2014 *)
PROG
(PARI) a(n)=23<<n\15*4 \\ Charles R Greathouse IV, Feb 04 2016
CROSSREFS
KEYWORD
easy,nonn,less
AUTHOR
Odimar Fabeny, Feb 02 2005
EXTENSIONS
Edited by Don Reble, Mar 28 2006
STATUS
approved