A364370 Number of chordless cycles (of length > 3) in the complement of the n-hypercube graph.
0, 0, 0, 6, 160, 1720, 13056, 82656, 470016, 2496384, 12666880, 62250496, 298868736, 1409660928, 6556483584, 30148976640, 137316794368, 620328091648, 2782435737600, 12402204475392, 54971691171840, 242433274675200
Offset: 0
Keywords
Links
- Eric Weisstein's World of Mathematics, Chordless Cycle
- Eric Weisstein's World of Mathematics, Hypercube Graph
Crossrefs
Cf. A361149.
Programs
-
Mathematica
a[n_] := 2^(n - 2)*n*Sum[Sum[4*((k + 2)*2^(k - 5) - 1),{k, 3, n-j}], {j, 0, n-3}]; Table[a[n], {n, 0, 21}] (* Detlef Meya, Jun 23 2024 *)
Formula
a(n) = 2^(n - 2)*n*Sum_{j=0..n-3} Sum_{k=3..n-j} 4*((k + 2)*2^(k - 5) - 1). - Detlef Meya, Jun 23 2024
Extensions
a(10) from Pontus von Brömssen, Jul 28 2023
a(11) and beyond from Detlef Meya, Jun 23 2024