OFFSET
1,4
LINKS
Stephen A. Silver, Table of n, a(n) for n = 1..255
FORMULA
a(n) = A034383(n)/n.
PROG
(GAP) A058163 := function(n) local fn1, sum, k; fn1 := Factorial(n-1); sum := 0; for k in [1 .. NrSmallGroups(n)] do sum := sum + fn1 / Size(AutomorphismGroup(SmallGroup(n, k))); od; return sum; end; # Stephen A. Silver, Feb 10 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Christian G. Bower, Nov 15 2000
EXTENSIONS
More terms from Stephen A. Silver, Feb 10 2013
STATUS
approved