This commit is contained in:
Louis 2025-05-22 18:10:11 +02:00
parent 1804d83e5f
commit 5c781a661a
3 changed files with 78 additions and 27 deletions

14
build-map.R Normal file
View file

@ -0,0 +1,14 @@
library("leaflet")
library("mapview")
library("webshot")
m <- leaflet() |>
addTiles() |>
setView(lng = -3.432, lat = 53.1, zoom = 6.4)
# |>
# addMarkers(lat = 55.953251, lng = -3.188267, popup = "Edinburgh") |>
# addMarkers(lat = 51.4545, lng = -2.5879, popup = "Bristol") |>
# addMarkers(popup = "Leeds", lat = 53.8008, lng = -1.5491) |>
# addMarkers(popup = "Reading", lat = 51.455, lng = -0.971)
print(m)
mapshot(m, file = "img/uk-map.png", cliprect = c(20, 365, 395, 600))

BIN
img/uk-map.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 284 KiB

View file

@ -114,7 +114,7 @@
\begin{frame} \begin{frame}
\frametitle{Multiple networks} \frametitle{Multiple networks}
\begin{figure}[ht] \only<1>{\begin{figure}[ht]
\centering \centering
\begin{subfigure}[ht]{0.475\textwidth} \begin{subfigure}[ht]{0.475\textwidth}
\centering \centering
@ -139,7 +139,22 @@
\end{subfigure} \end{subfigure}
\caption{Adjacency matrices,~\cite{baldockSystemsApproachReveals2019}} \caption{Adjacency matrices,~\cite{baldockSystemsApproachReveals2019}}
\label{fig:adj} \label{fig:adj}
\end{figure} \end{figure}}
\only<2>{
\addtocounter{figure}{1}
\begin{figure}[ht]
\centering
\begin{tikzpicture}
\tikzset{city/.style={circle, fill=white, draw=red, inner sep=0.65,minimum size=0}}
\node (map) at (0,0) {\includegraphics[width=0.35\textwidth]{img/uk-map.png}};
\node[city, pin={[pin edge={<-,thick}, pin distance = 25mm]180:Leeds}] (leeds) at (0.2,0.03) {};
\node[city, pin={[pin edge={<-,thick}, pin distance = 30mm]0:Edinburgh}] (edinburgh) at (-0.58,1.84) {};
\node[city, pin={[pin edge={<-,thick}, pin distance = 20mm]180:Bristol}] (bristol) at (-0.3,-1.82) {};
\node[city, pin={[pin edge={<-,thick}, pin distance = 20mm]0:Reading}] (reading) at (0.5,-1.82) {};
\end{tikzpicture}
\caption{Map of the 4 cities}
\end{figure}}
\end{frame} \end{frame}
\section[Bipartite collection models]{Bipartite network collection models} \section[Bipartite collection models]{Bipartite network collection models}
@ -349,9 +364,31 @@
\begin{column}{0.6\textwidth} \begin{column}{0.6\textwidth}
\begin{figure} \begin{figure}
\centering \centering
\includegraphics[width=0.8\textwidth]{tikz/applications/baldock/shared-iid.pdf} \begin{tikzpicture}[every every node/.style={anchor=south west, inner sep=0pt}, x=1mm, y=1mm]
\caption{Shared structure of the 4 networks} \node (struct) at (0,0) {\includegraphics[width=0.8\textwidth]{tikz/applications/baldock/shared-iid.pdf}};
\label{fig:shared} \node (gen) at (-25,11) {};
\node (interm) at (-25,2) {};
\node (spe) at (-25,-7) {};
\node (gen_label) at (18, 11) {};
\node (spe_label) at (18, -7) {};
\node (for_label) at (struct.west) {};
\onslide<3->{
\node[right = 3mm of gen_label] (generalist) {Gen.};
\node[right = 3mm of spe_label] (specialist) {Spe.};
\path (generalist) edge[->,thick] (gen_label);
\path (specialist) edge[->,thick] (spe_label);
}
\only<3>{
\node[left = 3mm of gen] (towns_gen_garden) {B, L};
\node[left = 3mm of spe] (towns_spe_garden) {E, R};
\path (towns_gen_garden) edge[->,thick] (gen);
\path (towns_spe_garden) edge[->,thick] (spe);
}
% \only<4>{}
\end{tikzpicture}
\caption{Shared structure of the 4 networks}\label{fig:shared}
\end{figure} \end{figure}
\end{column} \end{column}
\end{columns} \end{columns}