OFFSET
1,2
LINKS
Eric Weisstein's World of Mathematics, Hypercube Graph
Eric Weisstein's World of Mathematics, Total Dominating Set
FORMULA
a(n) = A284704(n-1)^2. - Andrew Howroyd, Apr 16 2018
MATHEMATICA
Table[Count[Subsets[Range[2^n]], _?(CountDistinct[Flatten[# /. Table[k -> AdjacencyList[HypercubeGraph[n], k], {k, 2^n}]]] == 2^n &)], {n, 1, 3}] (* Eric W. Weisstein, Apr 17 2018 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Eric W. Weisstein, Apr 16 2018
EXTENSIONS
a(5)-a(6) from Andrew Howroyd, Apr 16 2018
STATUS
approved