OFFSET
1,1
LINKS
Lars Blomberg, Table of n, a(n) for n = 1..100
Amy Glen, Jamie Simpson, W. F. Smyth, Counting Lyndon Factors, Electronic Journal of Combinatorics 24(3) (2017), #P3.28.
PROG
(PARI) Inner(m, s)=d=divisors(m); sum(i=1, length(d), moebius(m/d[i])*s^d[i]);
Lyndon(s, n) = sum(m=1, n, (n-m+1)/m * s^(n-m) * Inner(m, s));
vector(100, i, Lyndon(2, i)) \\ Lars Blomberg, Aug 12 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Aug 11 2017
EXTENSIONS
a(11)-a(33) from Lars Blomberg, Aug 12 2017
STATUS
approved