A066315 Number of aperiodic bracelets (or necklaces) with n red and blue beads such that the beads switch colors when bracelet is turned over.
1, 1, 3, 7, 20, 51, 154, 460, 1476, 4860, 16544, 57321, 202059, 720370, 2593470, 9408000, 34350506, 126108252, 465200332, 1723341185, 6408356052, 23911255544, 89495909408, 335916703284, 1264114452975, 4768464107355
Offset: 1
Keywords
Programs
-
Mathematica
a[n_] := Sum[MoebiusMu[n/d] A006080[d + 1], {d, Divisors[n]}]; Array[a, 26] (* Jean-François Alcover, Aug 28 2019 *)
Formula
Moebius transform of A006080(n+1).