%% Generate an undecorated version of Figure S3

function []=FigureS3()

%% Read in the data
% Get the value of c_d
data_name=sprintf('d_cd.dat'); fid = fopen(data_name,'r'); numbers=fscanf(fid, '%f'); fclose('all');
Nd=size(numbers,1)/2; % number of data points
numbers=reshape(numbers,2,Nd).'; 
ds=numbers(1:Nd,1); % spatial dimensions
c_d=numbers(1:Nd,2); % constant $c_d$ governing the large-order behavior

%% Plot
% Set font style
figure();
plot(ds,c_d,'LineStyle','-','Color',[0,0,0])
xlabel('$d$','Interpreter','latex')
ylabel('$c_d$','Interpreter','latex')
xlim([2,6])
ylim([0,4])
axis square
set(gcf, 'PaperPositionMode', 'auto');
print -depsc2 FigureS3.eps
end