2019-I Algebra Abstracta
Información
Álgebra abstracta No 3478. Martes y Jueves de 4:pm a 6:pm en el 51-441.
Sage
Program: Sage
g := DihedralGroup(8);
List(g);
GeneratorsOfGroup(g);
z := Center(g);
Size(g);
Size(z);
Finding Sylow subgroups
g := DihedralGroup(IsPermGroup, 12);;
lista := AllSubgroups(g);;
Print("\n El Grupo ", StructureDescription(g), " tiene ", Size(lista), " subgrupos.");
Print("\n Los tamaños de los subgrupos son: ", List( [1..Size(lista)] , i->Size(lista[i]) ));
tamanos:= List( [1..Size(lista)] , i->Size(lista[i]) );
tam := 4;; # Tamaño del p-subgrupo de Sylow
Print("\n Los subgrupos de Sylow están en: ", Positions(tamanos, 4));
Print("\n np es ", Size(Positions(tamanos, 4)));