OFFSET
1,1
COMMENTS
Equivalently, lower member of consecutive terms of A295230.
LINKS
Muniru A Asiru, Table of n, a(n) for n = 1..2583
H. U. Besche, B. Eick and E. A. O'Brien, A Millennium Project: Constructing Small Groups, Internat. J. Algebra and Computation, 12 (2002), 623-644.
Gordon Royle, Numbers of Small Groups
EXAMPLE
MAPLE
with(GroupTheory): with(numtheory):
for n from 1 to 10^4 do if [NumGroups(n), NumGroups(n+1), NumGroups(n+2)]=[2, 2, 2] then print(n); fi; od;
MATHEMATICA
cnt = FiniteGroupCount; Select[Range[10^4], cnt[#] == cnt[#+1] == cnt[#+2] == 2&] (* Jean-François Alcover, Dec 08 2017 *)
PROG
(GAP) A296022 := Filtered([1..2013], n -> [NumberSmallGroups(n), NumberSmallGroups(n+1), NumberSmallGroups(n+2)]=[2, 2, 2]);
CROSSREFS
KEYWORD
nonn
AUTHOR
Muniru A Asiru, Dec 03 2017
STATUS
approved