A131575 First differences of A131572.

1, 1, 0, 2, 0, 4, 0, 8, 0, 16, 0, 32, 0, 64, 0, 128, 0, 256, 0, 512, 0, 1024, 0, 2048, 0, 4096, 0, 8192, 0, 16384, 0, 32768, 0, 65536, 0, 131072, 0, 262144, 0, 524288, 0, 1048576, 0, 2097152, 0, 4194304, 0, 8388608, 0

Offset: 0

Author

Paul Curtz, Aug 28 2007

Keywords

• nonn
• easy

Links

• Index entries for linear recurrences with constant coefficients, signature (0, 2).

Programs

Mathematica

Differences[LinearRecurrence[{0,2},{0,1,2},50]] (* or *) LinearRecurrence[ {0, 2}, {1, 1, 0}, 50] (* or *) Join[{1},Riffle[2^Range[0,30],0]] (* Harvey P. Dale, Jul 10 2018 *)

Formula

a(n) = A131572(n+1) - A131572(n).

a(n) = A077957(n-1), n>0.

G.f.: (1 + x - 2x^2)/(1-2x^2). - Philippe Deléham, Oct 01 2011

Extensions

Edited by R. J. Mathar, Jul 16 2008

More terms from Philippe Deléham, Oct 01 2011