add animation for maximal entropy

slds-lmu · Nov 3, 2023 · 83bab84 · 83bab84
1 parent 9e44eee
commit 83bab84
Show file tree

Hide file tree

Showing 7 changed files with 19 additions and 3 deletions.
diff --git a/slides/information-theory/figure/max_entropy_1.pdf b/slides/information-theory/figure/max_entropy_1.pdf
diff --git a/slides/information-theory/figure/max_entropy_2.pdf b/slides/information-theory/figure/max_entropy_2.pdf
diff --git a/slides/information-theory/figure/max_entropy_3.pdf b/slides/information-theory/figure/max_entropy_3.pdf
diff --git a/slides/information-theory/figure/max_entropy_4.pdf b/slides/information-theory/figure/max_entropy_4.pdf
diff --git a/slides/information-theory/figure/max_entropy_5.pdf b/slides/information-theory/figure/max_entropy_5.pdf
diff --git a/slides/information-theory/rsrc/make_entropy_plot.R b/slides/information-theory/rsrc/make_entropy_plot.R
@@ -12,8 +12,7 @@ p1 <- c(0.0, 0.0, 1, 0, 0)
 p2 <- c(0, 0.1, 0.8, 0.1, 0)
 p3 <- c(0.1, 0.1, 0.6, 0.1, 0.1)
 p4 <- c(0.15, 0.15, 0.4, 0.15, 0.15)
-p5 <- c(0.175, 0.175, 0.3, 0.175, 0.175)
-p6 <- c(0.2, 0.2, 0.2, 0.2, 0.2)
+p5 <- c(0.2, 0.2, 0.2, 0.2, 0.2)
 
 # ENTROPY MAXIMAL FOR UNIFORM DISTRIBUTION PLOTS ------------------------------------------------------------------------
 
@@ -32,7 +31,7 @@ plot_ent <- function(p) {
 }
 
 
-plot_list = lapply(list(p1, p2, p3, p4, p5, p6), plot_ent)
+plot_list = lapply(list(p1, p2, p3, p4, p5), plot_ent)
 
 for (i in 1:length(plot_list)){
   ggsave(paste0(".../figure/max_entropy_", i, ".pdf"), plot_list[[i]], width = 6.5, height = 5)

diff --git a/slides/information-theory/slides-info-entropy.tex b/slides/information-theory/slides-info-entropy.tex
@@ -77,6 +77,23 @@
 \end{itemize}
 \end{vbframe}
 
+\begin{frame}{Entropy Maximal for Uniform}
+
+\begin{center}
+        \begin{figure}
+            \centering
+            \foreach \x in{1,2,3,4,5} {
+            \includegraphics<\x>[width=0.6\linewidth]{figure/max_entropy_\x.pdf}\par
+            }
+        \end{figure}
+\end{center}
+
+\begin{itemize}
+   \item Naive observations: Entropy minimal for peaked distribution and maximal for uniform distribution.
+\end{itemize}
+
+\end{frame}
+
 
 \begin{vbframe}{Entropy Re-Ordering}