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.

A058163 Number of labeled groups with a fixed identity.

This page as a plain text file.
%I A058163 #13 Jul 15 2021 19:01:32
%S A058163 1,1,1,4,6,80,120,2760,7560,108864,362880,21621600,39916800,
%T A058163 1186099200,10897286400,647091244800,1307674368000,103742166528000,
%U A058163 355687428096000,32438693442355200,260668072304640000,5573557327822848000,51090942171709440000
%N A058163 Number of labeled groups with a fixed identity.
%H A058163 Stephen A. Silver, <a href="/A058163/b058163.txt">Table of n, a(n) for n = 1..255</a>
%H A058163 <a href="/index/Gre#groups">Index entries for sequences related to groups</a>
%F A058163 a(n) = A034383(n)/n.
%o A058163 (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
%Y A058163 Cf. A000688, A034383, A058158, A058162, A058163.
%K A058163 nonn
%O A058163 1,4
%A A058163 _Christian G. Bower_, Nov 15 2000
%E A058163 More terms from _Stephen A. Silver_, Feb 10 2013