Descubra novos resultados 

Encontre uma forma fechada para o número de árvores geradoras de um grafo roda.

In[1]:=

X g = WheelGraph[4];

In[2]:=

X TuttePolynomial[g, {1, 1}]

Out[2]=

Uma forma fechada.

In[3]:=

X Table[TuttePolynomial[WheelGraph[n], {1, 1}], {n, 2, 10}]

Out[3]=

In[4]:=

X Table[TuttePolynomial[WheelGraph[n], {1, 1}], {n, 2, 10}]; FindSequenceFunction[%, n - 1]

Out[4]=

Exiba árvores geradoras.