|
|
A016125
|
|
Expansion of 1/((1-x)*(1-12*x)).
|
|
55
|
|
|
1, 13, 157, 1885, 22621, 271453, 3257437, 39089245, 469070941, 5628851293, 67546215517, 810554586205, 9726655034461, 116719860413533, 1400638324962397, 16807659899548765, 201691918794585181
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Let A be the Hessenberg matrix of the order n, defined by: A[1,j]=1, A[i,i]:=12, (i>1), A[i,i-1]=-1, and A[i,j]=0 otherwise. Then, for n>=1, a(n-1)=det(A). - Milan Janjic, Feb 21 2010
Let A be the Hessenberg matrix of the order n, defined by: A[1,j]=1, A[i,i]:=13, (i>1), A[i,i-1]=-1, and A[i,j]=0 otherwise. Then, for n>=2, a(n-2)=(-1)^n*charpoly(A,1). - Milan Janjic, Feb 21 2010
a(n) is the total number of holes in a certain box fractal (start with 12 boxes, 1 hole) after n iterations. See illustration in links. - Kival Ngaokrajang, Jan 28 2015
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Repunit
|
|
FORMULA
|
a(n) = (12^(n+1) - 1)/11.
a(n) = Sum_{i=0...n} 11^i*binomial(n+1,n-i). - Bruno Berselli, Nov 11 2015
|
|
EXAMPLE
|
For n=5, a(5) = 1*6 + 11*15 + 121*20 + 1331*15 + 14641*6 + 161051*1 = 271453. - Bruno Berselli, Nov 11 2015
|
|
MAPLE
|
a:=n->sum(12^(n-j), j=1..n): seq(a(n), n=1..17); # Zerinvary Lajos, Jan 04 2007
|
|
MATHEMATICA
|
CoefficientList[Series[1/((1-x)(1-12x)), {x, 0, 20}], x] (* or *) LinearRecurrence[{13, -12}, {1, 13}, 20] (* Harvey P. Dale, Aug 20 2022 *)
|
|
PROG
|
(Sage) [lucas_number1(n, 13, 12) for n in range(1, 18)] # Zerinvary Lajos, Apr 29 2009
(Sage) [gaussian_binomial(n, 1, 12) for n in range(1, 18)] # Zerinvary Lajos, May 28 2009
(Sage) [(12^(n+1)-1)/11 for n in (0..20)] # Bruno Berselli, Nov 11 2015
(Maxima) A016125(n):=(12^(n+1) - 1)/11$
(Haskell)
a016125 n = a016125_list !! n
a016125_list = iterate ((+ 1) . (* 12)) 1
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|