In[]:=
a={{"Grupo5",1,2,3},{"Grupo1",4,5,6},{"Grupo5",7,6,7},{"Grupo2",8,9,10},{"Grupo2",8,9,10}};​​​​pivot=PivotTable[Tabular[SortBy[a,First],{"grupo","num 1","num 2","num 3"}],Length[#["num 1"]]&,"grupo","num 2",IncludeGroupAggregates->True]
Out[]=
Tabular
Row count: 4
Column count: 6
