Dic₄₃₆₈ #72215811

order	17472
automorphism	Aut(G) order 20127744
homology	Abelianization (H₁) = C₂² · Schur multiplier (H₂) = C₁

Aliases

dicyclic

Dic₄₃₆₈

Splittings

Hall	C₃×C₇×C₁₃ ⋊ Q₆₄
Hall	C₇×C₁₃ ⋊ Dic₄₈
Hall	C₃×C₁₃ ⋊ Dic₁₁₂
Hall	C₃×C₇ ⋊ Dic₂₀₈
Sylow	C₁₃ ⋊ Dic₃₃₆
Sylow	C₇ ⋊ Dic₆₂₄
Sylow	C₃ ⋊ Dic₁₄₅₆

Subgroups

	subgroup	G/H
center	C₂	D₄₃₆₈
commutator, cosocle	C₃×C₇×C₁₃×C₁₆	C₂²
Frattini	C₁₆	C₂×D₂₇₃
Fitting	C₃×C₇×C₁₃×C₃₂	C₂
socle, prime radical	C₂×C₃×C₇×C₁₃	D₁₆
hypercenter	C₃₂	D₂₇₃
hypocenter	C₃×C₇×C₁₃	Q₆₄
LCS	G ▷ C₃×C₇×C₁₃×C₁₆ ▷ C₃×C₇×C₈×C₁₃ ▷ C₃×C₄×C₇×C₁₃ ▷ C₂×C₃×C₇×C₁₃ ▷ C₃×C₇×C₁₃
UCS	C₁ ◁ C₂ ◁ C₄ ◁ C₈ ◁ C₁₆ ◁ C₃₂

120 conjugacy classes of subgroups.

Full subgroup data →

Presentation

minimal degree	μ(G) = 87
transitive degree	μ_t(G) = 17472

A minimal faithful permutation representation — 2 generators on 87 points:

(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32)(33,64,63,62,61,60,59,58,57,56,55,54,53,52,51,50,49,48,47,46,45,44,43,42,41,40,39,38,37,36,35,34)(65,66,67)(68,69,70,71,72,73,74)(75,76,77,78,79,80,81,82,83,84,85,86,87);(1,33,17,49)(2,34,18,50)(3,35,19,51)(4,36,20,52)(5,37,21,53)(6,38,22,54)(7,39,23,55)(8,40,24,56)(9,41,25,57)(10,42,26,58)(11,43,27,59)(12,44,28,60)(13,45,29,61)(14,46,30,62)(15,47,31,63)(16,48,32,64)(66,67)(69,74)(70,73)(71,72)(76,87)(77,86)(78,85)(79,84)(80,83)(81,82)

Polycyclic presentation:

2^6,3,7,13|a^2=f,b^2=cd,c^2=de,d^2=ef,e^2=f,b^a=bc,c^a=cd,d^a=de,e^a=ef,g^a=g^2,h^a=h^6,i^a=i^12

Conjugacy classes & character table

4371 conjugacy classes. The character table is too large to display.

Relationships

maximal subgroup of	Dic₈₇₃₆, Dic₁₃₁₀₄
maximal normal subgroup of	Dic₈₇₃₆
maximal quotient of	Dic₁₃₁₀₄

GAP

Past the SmallGroups library coverage — no SmallGroups id. Construct it from its polycyclic presentation:

gap> F := FreeGroup(IsSyllableWordsFamily, "a", "b", "c", "d", "e", "f", "g", "h", "i");;
gap> coll := SingleCollector(F, [2, 2, 2, 2, 2, 2, 3, 7, 13]);;
gap> SetPower(coll, 1, F.6);;
gap> SetPower(coll, 2, F.3*F.4);;
gap> SetPower(coll, 3, F.4*F.5);;
gap> SetPower(coll, 4, F.5*F.6);;
gap> SetPower(coll, 5, F.6);;
gap> SetConjugate(coll, 2, 1, F.2*F.3);;
gap> SetConjugate(coll, 3, 1, F.3*F.4);;
gap> SetConjugate(coll, 4, 1, F.4*F.5);;
gap> SetConjugate(coll, 5, 1, F.5*F.6);;
gap> SetConjugate(coll, 7, 1, F.7^2);;
gap> SetConjugate(coll, 8, 1, F.8^6);;
gap> SetConjugate(coll, 9, 1, F.9^12);;
gap> UpdatePolycyclicCollector(coll);;
gap> G := GroupByRws(coll);

Dic4368 #72215811