WOLFRAM NOTEBOOK

Construct causal graph for individual instance

In[]:=
CombinatorEvolutionGraph[{e[x_][y_]x[y[y]]},e[e][e][e][e],10]
Out[]=
In[]:=
MultiwayCombinator[{e[x_][y_]x[y[y]]},e[e][e][e][e],10,"CausalGraphStructure"]
Out[]=
In[]:=
NestList[#/.{e[x_][y_]x[y[y]]}&,e[e][e][e][e],10]
Out[]=
In[]:=
CombinatorTree/@%
Out[]=
In[]:=
CombinatorAnnotate[{e[x_][y_]x[y[y]]},#]&/@NestList[#/.{e[x_][y_]x[y[y]]}&,e[e][e][e][e],10]
Out[]=
Wolfram Cloud

You are using a browser not supported by the Wolfram Cloud

Supported browsers include recent versions of Chrome, Edge, Firefox and Safari.


I understand and wish to continue anyway »

You are using a browser not supported by the Wolfram Cloud. Supported browsers include recent versions of Chrome, Edge, Firefox and Safari.