OFFSET
1,2
LINKS
Eric Weisstein's World of Mathematics, Queen Graph
Eric Weisstein's World of Mathematics, Vertex-Induced Subgraph
MATHEMATICA
Table[g = GraphData[{"Queen", {n, n}}]; -1 + ParallelSum[ Boole@ ConnectedGraphQ@ Subgraph[g, s], {s, Subsets@ Range[n^2]}], {n, 4}]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Giovanni Resta, May 04 2017
STATUS
approved