# 8. Exercise sheet#

Some general remarks about the exercises:

• For your convenience functions from the lecture are included below. Feel free to reuse them without copying to the exercise solution box.

• For each part of the exercise a solution box has been added, but you may insert additional boxes. Do not hesitate to add Markdown boxes for textual or LaTeX answers (via Cell > Cell Type > Markdown). But make sure to replace any part that says YOUR CODE HERE or YOUR ANSWER HERE and remove the raise NotImplementedError().

• Please make your code readable by humans (and not just by the Python interpreter): choose informative function and variable names and use consistent formatting. Feel free to check the PEP 8 Style Guide for Python for the widely adopted coding conventions or this guide for explanation.

• Make sure that the full notebook runs without errors before submitting your work. This you can do by selecting Kernel > Restart & Run All in the jupyter menu.

• For some exercises test cases have been provided in a separate cell in the form of assert statements. When run, a successful test will give no output, whereas a failed test will display an error message.

• Each sheet has 100 points worth of exercises. Note that only the grades of sheets number 2, 4, 6, 8 count towards the course examination. Submitting sheets 1, 3, 5, 7 & 9 is voluntary and their grades are just for feedback.

NAME = ""
NAMES_OF_COLLABORATORS = ""


Exercise sheet 8

Code from the lectures:

import numpy as np
rng = np.random.default_rng()
import matplotlib.pylab as plt
%matplotlib inline

def fan_triangulation(n):
'''Generates a fan-shaped triangulation of even size n.'''
return np.array([[(i-3)%(3*n),i+5,i+4,(i+6)%(3*n),i+2,i+1]
for i in range(0,3*n,6)],dtype=np.int32).flatten()

'''Test whether adj defines a fixed-point free involution.'''
if a < 0 or a >= len(adj) or x == a or adj[a] != x:
return False
return True

from collections import deque

