OFFSET
0,3
COMMENTS
Appears to be number of edges in graph where nodes are binary vectors of length n, two nodes u, v being joined by an edge if there's a vector of length n-1 that can be reached from u by deleting a bit and from v by deleting a bit. An independent set in this graph is a code that will correct single deletions.
Binomial transform of A005893: (1, 4, 10, 20, 34, 52, 74, ...) = (1, 5, 19, 63, 191, ...). - Gary W. Adamson, Apr 28 2008
Let A be the Hessenberg matrix of order n defined by: A[1,j]=1, A[i,i]:=2,(i>1), A[i,i-1]=-1, and A[i,j]=0 otherwise. Then, for n>=2, a(n-1)= (-1)^n*coeff(charpoly(A,x),x^2). - Milan Janjic, Jan 26 2010
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..3000
I. Wegener, The Complexity of Boolean Functions, Wiley, 1987, see p. 151, (2.7).
Index entries for linear recurrences with constant coefficients, signature (7,-18,20,-8).
FORMULA
G.f.: x*(1-2x+2x^2)/((1-x)*(1-2x)^3).
a(n) = 2^(n-2)*(n^2-n+4)-1.
Partial sums of A007466. - J. M. Bergot, Jan 20 2013
a(n) = 7*a(n-1) - 18*a(n-2) + 20*a(n-3) - 8*a(n-4); a(0)=0, a(1)=1, a(2)=5, a(3)=19. - Harvey P. Dale, Apr 03 2013
MAPLE
MATHEMATICA
Table[2^(n-2)(n^2-n+4)-1, {n, 0, 30}] (* or *) LinearRecurrence[{7, -18, 20, -8}, {0, 1, 5, 19}, 30] (* Harvey P. Dale, Apr 03 2013 *)
PROG
(Magma) [2^(n-2)*(n^2-n+4)-1: n in [0..30]]; // Vincenzo Librandi, Oct 10 2011
(PARI) a(n)=2^(n-2)*(n^2-n+4)-1 \\ Charles R Greathouse IV, Feb 19 2017
CROSSREFS
KEYWORD
nonn,easy,nice
AUTHOR
N. J. A. Sloane, Mar 21 2000
STATUS
approved