Eric Weisstein's World of Mathematics, <a href="httphttps://mathworld.wolfram.com/Necklace.html">Necklace</a>
Eric Weisstein's World of Mathematics, <a href="httphttps://mathworld.wolfram.com/e.html">e</a>
reviewed
approved
proposed
reviewed
editing
proposed
H. Henry Bottomley, <a href="/A000029/a000029.gif">Illustration of initial terms</a>
F. Frank Ruskey, <a href="http://combos.org/necklace">Necklaces, Lyndon words, De Bruijn sequences, etc.</a>
F. Frank Ruskey, <a href="/A000011/a000011.pdf">Necklaces, Lyndon words, De Bruijn sequences, etc.</a> [Cached copy, with permission, pdf format only]
proposed
editing
editing
proposed
a[0] := 1; a[n_] := Fold[ # 1 + EulerPhi[ # 2]2^(n/ # 2)/(2n) &, If[OddQ[n], 2^((n - 1)/2), 2^(n/2 - 1) + 2^(n/2 - 2)], Divisors[n]]
approved
editing
proposed
approved
editing
proposed
James Tilley, Stan Wagon, and Eric Weisstein, <a href="https://arxiv.org/abs/2409.11249">A Catalog of Facially Complete Graphs</a>, arXiv:2409.11249 [math.CO], 2024. See p. 11.
approved
editing