cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A330620 Number of length n necklaces with entries covering an initial interval of positive integers and no adjacent entries equal.

This page as a plain text file.
%I A330620 #9 Jan 09 2020 19:36:43
%S A330620 0,1,2,10,54,392,3378,34120,393738,5112406,73756026,1170482186,
%T A330620 20263782630,380047964920,7676106365966,166114208828980,
%U A330620 3834434324386350,94042629535109500,2442147034719168714,66942194906112161302,1931543452345335094678,58519191359163454708564
%N A330620 Number of length n necklaces with entries covering an initial interval of positive integers and no adjacent entries equal.
%H A330620 Andrew Howroyd, <a href="/A330620/b330620.txt">Table of n, a(n) for n = 1..200</a>
%e A330620 Case n=4: there are the following 10 necklaces:
%e A330620   1212,
%e A330620   1213, 1232, 1323,
%e A330620   1234, 1243, 1324, 1342, 1423, 1432.
%o A330620 (PARI) \\ here U(n, k) is A208535(n, k) for n > 1.
%o A330620 U(n, k)={sumdiv(n, d, eulerphi(n/d)*(k-1)^d)/n - if(n%2, k-1)}
%o A330620 a(n)={if(n<1, n==0, sum(j=1, n, U(n,j)*sum(k=j, n, (-1)^(k-j)*binomial(k, j))))}
%Y A330620 Row sums of A330618.
%Y A330620 Cf. A019536, A208535.
%K A330620 nonn
%O A330620 1,3
%A A330620 _Andrew Howroyd_, Dec 20 2019