A379574 Numbers of (not necessarily connected) uniquely graceful graphs on n vertices.

1, 1, 2, 5, 2, 5, 11, 33, 247, 6213

Offset

1,3

Links

Table of n, a(n) for n=1..10.

Eric Weisstein's World of Mathematics, Uniquely Graceful Graph.

Mathematica

Length /@ Table[Select[GraphData["Graceful", n], GraphData[#, "GracefulLabelingCount"] == 1 &], {n, 7}]

Crossrefs

Cf. A379573 (connected uniquely graceful graphs).

Cf. A379572 (uniquely graceful graphs with no isolated points).

Sequence in context: A299963 A107060 A016589 * A151572 A166376 A089122

Adjacent sequences: A379571 A379572 A379573 * A379575 A379576 A379577

Keyword

nonn,more,hard

Author

Eric W. Weisstein, Dec 26 2024

Extensions

a(9) from Eric W. Weisstein, Nov 12 2025

a(10) from Eric W. Weisstein, Feb 27 2026

Status

approved