OFFSET
1,2
COMMENTS
This sequence is infinite. All primes appear in the sequence.
LINKS
Robin Jones, Table of n, a(n) for n = 1..787
PROG
(Magma) // to get the terms up to 1023. The program will not work for i=1024, returning a positive result, since those groups are not classified.
i:=1;
while i lt 1024 do // terms up to 1023
inSequence:=1;
j:=1;
while j le NumberOfSmallGroups(i) do //iterate through all the groups of order i
G:=SmallGroup(i, j);
if #AllSubgroups(G) gt i then //some group has > i subgroups
inSequence:=0;
break;
end if;
j:=j+1;
end while;
if inSequence eq 1 then
i;
end if;
i:=i+1;
end while;
CROSSREFS
KEYWORD
nonn
AUTHOR
Robin Jones, Feb 18 2024
STATUS
approved