A102651 a(n) = 4 * floor(23*2^n/15).

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.

Links

Table of n, a(n) for n=0..29.

Index entries for linear recurrences with constant coefficients, signature (2,0,0,1,-2)

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

Cf. A102650, A102652, A102653.

Sequence in context: A352668 A330011 A132477 * A102652 A279626 A238607

Adjacent sequences: A102648 A102649 A102650 * A102652 A102653 A102654

Keyword

easy,nonn,less

Author

Odimar Fabeny, Feb 02 2005

Extensions

Edited by Don Reble, Mar 28 2006

Status

approved