with the option "Tensor"->"O(N)" is possible to get both these information at the same time, for example
In[3]:=
InformationDiagram
[4,0,3,1,"Tensor""O(N)"]
Out[3]=
ExternalLegs
4
CubicVertices
0
QuarticVertices
3
ListNumber
1
NickelIndex
ee11|22|ee|
SymmetryFactor
4
9
+
2GSberveglieri`Phi4tools`NComponents[]
9
+
2
GSberveglieri`Phi4tools`NComponents[]
27
,
4
27
,
4
27
Diagram
Value
1
The actual contribution for a given Feynman diagram is given by the product between the value of the diagram and symmetry factor that can be printed with