OFFSET
0,1
LINKS
Jean-François Alcover and Vincenzo Librandi, Table of n, a(n) for n = 0..1000 (first 101 terms from Jean-François Alcover)
Index entries for linear recurrences with constant coefficients, signature (1, 2).
FORMULA
a(n) + a(n+1) = 3^*2^n = A007283(n).
a(2n) + a(2n+1) = A096045(n) + 2.
a(-n) = -A140683(n)/2^n.
O.g.f.: (4-5*x)/((1-2*x)(1+x)). - R. J. Mathar, Jul 29 2008
a(n) = 2^n+3*(-1)^n. - R. J. Mathar , Jul 29 2008
MATHEMATICA
LinearRecurrence[{1, 2}, {4, -1}, 40] (* or *) Total/@Partition[Riffle[ Table[ 2^n, {n, 0, 40}], {3, -3}], 2] (* Harvey P. Dale, Nov 13 2014 *)
CoefficientList[Series[(4 - 5 x) / ((1 + x) (1 - 2 x)), {x, 0, 50}], x] (* Vincenzo Librandi, Jan 14 2015 *)
PROG
(Magma) [2^n+3*(-1)^n: n in [0..40]]; // Vincenzo Librandi, Aug 08 2011
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Paul Curtz, Jul 10 2008
EXTENSIONS
Edited and extended by R. J. Mathar, Jul 29 2008
4 inserted as first term and formulas accordingly updated by Jean-François Alcover, Jan 14 2015
STATUS
approved