OFFSET
1,4
LINKS
Eric M. Schmidt, Table of n, a(n) for n = 1..1023
PROG
(GAP)
IsTwoGenerated := function(G) if IsSolvableGroup(G) then return (Length(MinimalGeneratingSet(G)) <= 2); fi; return ForAny(List(ConjugacyClasses(G), Representative), g->ForAny(G, h->Size(Group(g, h)) = Size(G))); end; A066389 := function(n) local count, i; count := 0; for i in [1..NumberSmallGroups(n)] do if IsTwoGenerated(SmallGroup(n, i)) then count := count + 1; fi; od; return count; end; # Eric M. Schmidt, May 02 2013; shortened by Eric M. Schmidt, May 20 2013
CROSSREFS
KEYWORD
nonn,nice
AUTHOR
Sharon Sela (sharonsela(AT)hotmail.com), Dec 23 2001
EXTENSIONS
More terms from Reiner Martin, Dec 29 2001
More terms from Eric M. Schmidt, May 02 2013
STATUS
approved