A289170 Number of dominating sets in the n X n white bishop graph.

3, 11, 201, 3413, 233727, 15544607, 4103802933, 1069035156713, 1107896230202475, 1142044772648964275, 4697484584102406799521, 19284763179499969013836925, 316392839278535985537956881623, 5187559573137612606140331666573383

Offset

2,1

Links

Andrew Howroyd, Table of n, a(n) for n = 2..50

Eric Weisstein's World of Mathematics, Dominating Set

Eric Weisstein's World of Mathematics, White Bishop Graph

Prog

(PARI)
Collect(sig, v, r, x)={forstep(r=r, 1, -1, my(w=sig[r]+1); v=vector(#v, k, sum(j=1, k, binomial(#v-j, k-j)*v[j]*x^(k-j)*(1+x)^(w-#v+j-1))-v[k])); v[#v]}
DomSetCount(sig, x)={my(v=[1]); my(total=Collect(sig, v, #sig, x)); forstep(r=#sig, 1, -1, my(w=sig[r]+1); total+=Collect(sig, vector(w, k, if(k<=#v, v[k])), r-1, x); v=vector(w, k, sum(j=1, min(k, #v), binomial(w-j, k-j)*v[j]*x^(k-j)*(1+x)^(j-1)))); total}
Bishop(n, white)=vector(n-if(white, n%2, 1-n%2), i, n-i+if(white, 1-i%2, i%2));
a(n)=DomSetCount(Bishop(n, 1), 1); \\ Andrew Howroyd, Nov 05 2017

Crossrefs

Cf. A287897, A289169, A289164.

Sequence in context: A332771 A092840 A007156 * A060346 A145988 A165946

Adjacent sequences: A289167 A289168 A289169 * A289171 A289172 A289173

Keyword

nonn

Author

Eric W. Weisstein, Jun 26 2017

Extensions

Terms a(8) and beyond from Andrew Howroyd, Nov 05 2017

Status

approved