'''Return the indices of the three neighboring triangles.'''
return [j//3 for j in adj[3*i:3*i+3]]

'''Calculate the number of connected components of the triangulation.'''
n = len(adj)//3   # the number of triangles
# array storing the component index of each triangle
component = np.full(n,-1,dtype=np.int32)
index = 0
for i in range(n):
if component[i] == -1:    # new component found, let us explore it
component[i] = index
queue = deque([i])   # use an exploration queue for breadth-first search
while queue:
# the neighboring triangle has not been explored yet
if component[nbr] == -1:
component[nbr] = index
queue.appendleft(nbr)   # add it to the exploration queue
index += 1
return index

def next_around_triangle(i):
'''Return the label of the side following side i in counter-clockwise direction.'''
return i - i%3 + (i+1)%3

def prev_around_triangle(i):
'''Return the label of the side preceding side i in counter-clockwise direction.'''
return i - i%3 + (i-1)%3

'''
Return the number of vertices and an array vertex of the same size
as adj, such that vertex[i] is the index of the vertex at the
start (in ccw order) of the side labeled i.
'''
# a side i that have not been visited yet has vertex[i]==-1
vert_index = 0
if vertex[i] == -1:
side = i
while vertex[side] == -1:  # find all sides that share the same vertex
vertex[side] = vert_index
vert_index += 1
return vert_index, vertex

'''Calculate the number of vertices in the triangulation.'''

'''Test whether adj defines a triangulation of the 2-sphere.'''
return False
# verify Euler's formula for the sphere
return num_vert - num_edge + num_face == 2

# flipping an edge that is adjacent to the same triangle on both sides makes no sense
return False
j = prev_around_triangle(i)
l = prev_around_triangle(k)
adj[i] = n  # it is important that we first update
m = adj[j]  # to treat the case j == n appropriately
return True

import networkx as nx
from mpl_toolkits.mplot3d import Axes3D
from mpl_toolkits.mplot3d.art3d import Poly3DCollection

def triangulation_edges(triangulation,vertex):
'''Return a list of vertex-id pairs corresponding to the edges in the triangulation.'''
return [(vertex[i],vertex[j]) for i,j in enumerate(triangulation) if i < j]

def triangulation_triangles(triangulation,vertex):
'''Return a list of vertex-id triples corresponding to the triangles in the triangulation.'''
return [vertex[i:i+3] for i in range(0,len(triangulation),3)]

'''Display an attempt at embedding the triangulation in 3d.'''
# use the networkX 3d graph layout algorithm to find positions for the vertices
pos = np.array(list(nx.spring_layout(nx.Graph(edges),dim=3).values()))
fig = plt.figure()
tris = Poly3DCollection(pos[triangles])
tris.set_edgecolor('k')
ax.set_xlim3d(np.amin(pos[:,0]),np.amax(pos[:,0]))
ax.set_ylim3d(np.amin(pos[:,1]),np.amax(pos[:,1]))
ax.set_zlim3d(np.amin(pos[:,2]),np.amax(pos[:,2]))
plt.show()

'''Return a list neighbors such that neighbors[v] is a list of neighbors of the vertex v.'''
neighbors = [[] for _ in range(num_vertices)]
neighbors[vertex[i]].append(vertex[j])
return neighbors

'''Return array profile of size max_distance such that profile[r] is the number
of vertices that have distance r to a randomly chosen initial vertex.'''
profile = np.zeros((max_distance),dtype=np.int32)
num_vertices = len(neighbors)
start = rng.integers(num_vertices) # random starting vertex
distance = np.full(num_vertices,-1,dtype=np.int32)  # array tracking the known distances (-1 is unknown)
queue = deque([start])   # use an exploration queue for the breadth-first search
distance[start] = 0
profile = 1  # of course there is exactly 1 vertex at distance 0
while queue:
current = queue.pop()
d = distance[current] + 1  # every unexplored neighbour will have this distance
if d >= max_distance:
break
for nbr in neighbors[current]:
if distance[nbr] == -1:  # this neighboring vertex has not been explored yet
distance[nbr] = d
profile[d] += 1
queue.appendleft(nbr)   # add it to the exploration queue
return profile

'''Perform t sweeps of flip moves, where 1 sweep is N moves.'''

def batch_estimate(data,observable,k):
'''Devide data into k batches and apply the function observable to each.
Returns the mean and standard error.'''
batches = np.reshape(data,(k,-1))
values = np.apply_along_axis(observable, 1, batches)
return np.mean(values), np.std(values)/np.sqrt(k-1)


## 8.1. Estimating Hausdorff dimensions in various 2D quantum gravity models#

(100 Points)

In the lecture we considered the model of two-dimensional Dynamical Triangulations of the 2-sphere. The corresponding partition function is

$Z^{U}_{S^2,N} = \sum_T 1, \qquad\qquad(1)$

where the sum is over all triangulations of size $$N$$ with the topology of $$S^2$$, each of which is represented as an adjacency list $$\operatorname{adj}: \{0,\ldots,3N-1\} \to \{0,\ldots,3N-1\}$$. To emphasize that we are dealing with the uniform probability distribution on such triangulations, we have added the label $$^U$$. It is a lattice model of two-dimensional Euclidean quantum gravity with no coupled matter.

One can also consider two-dimensional quantum gravity coupled to matter fields (e.g. a scalar field) supported on the geometry. Formally the corresponding path integral in the continuum reads

$Z = \int [\mathcal{D}g_{ab}]\int [\mathcal{D}\phi] e^{-\frac{1}{\hbar}(S_E[g_{ab}] + S_m[\phi,g_{ab}])} = \int [\mathcal{D}g_{ab}]e^{-\frac{1}{\hbar}S_E[g_{ab}]} Z^*_m[g_{ab}],$

where $$S_m[\phi,g_{ab}]$$ and $$Z_m[g_{ab}]$$ are the matter action and path integral of the field $$\phi$$ on the geometry described by $$g_{ab}$$. The natural analogue in Dynamical Triangulations is

$Z^*_{S^2,N} = \sum_T Z^*_m[T],$

where the sum is over the same triangulations as in (1) but now the summand $$Z^*_m[T]$$ is the lattice partition function of a matter system supported on the triangulation $$T$$, which generically depends in a non-trivial way on $$T$$. For instance, the matter system could be an Ising model in which the spin are supported on the triangles of $$T$$ and $$Z^{\text{Ising}}_m[T]$$ would be the corresponding Ising partition function. In other words, when Dynamical Triangulations are coupled to matter the uniform distribution $$\pi^U(T) = 1/Z^U_{S^2,N}$$ is changed into a non-uniform distribution $$\pi^*(T) = Z^*_m[T] / Z^*_{S^2,N}$$. This can have significant effect on the critical exponents of the random triangulation as $$N\to\infty$$, like the Hausdorff dimension.

The goal of this exercise is to estimate the Hausdorff dimension of random triangulations in four different models and to conclude based on this that they belong to four different universality classes (i.e. that if they possess well-defined continuum limits that they are described by four different EQFTs):

• $$Z^{U}_{S^2,N}$$: the standard Dynamical Triangulations with Uniform distribution (U)

• $$Z^{W}_{S^2,N}$$: triangulations coupled to a matter system called a Schnyder Wood (W)

• $$Z^{S}_{S^2,N}$$: triangulations coupled to a matter system called a Spanning tree (S)

• $$Z^{B}_{S^2,N}$$: triangulations coupled to a matter system called a Bipolar orientation (B)

What these matter systems precisely represent will not be important. We have provided for you a black box generator that samples from the corresponding four distributions $$\pi^U(T)$$, $$\pi^W(T)$$, $$\pi^S(T)$$, $$\pi^B(T)$$. It does so in an efficient manner (linear time in $$N$$) using direct Monte Carlo sampling algorithms and therefore returns independent samples with exactly the desired distribution $$\pi^*(T)$$ (within numerical precision).

The black box generator is provided by the executable program generator provided to you on the science server. It can be called directly from this notebook with the following function generate_random_triangulation, that takes the desired size $$N$$ and model ('U','W', 'S', 'B') and returns a single random triangulation in the usual form of an adjacency list.

import subprocess

def generate_random_triangulation(n,model):
'''
Returns a random triangulation generated by the program generator in the form
of an array of length 3n storing the adjacency information of the triangle sides.
Parameters:
n - number of triangles in the triangulation, must be positive and even
model - a one-letter string specifying the model from which the triangulation is sampled:
'U': Uniform triangulations
'W': Schnyder-Wood-decorated triangulations
'S': Spanning-tree decorated triangulations
'B': Bipolar-oriented triangulations
'''
program = "/vol/cursus/NM042B/bin/generator"
output = subprocess.check_output([program,"-s{}".format(n),"-t{}".format(model)]).decode('ascii').split('\n')[:-1]
return np.array([int(num) for num in output],dtype=np.int32)



Recall that the distance profile $$\rho_T(r)$$ of a triangulation is defined as

$\rho_T(r) = \frac{1}{V} \sum_{x=0}^{V-1} \sum_{y=0}^{V-1} \mathbf{1}_{\{d_T(x,y)=r\}},$

where $$V = (N+4)/2$$ is the number of vertices and $$d_T(x,y)$$ is the graph distance between the vertices with label $$x$$ and $$y$$.

(a) Let $$T$$ be a random triangulation of size $$N$$ and $$X$$, $$Y$$ two independent numbers chosen uniformly from $$0,\ldots,V-1$$, corresponding to two random vertices in $$T$$. Explain with a calculation that $$\frac{1}{V}\mathbb{E}[ \rho_T(r) ] = \mathbb{P}(d_T(X,Y) = r)$$ and that the expected distance between $$X$$ and $$Y$$ is related to the distance profile via

$\mathbb{E}[d_T(X,Y)] = \frac{1}{V}\sum_{r=0}^\infty r\, \mathbb{E}[ \rho_T(r) ]. \qquad\qquad(2)$

(20 pts)

(b) We will work under the assumption that

$\mathbb{E}[\rho_T(r)] \approx V^{1-1/d_H} f(r V^{-1/d_H})$

for a positive real number $$d_H$$ called the Hausdorff dimension and a continuous function $$f$$ that are both independent of $$N$$ but do depend on the model. Show that

$\mathbb{E}[d_T(X,Y)] \approx c\,V^{1/d_H}, \qquad c = \int_0^\infty \mathrm{d}x\,x\,f(x). \qquad\qquad(3)$

Hint: Approximate the summation by an integral. (15 pts)

(c) For each of the four models estimate $$\mathbb{E}[d_T(X,Y)]$$ with errors for $$N = 2^7, 2^8, \ldots, 2^{12}$$ using (2) and based on $$100$$ samples each. Store your data in the file qgdimension.hdf5. Make an estimate of $$d_H$$ (with errors) for each of the models by fitting the parameters $$c$$ and $$d_H$$ of the ansatz (3). For each model, plot the data together with the fit in a log-log plot. (40 pts)

models = ['U','W','S','B']
sizes = [2**k for k in range(7,13)]
num_vertices = (np.array(sizes)+4)/2
measurements = 100

# data gathering and storing in qgdimension.hdf5
raise NotImplementedError()

# Fitting and plotting
raise NotImplementedError()


(d) Produce a collapse plot for each of the four models as follows: plot

$V^{1/d_H}\,\mathbb{E}[\frac{1}{V}\rho_T(r)] \quad\text{ as function of } x = r / V^{1/d_H},$

where for $$d_H$$ you take the estimate obtained in the previous exercise. Show errors in the mean distance profiles via shaded regions (just like in the lecture). Verify that the curves collapse reasonably well. (25 pts)

# YOUR CODE HERE
raise NotImplementedError()


(e) Bonus exercise: Make more robust estimates of $$d_H$$ by optimizing the quality of the collapse. You could do this (for each model separately) by taking $$\hat{f}(r) = \mathbb{E}[\rho_T(r)] / V_0$$, where the right-hand side is the mean distance profile for the largest system size with $$V_0 = (2^{12} + 4)/2$$ vertices. Then according to our assumption, for another size $$V \leq V_0$$ we expect $$\mathbb{E}[\rho_T(r)] / V \approx k \hat{f}(kr)$$, where $$k \geq 1$$ is a scale factor that should be $$k\approx (V_0/V)^{1/d_H}$$. Making sure to interpolate the function $$\hat{f}(r)$$ (using scipy.interpolate.interp1d), this scale factor can be determined by fitting the curve $$k \hat{f}(kr)$$ to the data $$\mathbb{E}[\rho_T(r)] / V$$. Then $$d_H$$ can be estimated by fitting $$k$$ versus $$V$$. (20 bonus points, but note that maximum grade is 10)

# YOUR CODE HERE
raise NotImplementedError()